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SHARP 』艮 


Nev^dfe People 


ひらかれたか性。 




PRO II 


EXPERT II 


SUPER HD 


ザ•ワークステーション。 80 M バイト （SCSI 钍橄〉ハードデ <ス 7 、 SCSI インターフェイスを標準装備 

SUPER HD 

本体+キーボード+マウス•トラックポール 
CZ -623 C - TN (チタンブラック）挖準俩格4肌000 PJ (税別） 

アートの系譜。 

EXPERT II 

本体+キーポード+マウス • トラックポール 

CZ -603 C - BK (ブラック） 一 GY ( グレ-)標檇価格338,000円(税別)/ HD タイプ CZ - m 3 C - BK (ブラック）標堆価侪4明.000円(税別〉 

ニ ェース スンダード „ 

PRO II 

本体+キーボード+マウス 

CZ -653 C - BK (ブラック） 一 GY ( グレー)挖郇価侪285,00 ( mj (税別） 

HD タイプ CZ - 663 C - BK (ブラック） 一 GY ( グレー）挖準価格395,0001リ（税別〉 






















次代のユーザーインターフ^イスを象微する SX - WINDOW + 〃搭載。 


今回の X 68000 ニューシリーズのデビューに間して、ハードウェア以上にウィンドウ環境の提供に耳目が集中したことは、昨今のビジ 
ュ アル ユーザー インターフェイス事情をふまえれば、当然のことど言えるでしょう0マルチウインドウを躯使して X 68000 をコントロールす 
る、待ち望まれていた環境がこの SX - WINDOW によって実現されるのです。何の予備知識もなしにこのウインドウに接した方は、一 
見して従来のビジュアルシェルのバージョンアップど思われるかもしれませんが、本質的には全〈異質のものど言えます。ひどつのウ 



ィンドウである仕事をさせながら、別のウィンドウで遠う仕事にとりかかる。ひどことで 


言えばアプリケーションを実行させる環境どしてのウィンドウであるごいうこど。これま 


でのビジュアルシェルではできなかったシーンを生み出していま 


す。複数のアプリケーションを同じ操作のもどで走らせたり、アブ 


リケーション相互でデータのやりどりが可能になるわけです。そし 


て、次代のインテリジヱンスを鮮やかに象徴する4階調のハイセ 


ンスな画面処理—— o SX - WIND 0 W をターゲットとしたアブ 


リケーション開発もすでに推進されており、これからの展望どいう点からも大いに期 


待されるどころです。また、この SX - WINDOW はディスクによって供給され 、 BIOS 


の高速化（平均2倍）も含めて 0 S である Human 68 k の機能を拡張。ニューシリーズ 


のみならず、すべての X 68000 でこの新しい環境が亨受できます。 


JKSX-WINDOW の起動には、 メインメモリ 2MB が 必要です。 CZ-600C/601C/611G/652C/653C/662C/663G で SX-WINDOW をご使用の探には、あらかじめ別売の 1MB 增設 RAM ボードを增設してください 


d/v E W 

1168000 

PERSONAL WORKSTATION 

SUPER-EXPERTPRO 


-充実のデイスプレブラインアップ 

15型カラーディスプレイテレビ(ドットビッチ (B9™n) CZ-602D-BK (ブラック） 一GY (グレー） . 摞準価格99.800円（チルトスタンド同梱•税別） 

15型カラーディスプレイテレビ（ドットビッチ0.39關）〇 Z-605D_BK (ブラック） .-GY (グレー) . 摞準価格 U 5.000円（スピーカ ー2 個/チルトスタンド同個•税別） 

15型カラーディスプレイテレビ(ドットビッチ0.31_) CZ-613D-TN (チタンブラック) .-BK (ブラック) .-GY (グ IH ……摞準価格135.000円（スピーカ ー2 個/チルトスタンド同悃•税別） 

14型カラーディスプレイ(ドットピッチ0.31_) CZ-603D-BK (ブラック） 一GY (グレー） . 檷準価格 84.800 円（チルトスタンド同梱•税別） 

14型カラーディスプレイ(ドットビッチ0.31_) CZ-604D-BK (ブラック） 一GY (グレー) . 摞準価格94.800円（スピーカ ー2 個/チルトスタンド同捆.税別） 

21型カラーディスプレイ(ドットビッチ 0.52mm) GU-21HD-BK (ブテンク) . 摞準価格〗48,000円（スピーカ ー2個同梱•税別） 

•印の商品は在癉僅少です。 


シャープ X 68000 
パソコン教室開催中 


• 会場：市ケ谷教室シャープ東京支社ビル*コース：入門コ 
—ス•表集計コース•音楽コース•絵画コース♦申込受付電話 

番号： （03)260-8365 春受講料:2.000円（税別） 


EXE リーダーズグッズ 
プレゼント実施中 


♦いま、 EXE 会貝よりご紹介のお客様が EXE ショップで X68000 シリーズを購入されますと、 
EXE 会貝に EXE リーダーズグッズをプレゼントします。詳しくは EXE ショップにお問い合わせ 
ください • また、 X68000 シリーズをご購入のお客搛は、ぜひ EXE クラブにご入会ください 


•お問い合わせは…シャープ ㈱ 電子機器事業本部システム櫬器営業部〒545大阪市阿倍野区長池町22番22号 0(06)621-1221( 大代表 ） • -f ^ -jf 

電子機器事業本部液晶映像システム事業部第2商品企画部〒162東京都新宿区市谷八幡町8番地 0(03)260-1 161(大代表） V / l ^^// ofmJC \- a 41 
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UNIX は AT&T BELL LABORATORIES の OS 名です， 
Mach は カーネギーメ a ン大学の OS 名です。 

CP/M, P-CPM, CP/Mplus, CP/M-86, CP/M-68K.CP/M- 
8000, DR-DOS は DIGITAL RESEARCH 
OS/2 は旧 M 

MS-DOS. MS-OS/2, XENIX. MACRO80. MS C は MICRO 
SOFT 

MSX-DOS は アスキー 

OS-9, OS-9/68000. OS- 900 0, MW C は MICROWARE 

UCSD p-syslem はカリフォル ニア 大学理事会 

WordStar, WordMaster は WORDSTAR International 

TURBO PASCAL, TURBO C. SIDEKICK は BOLAND INTER 

NATIONAL 

LSI C は LSI JAPAN 

HuBASIC はハド ソン ソフト 

の商播です，その他，ブロ グラム 名 . CPU は一般に各 
メーカーの登錄 商摞です。 本文 中では “TM” ， “R ” マー 
クは明 K していません。 

本坊に !8 教？ れたプ〇グラムの著作 檑は プログラム 
作成者に保 ffl されています ^ 著作播上 . PDS と明記さ 
れ たもの 以外 . 個人で 使用す るほかの 無断 a 製は 桀 
じられています。 
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SHARP 


クリエイティブマインドあふれる周辺機器が 



テ‘イスプレイ関連 


ァードンール 


プリンタ 


ファイル 


カラ-デイスプレイテレビ カラーディスプレイ 


画像入力 


カラーブ’リンタ 


ドットプリンタ 


ハードディスク 



15 型カラーディスプレイテレビ 


CZ -602 D-BK 
★ CZ -602 D-GY 

摞準価格99,800円（税別） 
(チルトスタンド同梱） 



14 型カラーディスプレイ 

CZ -603 D - BK-GY 

標準価格84,800円（税別） 
(チルトスタンド同梱） 



15型カラーデ< スプレイテレビ 

CZ -605 D - BK--GY 

標準価格115,000円（税別） 
(スビーか-2個•チルトスタンド同梱) 



14型カラーディスプレイ 

CZ -604 D - BK-GY 

棵準価格94,800円（税別） 
(スピーカー2個.チルトスタント•同梱) 



チューナー 


CRT フィルター 



〇 


高性能 CRT フィルター 

BF-68PRO 

襟準価格19,800円（税別） 
(14/15 型用） 



RGB システムチューナー 

CZ -6 TU - BK-GY 

摞準価格33,100円（税別） 

(リモコンイ寸） 



CZ -8 NS 1 

播準価格188,000円(税別) 



スキャナ用パラレルボード 

CZ -6 BN 1 

檷準価格29,800円（税別） 


映像入力 



カラーイメージユニット ♦ 2 

CZ -6 VT 1 -BK 

CZ -6 VT 1 

標準価格69,800円（税別） 



ビデオボード* * 3 

CZ -6 BV 1 

標準価格21.000円(税別） 



24ドット 

熱転写カラー漢字プリンタ 

★ CZ -8 PC 3 

播準価格65,800円（税別） 
(信号ケーブル同梱） 



48ドット 

熱転写カラー漢字プリンタ 

CZ -8 PC 4 

CZ -8 PC 4 -GY 

摞準価格99,800円（税別） 
(信号ケーブル同梱） 


24ビン 

カラー漢字プリンタ(8〇析〉 

CZ -8 PG 1 

摞準価格130.00 0 R (税別） 
(信号ケーブル同梱） 



24ビン 

カラー漢字ブリンタ（136桁） 

CZ -8 PG 2 

摞準価格160,000円（税別） 
(信号ケーブル同梱） 



ハードディスクユニット (20 MB ) 

CZ -620 H 

摞準価格178,000円（税別: 



增設用ハードディスク 
ドライブ (4 GMB ) 

(GZ 七 02 C /603 C /652 C ノ 
6530内蔵用） 

CZ -64 H 

摞準価格120,000円（税別 
(取付費別) 

※取付に M してはシャープ 
お客様ご相談窓口にてご 
相談ください。 


カラー ビデオプリンタ 


24ビン漢字プリンタ (136 桁 


カラービデオプリンタ 

CZ -6 PV 1 

摞準価格198,000円（税別） 
(信号ケーブル同梱） 


24ビン漢字ブリンタ （136 析） 
CZ -8 PK 10 
摞準価格97,800円（税別） 
(信号ケーブル同梱） 


カラーイメージジェット 



カラ-イメージジェット *4 

IO-735X 

標準価格248,000円（税別） 
(信号ケーブル別売） 


*1 ご使用に探しては、カラーイメージスキャナ CZ ^ eNSl に同梱の RS *232 C ケーブルで接 W するか.より高速のパラレルデータ伝送を行う場合、別光のスキャナ用パラレルポート ’ CZ ^ eBNI 檬準価格29.800円（税別）で*«してください。 
*2 CZ *603 D /604 D 、 OU -21 HD をご使用の場合は、 RQB システムチューナー CZ >6 TU (別光）が必要です.， 

*3 ビデオ出力は15.75 kHz テレビ標準信号です.また.拡張 I / O スロットは2スロット使用します. 



’シリーズ用 

周辺機器 

標準価格は税別です。 


カラー ディスプレイ 

• 21 型カラーディスプレイ睾 1 

CU -21 HD 

148.000円 


映像•画像入力編集装置 

• カラーイメージスキャナ 

CZ -8 NS 1 

188,000円 

♦カラーイメージボード II 

CZ -8 BV 2 

39.800円 


ダ和-及)株式会《 


_立体映像セット ★ CZ -8 BR 1 29.800円 

•パーソナルテロッパ CZ -8 DT 2 44.800円 


[_ FM 音源 J 

•ステレオタイプ FM 音源ポード _ CZ *8 BS 1 _23,800円 

スピーカー（2 本 1 組）標準装備、 ミュージックツール 同捆 

プリンタ 

• 24 ビンカラー漢字プリンタ (80 析） _ GZ *8 PG 1 _130.000円 

• 24 ビンカラー漢字プリンタ （ 136桁） CZ -8 PG 2 160 . 000円 


籲24ビン漢字プリンタ （136 桁） 

CZ -8 PK 10 97.800円 

• 24ドット熱転写カラー漢字プリンタ 

★ CZ - SPC 3 65,800円 

❿48ドット熱転写カラー漢字プリンタ 

CZ -8 PC 4 99.800円 

• 48ドット熱転写カラー漢字プリンタ 

CZ -8 PC 4 -GY 99.800円 

♦カラービデオプリンタ 

CZ -6 PV 1 198.000円 

• カラーイメージジェット 

IO -735 X 248.000円 


ファイル 

• ミニフロッピーディスクユニット (2 HD .2 D ) 

* 3 ^ CZ -520 F 118.000円 


•お問い合わせは…シャープ ㈱ 電子機器事業本部システム機器営業部〒545大阪市阿倍野区長池町22番22号 0(06)621-1221( 大ヤ 


























































シャープペリフエラルフアミリー 

XX68000 


ネットワーク 


その他 


拡張メモリ 



1 MB 增設 RAM ポード 
( CZ *600 G 専用） 

CZ -6 BE 1 

標準価格35,000円（税別） 



1 MB 增設 RAM ポード 
( CZ -601 C /611 C /652 C / 
653 C /662 CZ 663 C 用） 

CZ -6 BE 1 B 

標準価格28,000円（税別） 



2 MB 增設 RAM ボード* 5 

CZ -6 BE 2 

摞準価格79,800円（税別） 



4 MB 增設 RAM ポード* 5 

CZ -6 BE 4 

標準価格138,000円（税別） 


インターフェイス 



ユニバーサル I / O ポード 

CZ -6 BU 1 

標準価格39,800円（税別） 



GPHB ポード 

CZ -6 BG 1 

摞準価格59,800円（税別） 



增設用 RS -232 C ボード 
(2 チヤンネル） 

CZ -6 BF 1 

摞準価格49,800円（税別） 


数値演算プロセッサ 



数値演算プロセッサポード 

CZ -6 BP 1 

棵準価格79,800円(税別） 


FAX 



FAX ボード 

CZ -6 BC 1 

標準価格79,800円（税別） 


MIDI 



MIDI ボード 

CZ -6 BM 1 

標準価格26,800円（税別） 


モデム 



モデムユニット* 6 

CZ -8 TM 2 

檷準価格49,800円（税別） 
( RS -232 C ケーブル同梱） 


RS -232 C ケーブル 



RS -232 C ケーブル 
(平行接続型） 

CZ -8 LM 1 

摞準 価格7,200円（税別） 



RS -232 C ケーブル 
(クロス接続型） 

CZ -8 LM 2 

捕準価格7,200円（税別ノ 

LAN ボード 



CZ -6 BL 1 

標準価格268,000円（税別） 
(イーサネット 用） 

CZ -6 BL 2 

播準価格298,000円（税別） 

(イーサネットチーパネット両用） 
♦電源ユニット•ソフトウェア 
(ネットワークドライバ Verl . O ) 同梱 



インテリジェントコントローラ 

CZ -8 NJ 2 

標準価格23,800円（税別） 



マウス•トラックボール 

CZ -8 NM 3 

標準価格9,800円(税別） 



トラックポール 

CZ -8 NT 1 

棵準価格13,800円（税別） 

ぎ ノ 

マウス 

CZ -8 NM 2 A 

棵準価格6,800円（税別） 



ジョイカード 

CZ -8 NJ 1 

標準価格1,700円（税別） 


拡張スロット 



拡張 I / O ボックス (4 スロット） 
( CZ -600 C /601 C /602 C /603 C / 
611 C ，612 C /613 C /623 C 用） 

CZ -6 EB 1 -BK 

CZ -6 EB 1 

標準価格88,000円（税別） 


スピーカー 



アンプ内蔵 

スピーカー システム （2 本1組） 

AN - S 100 

棵準価格36,600円（税別） 


システムラック 



システムラック 
( CZ -600 C /601 C 602 C /603 C 
611 C /612 C /613 C /623 C 用) 

CZ -6 SD 1 

摞準価格44,800円(税別） 


*4 別売の信号ケーブル I 0-730 X 標準価格5.500円（税別）で接続して下さい： 

*5 ご使用に探しては、あらかじめ別売の 1 MB 增設 RA _- ド CZ "6 BE 1 標準価格35.000円（税別. CZ *600 C 用 >、 GZ ^6 BE 1 B 播準価格28.000円（税別•02七010、02*6110、6520、6530、6620、6630用）を增设してくださぃ。 
*6 モデムユニット CZ *6 TM 2 に同梱のソフトは XI 0<1ターボシリーズ用です- 


• ミニフ□ッビ-ディスクユニット (2 D ) ★ CZ -502 F 

99,800円 

• ミこフロッピーディスクユニット (2 D . 1ドライブ） CZ -503 F 

49,800円 

• 増設用ミニフロッピ-ディス外ライブ (2 D ) * 4 

CZ -53 F-BK 19,800円 


拡張ボード•その他 

•モデムユニット （300/1200 ボー） 

CZ -8 TM 2 

49,800円 

• 320 KB 外部メモリ 

CZ -8 BE 2 

29,800円 

參 RS -2320 マウス ポー ド※5 

CZ -8 BM 2 

19,800円 

• フロッピーディスクインターフェイス※6 

CZ -8 BF 1 

14,800円 


HS 第1水準漢字 ROM *7 

CZ -8 BK 2 

19,800円 

争 RS -232 C 用ケーブル(平行接続型） 

CZ -8 し M 1 

7,200円 

• RS -232 C 用ケーブル(クロス接続型） 

CZ -8 し M 2 

7,200円 

鲁拡張 I / O ボックス 

CZ -8 EB 3 

33,800円 

• RF コンノく一夕※8 

AN -58 C 

2,980円 

參インテリジェントコントローラ 

CZ -8 NJ 2 

23,800円 

籲マウス•トラックポール 

CZ -8 NM 3 

9,800円 

•マウス 

CZ -8 NM 2 A 

6,800円 

參トラックポール 

CZ -8 NT 1 

13,800円 


籲ジョイカード 

CZ -8 NJ 1 

1,700円 

籲チルトスタンド 

CZ -6 ST 1- E-B 

5,800円 

•高，性能 CRT フィルター※ 9 

BF -68 PRO 

19,800円 

•スキャナ用 パラレル ポー ド*10 CZ -8 BN 1 

27,800円 


•品番中の-表示は、 B くブラック〉モくオフィスグ L >を示します。※1 
XI ターポ Z シリーズ用來2 CZ -862 C には接統できません 》3 X 1 夕 
-ポシリーズ用 CZ -830 C 用 XI シリーズ用 *6 CZ -850 C 
で GZ -520 F を使用する場合に必要 *7 CZ -800 C 、 80 1 C . 802 C 、 
803 C 、811 C 、820 C 用 »8 CZ -820 C 、822 C 、830 C 用* 9 14/15型用 
*10 CZ -8 NS 1 用♦接続等の説明につきまじ T は，周辺機器総合 
カタログをご参照ください。 

★印の商品は在庫僅少です。 


P 機器事業本部液晶映像システム事業部第2商品企画部〒162東京都新宿区市谷八幡町8番地 0(03)260-1 161(大代表） 































































SHARP 

11 アート〃と呼べる高水準のソフトウェアが 


( 次代のインテリジェンス、 

\ウィンドウ環境をあなたの X 68000 で。 


ユーザー 本位の操作環境を提供するフル画面 マル麥 
ウィンドウタイプの美しいデスクドンブ(テキスト面/単色 
4階調+カラー4色、グラフィック面/カラー65,536色中 
16色)、イベント•ドリブン型 マルチ タスク処理により複数 
の作業を同時に処理できる疑似 マルチ タスクや入出力 
装置の設定が簡単に行える多機能コントロールパネル 
を搭載した本格ウィンドウシステムです c IOCS コールを 
利用したソフトの処理速度を高速化する10〇 S . X を付属, 



S^WINDOWverl.O 


CZ -259 SS 10万台達成ご愛用感謝価格6,800円（税別） 



/ 萵速通（〖をサポート。これからの、\ 
( そしてさまざまな谢•機境に対応する| 
V 商機能コミュニケーションゾフト。/ 


( ソース コー ド デバ、 ッ ガを { よじめ、 
各種開発 ツールを 強化。 

夕 く、ー ジョンアップされた(デコンパイラ。 


Communication PR 0^68 K のバージョンアップ版です。300 BPS 
から 19:200 BPS までの通信速度に対応し、パソコン同士の接続 
や各種データベースの漢字端末に、またホストコンピュータとの 
データ通信に利用できます。さらに MNP モデムへの対応で、ハ 
ー ド フロー 制御 （GTS RTS ) をサポート。その他、高速逆スクロー 
ル機能、オートログイン/オートパイロットが可能な自動実行機能、 
コンカレント機能も装備。また、バイナリファイルを転送するプロト 
コルとじ T Xmodem (128 /S 
UM 、128/ CRG 、1 K)、Ymodem 
( G 、 BATCH 、 G - BATCH )、 

Translt 2( TEXT 、 BINARY ) 

プロトコルもサポート。 

* Communication PRO -68 K(CZ 
-223 GS ) を既にお持ちの方は、 

アンケートカードをもとに有償バ 
ージョンアップを行います 


〇のソースレベルでデバッグできる「ソースコードデバッガ」を搭 
載したほか、各種開発ッールを強化した総合開発ッールです。 
また、ライブラリは Human 68 k ver 2 . 0の拡張 DOS コールもサボ 
-卜じ T いるなど、より X 68000 のハードウェアを活かせる豊富なラ 
イブラリ （800 種以上)となっています Q 言語の標準である ANSI 
規格準拠をさらに強化。「プログラム保守ユーティリティ ( MAKE )」 
や「ライブラリアン j など各種ッールを追加しました。 「 BASIC - C コ 
ンバ ータ 」、 「アセンブラ ム 「リ 
ンカ」、「デバッガ」、「ソース 
コードデバッガ」、「アーカイ 
バ」、「コンバー タム などの 
ッールが 装備されています， 

糸 C Compiler PRO -68 K ( CZ -211 
LS ) を既にお持ちの方は、登好 
カードをもとに有償パージョンア 

ップを行います CZ -245 LS 





標準価格 
19.800円（税別） 



標準価格 
44,800円（税別） 


Y ’ 霧 



淡株式会《 •お問い合わせは…•シャープ㈱電子機器車業本部液晶映像システム車業部第2商品企画部〒162東京都新宿区市谷八蝤町8番地 《I(03)260-n61( 大代表)へ。 































X 的 000 を サボート 


0 



■ CZ -251 BS 標準価格39.800円（税別） 
X 68000 の優れたグラフィック UR 境を活 
用し効率的に文書を作成するための 
インテリジェントワープロです。アイデア 
プロセッサ機能、ハイパーテキスト機能 
などをサポート。データの整理やプレゼ 
ン テーシ ヨンツールなど幅広い用途に 
利用できます。 


■ CZ -243 BS 播準価格19.800円（税別） 
プライベートなデータやビジネスデータ 
を簡単な操作で管理•運営できるパ 
ーソナルデータベースです。リフィル、 
タックシール、ハガキなどへの印字も 
ok . シャープ m 子手帳とのデータ交 
換可能(別売の通信ケーブル CE -200 
L が必要） 



■ CZ -228 BS 標準価格200.000円(税別) 
給与計算から明細発行までを、リ 
アルイメージ入力により自動的に、 
索早く処理することができます。 


■ CZ -227 BS 標準価格200.000円（税別） 
会計 エキスパートシステムとデー 
タ ベースを 搭載し、機能と操作 性 
を 両立 させた 財務会計 ソフト。 


■ CZ -221 HS 標準価格19.800円（税別） 

オリジナリティあふれるはがき等、 
簡単に作成、印刷できるホームプ 
ロダクテイピリテイツール。ほとんど 
の処理をアイコンで表示しマウス 
で選ぶフレンドリーオペレーション。 


■ CZ -252 MS 標準価格28.800円（税別） 
24トラック対応 MIDI マルチレコー 
デイングソフト Musicstudio PR 0- 
68 K がバージョンアップしました。 
従来の機能に加え、小節間のコピ 
一及びデリートや、 MIDI インプット 
モニターなど、数々の機能を追加. 
改良。さらに使いやすくなりました。 
»MIDI ボード ( CZ -6 BM 1) が必要です 




■ CZ -247 MS 播準価格28.800円（税別） 
MIDI 対応 自動 伴奏機能を サボー 
卜、簡単な 楽譜入力で MIDI 演奏 
が楽しめます。 

嵌 MIDI ポード ( GZ -6 BM 1) が必要です 


■ CZ -248 MS 摞準価格8.800円（税別） 
鑑赏用と音楽データ加工作成用 
からなるライブラリです 



■ CZ -240 BS 樣準偭格14.800円(税別) 
他のソフトを起動する前に、この Sta 
tbnery PRO68K を一度起動するだけ 
で、他のソフトを実行中にも「スケジユ 
ール」「住所録 j など多彩な機能をワン 
タッチで使用できますシャーフ電子 
手帳とのデータ送受信も実現，（別売 
の通信ケーブル CE -200 L が必要） 




■ CZ -226 BS 標準価格29,800円（税別） 
自由なレイアウト画面で入力でき 
るワープロ機能を装備したカード 
型リレーショナルデータベース。 


■ CZ -24 IBS 標準価格9.800円（税別） 


■ CZ -242 BS 操準価格9.800円（税別） 


■ CZ -220 BS 摞準価格58.000円（税別） 
入力の手間を軽減するヒストリー 
機能を装備した、コマンド型リレー 
シヨナルデータベースです。 


■ CZ -212 BS 播準価格68.000円（税別） 
スプレツドシート（表計算）、データ 
ベース、グラフ作成機能を一体化 
させた統合ビジネスツールです。 


■ CZ -235 GS 標準価格8.800円（税別） 
蜃中見舞用を中心とした NEW Print 
Shop PRO >68 K 用グラフィックデータ集 


■ CZ -236 GS 標準価格8.800円（税別） 
年質状を中心とした NEW Print Shop 
PRO -68 K 用 グラフィックデータ 集 


■ CZ -215 MS 棵準価格17.800円（税別） 
AD PCM 機能を活かす高機能サ 
ンプリングエディタ。多彩な EDITOR 
を装備、サンプリング音のデータは 
日 ASIC でも活用できます 


■ CZ -214 MS 標準価格15.800円（税別） 
スタジオのコンソールパネルを操 
作する感覚で FM 音源による音創 
りが楽しめるサウンドエディタ， 


■ CZ -213 MS 標準価格18.800円（税別） 
最大8パートのスコア（総譜）が窨 
け、内蔵の FM 音源で演奏できる 
楽譜ワープロ &演奏用ツール。 
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シューテイングゲーム 
ぐンインビー〉 

■ CZ -2 I 7 AS 
棵準価格7.800円(税別） 
© K 0 NAMI . 1988 

シューテイングゲーム 

く沙 BE 曼 蛇〉 

■ CZ -218 AS 
播準価格8.800円(税別） 
OKONAMI . 1989 

ブロックゲーム 

くアルカノイド〉 
■ CZ -222 AS 
檷準価格7,800円(税別） 
OTAIT 0 C 0 RP . 1987 

ドライブ ゲーム 
くフルスロットル〉 

■ CZ -231 AS 
摞準価格8.800円(税別） 
©TAITO C 0 RP . 1988 

スポーツゲーム 

ぐ熟血高校 
ドッジボール部〉 
■ CZ -232 AS 
標準価格7.800円(税別） 

C TECHNOS JAPAN C 0 RP . 1988 

アクシ3ンゲーム 

くパックマニア〉 

■ CZ -233 AS 
樺準価格7.800円(税別） 

C NAMC 0 

アクションゲーム 

くニュージーランド 
ストーリー〉 

■ CZ -230 AS 
檷準価格8.800円(税別） 

C TAITO C 0 RP 1989 

スポーツゲーム 

く V ’ BA しし〉 

■ CZ -246 AS 
標準価格7.900円(税別） 

C TECHNOS JAPAN CORP 1989 

〆 、•イクレーシングゲーム 

くスーパーハングオン〉 

■ CZ -238 AS 
播準価格8.800円(税別） 
CSE 0 A 1987 


ジェットヘリ.シミュレーションゲーム 

’ くサンダーブレード〉 

■ ■ C 7 -2 1 9 A c i 

ぐ.摞単価格9.500円(税別） 
— J C SEGA 1987 



アクションゲーム 

くダウンタウン熱血物語〉 

■ C 2-254 AS 
裸準価格8.800円（税別） 

(©TECHNOS JAPAN CORP 1989 

アクションゲーム 

くサイバリオン〉 
■ CZ -229 AS 
9月発売予定 

C TAITO CORP . 1988 


■ CZ -219 SS 樺準価格29.800円(税^) 

■ CZ -244 SS 播進価格9.800円（税別） 


■ CZ -224 LS «準価格9.980円(税別) 


■ CZ -234 LS 樣準価格]88.000円(棚 1|> 
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AI -68 K,Staff LISP^PS PRO -68 K ； 


THE 榀袋 V2.0 


Human68k ver2.0 


/X 68000 


OS- 


リく 101 曲集〉 


Musicstudio w 6 ok ver.1.1 


クラフィックライブラリ VOL. 2 


ンクライフラリ VOL.1 


NEW PrintShop pRO^okj 


CARD PR068K 用活用フォーム « 


CARO PRO*68K 用 システム手削フィル粱 


TOP 財務会計 


BUSINESS 


CARD pro 60 KJ 


TOP 給与計算エキス / 


DATA 


ビ 

ジ 

ネ 

ス 

ツ 

I 

ル 


Hyperword 


シャーフオリジナルソフトウェア 

XX6B000 


on* 园 ，: :12 















































































































Artdink 

TANK BATTLE SIMULATION 




XKB8000 

9 月 28 日発売 



ハ Vy ふ r:〆 



難敵「ドイツ機甲師団」を擊破すべく 

ついに総攻撃を開始した f 連合軍第7機甲師団7大隊」 

戦車72両、2,000を超す将兵を擁し、壮絶なバトルを繰りひろげる 
師団司令部 （ GHQ ) で映される、12もの戦場 

戦車ごと吹き飛ばされる「地雷原」、急斜面が待ちうける「山岳地帯」、 
「市街地」「渡河」「要塞」など、手ごわい難局が待ちうける 
戦況を読むうちに、ひらめく奇策爆擊要請、兵員や物資の補給、 
降伏、士官任命、一瞬のインスピレーションが戦局を大きく変える 
成功か、失敗か、貴官の判断が運命を決する 



- PP P — —— t — i —— i — 〜 , : \ w 7 

m AA 00 UUU 

£2£ -SSS SSS £S .ド 

—• — ——~7 m -- KT --—— 1 ' ‘へ _ • 5 2 HD (3 枚組） 


•固の： ベ： ■ WML - 州組； 

1補: n 麵9,500円 


L •画面写真は開発中のものです。 






SYSS 000 栄冠は君に12月発売予定。 


2 S アートテインク 


〒275千葉県習志野市津田沼21120 
TEL 0474-77-7541 (ユーザサボート専用) 


•お買い求めは、全国パソコンショップにて。 

•通信販光(送料無料）をご希望の方は、住所•氏名•電話番号•商品名•壤種名•メディア名を明記 UT 左記まで9.500円と 
消費税3%を同封の上現金窨留にてお申し込み下さい。 


(表示価格に,肖*税は含みません） 




















レイトレーシングを高速にしたい方 〆 。 ノ:二ニニニ:ニーダ 


C-TRACE TP Ver.3.0 ¥298,000 

トランスピュータボード （ T -800 X 1+4 M ) 屮 :■- 


C-TRACE Ver .3.0 トランスピュータ版ゾフ 

低、 


★ フルカラーフレームパッファ 

C-TRACE98 EXTENDER 
C-TRACE98 Ver.3.0 
C-TRACE68 Ver.3.0 
C-TRACE TOWNS 
C-TRACE NEWS Ver.3.0 
★C-TRACE98TP Ver.3.0 
★C-TRACE68TP Ver.3.0 

表示価格に消#税は含みません。★の製品は店頭販売い 
たしておりません。 E 接当社まで、お申し込みください。 

一部クレジット取扱 "r 


¥ 69,800 

¥ 128,000 

¥ 98,000 

¥ 98,000 

¥ 68,000 

¥ 530,000 

¥ 298,000 

¥ 298,000 


バージョンアップ受付中 


« 株式会社キャスト 
_お Fp 1 ^ い合わせ先參 
f = rjl ^8 東京都世田谷区等々力 2-1-13 
1： E し 03-705-1065 FAX .03-705-5224 


TE し 03-705-1065 FAX .03 - 

Cos 



































通 (* tt 売を ご 希望の方*ソフト名 • 濟植名 • 住所 • 
氏名番号を明 C の Ju TAKERU 事務 馬まで 
必ず現金！1«でお申し込み下さい • (* WU 麵 W で〇 

ヴ•ラ分-エ讓株式会社 

〒相7名古屋 mUI « 区獼田通》-38 
断事《1搶道宣 

TAKERU 寧務用 （052)824-2493 
裒京當(•所 (03)274-6916 
大阪當猶所 (06)252-4234 

•コンビ: I - •ター•ソフトウ I ア は著作物です. 

著作癱の杆 可なくコビー あるいはレンタル等の行 
為は、法律で_じられています a 



No Copy 

このマークは 
不法コビー 
* 止マークです 

ソフトウ艾ア遘的傷麵■纖 __ 
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X 68000 対廊 5，，-2 HD 

_ローランド社 

MT32 、 CM32 L 、 CM64 完全対応 

MIDI インターフェイスポード C - Z -6 BMI 
又は、 SACOM 製 SX -68 M が必要です。 
標準価格8,800円 

•標準価格には消費税は含まれておりません。 


上巻好評発売中ガ 


株式会社 システム サ コム 

〒130栗京都■田区®国 4-38-16 
両 B 桜并ビル 4 F 

八ードウェア部 03(635)5145 
ソフトウェア部 03(635)7609 
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MIDI 対応 
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0 好評薄充中 4 

各定価5,的0 

エルフでは、すでに発売されているソフト。これから 


wnn iKltitat M) IIIMt MW If 
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ン、 画面全体の 2. 3 を占めるビックなサイズのグラフィックが 17 □ 
•. \ 画面。膨大なメッセージ、あなたの頭脳に挑戦する数々のトリッ 

ク。もちろん美少女連もからみにからみ、燃えに燃える。美少女 
ソフトの横網、エルフがお届けする本格的アドベンチャーゲーム。 
これをやらずに90年代は語れない I 7 

I g 月下旬/定価6,的0円 


される全てのソフトを X 6 日□□□に移植する事が決定 
ました。エルフではユーザーの皆さまに、いかに楽し 
いただくかをモットーに一生懸命がんばります。ど5 
期待ください！！ 




ノ 

し、，巍 


大変お待たせ致しました I !美少女ソフトの金字塔、「ドラ=1ンナイ 
卜 j の登塀です。女の王国「ストロへリーフイールズ』。その王® 
は神聖なる女神の恩患を受け、人々は平和に罄らしていた。しか 
しある日、その女神が住む塔の上空に不気味なドラゴンの彩が…〇 
そしてその国に立ち寄った勇敢なる、剣士「タケル」運命は…。 





10月下旬/定価6,的0円 




株式会社 jn •ノレ • フ 
亍169東京都新宿区北新宿 H 



PINKY • PONKY ®- ③(びんきし、•ぽんきし、) 
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:フール」新登場。 


za/nsoft 

株式会社ザイ； f ; ゾ7卜ぺ = fm 如南“^^ふ十*—"…" 


® 物 
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卜〒651兵庫県神戸市中央区襖辺通2丁目 2-10 新南泰ビル 10 F TE じ(07$)242-怨55 
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オリジナ ルアー トが驚くほど自由に描ける、 
X68 アーティストの感性を刺激するアドバ 
ンストグラフィックツール 『G = ツール』。 
作品に挑む上で、必要不可欠なグラフィッ 
クキャラクタ、背景作成のすべてを備えた 
卜一タルツールです。これまで3回にわたつ 
てその特長を説明じ C まいりましたが、今回 
リリースに際し、もう_度驚くべきパフォー 
マンスの概要をご紹介します。 


ツール 


GR EDIT モード 



マルチウインドウシステム 

最高 12 枚まで描画ウインドウが開けます。 

ユーザーアイコンシステム 

使い勝手に合わせて、自分流のアイコンポ-ドが作成可能。 

マウス機能定義システム 

マウスの左右に機能定義が可能。 

高速メニューウインドウ処理 | 

メニューウインドウの開閉が瞬時に行えます。 

BG EDIT モード 



スプラィト処理 

作成から修正、アトリビュートが行えます。 

スプライトカラー処理 

16 ページ分まとめて処理できます c 

背景の作成 

最大 250 画面分を自由に設定することができます。 

キャラクタチェック機能 


単独チェックのほか、背景と重ねてのチェックも可能。 






























































( RPG-neXt 

•…ルーンワース黒衣の貴公子 

ACT-neXt 

幻獣鬼 

j SLG " neX t . 

. 遙かなる才ーガスタ 

- -」 




エイトレイクス•ゴルフ•クラブ•ゲーム大会 

令 W 3地 I 乂 N 時開催のオープンコンペ。 

エイトレイクス G . C •の 難 コースが あなたを 待？ている ン •-, 

■日時 

平成2年9月23日归)〜9月24日泪） 

午後1:〇〇〜1:30*3:00〜3:30の E 回開催 
■会場•お問い合わせ先 

東京地区 fmTOWNS ブラザ秋葉原 

〒100東京都千代田区外神田卜 15-16 ラジオ会館6階 003-251-2055 

名古屋地区 fmTOWNS プラザ大須 

〒460名古屋市中区大須 3-14-43 第ニアメ横ビル1階 SQ 52-251~7832 

大阪地区 fmTOWNS プラザなんば 

〒556大阪市浪速区難波中 2-7-23 広和ビル】階 006-846-3173 













ス 丁ーソセレクシヨンシス了ム+転職 fl ノステムを 
と！ D 入れた: P クシヨンゲームの決定版/ 

XJ68000 

ACT^neXt 幻獣鬼 

銳い/ X 68000 ユーザーの銳き感性をより研ぎ澄ます 
銳い/魂より出ずる銳き野望が渦巻く世界 
銳い/プレイヤーの銳きテクニックがすべての明暗を分かつ 


1 X 68000 5'2HD 3 枚組 

SS ¥7,800 

* 褰示®裼に消贄梭 U 禽みません。 



X 68000 の本質0 

「出衣の貴公子 j が今解き明か1~。 



liv|rU*«vt k»4U4nUtti ikttM ai4 Umh fl«iri4«444ni i IU»« 

<£1990 TACSOH 

黒衣の貴公子 




経験値を捨てた/新世代マルチストーリ-- 
ロールブレイングゲーム 

XX 68000 ルーンヮース 

RPG^neXt 黒衣の貴公子 

熱い/ X 68000 ユーザーの熱き要望に応え堂々登場././ 

熱い/ルーンワースとよばれる異世界で繰り広げられる熱き冒険譚 
熱い/プレイヤーの熱き魂が物描を自由に雄りなしてゆく 
籲 X 68000 5 2 HD 3 枚組 

:•ロスフテで^ 

參 FM 裔瀾 8 H + ADPCM 裔瀾対応 

• PC -980 1 VM 、 UV シリーズ PC -286、 386 シリーズ、 NOTE 則応 
5 2 HD /3.5 2 HD 2枚組•サウンドホード対応•ジ a イスチィック衬応 

♦饔 mok バイ MM 

參 PC - 8801 SR シリーズ . VA 、98 DO 対応5 2 D 

擊 CS 32/ C 232+ ( RAMB 4 KU 1 上， VRAMIi»KW 上）3.朽 



S 5 各 ¥8,800 

争*尔懾♦•に漓脅找 W 貪みません 



■滷價肪充こ无 V のノ_ ifl て料金と商品名名と稽站 
番号を明 fc のし“〗今 〆 お送りくだ笊？ Tm w ， 

■カタロクご希鉍の^ jj 、《 X + U；K yj f 2( KH l l 分を1"| 1.|の冬、カタ 

ロク1歸求券をお送^ T / •、い （- •『の*，り> 〆 

» T&E の最新情報がわか4テレ;サニビス 2)776 8&0 U 


企画•閒弇•製 a •肽壳 

株式会社ティーアンドイーソフト 

〒465名古屋市名東区费が丘1810番地 PHONE 052 773 7770 
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■店頭にて、ゲームソフト 25 %OFE グ（税別）、起低金利オクトハッピークレジットをご利用下さい.グ 


パソコンプラザ 



案内図 


5品)| 〇や JR ; 田から徒步5分 

5 n 京点:»田から彳逢步丨分 至并バ |! 

• RK V 






R 八••か; L / t / I ' 至 

店頭セール実施中 


’90 オクトで始まるパソコンワールド- 


G03-730-6271 

•営業時間 AM 11:00 〜 9:00/ 日曜•祭日 PM 7.00 電話一本で、八イ即納 

〒144東京都大田区蒲田 4-6-7 FAX 03-730-6273 

货定休日毎週火曜日祭日の場合翌日になります。 

オクト 


全關勝 


クラククレジット 


I 回 


2 % 


9% 


3回 


2.5% 


10 % 


0 CT -1 システムインフォメーション 

I ► 令商品保 • 证付（メーカー保 #:) 

:► 超低金利ハッピークレジット （1 的 | 〜 60 M) 姐命ナジ 0 K/ 
； ►ボーナス M 払い OK/ ボーナス 2 |”| 払い OK. グ 
I ► 屺违丨 I の指：セ OK バノ / 令なサポート体制 ) 

►尚ん 1 1の紺^せ n 山/ 'ォクトフリータ ム: い.'、 

| ► 店頭デモンストレーション•火施中 


6回 


3.5% 


11% 


5% 


M.5% 


12回 


5% 


15.5% 


15回 


48回 


U % 


20 %, 


オクト 

セレクテツドシステム 

広告掲載商品以外の 
製品も取扱っております。 




▲ 



箱 g •冬のボーナスー括払い (12 月末) OK " 

m 手数料なしです。絶対、お得ですゾ。 
m 翌月末払いも受付けています （10 月末） 



★下記セツトでお買い上げの方にはプレゼント•グ•① MD -2 HD 10枚(|ジョイカード2個（連射式)③シリコンキーボードか〈一4^ 


お好みのセットをお選び 下さい。 1 5 型 カラー ディスプレイ TV 


ISX-WINDOW 搭載。 

MOM バイトハードデ f スク搭載 


送料無料 



• CZ-603C-BK/GY 

定価 ¥338,000 

• CZ-613C-BK/GY 

定価 ¥448,000 


現金特価.グ IMJ 1 
お電話下さい。 

I SX-WINDOW 搭載0 
►拡張 I/O ポート 4 スロット装備 



• CZ-653C-BK/GY 

定価 ¥285,000 

• CZ-663C-BK/GY 

定価 ¥395,000 



CZ-605D-GY/BK 

定価 ¥115,000 

5 型カラーディスプレイ TV 


4 


CZ-613D-GY/BK 

定価 ¥ 135,000 


14型カラーデ f スプレ 



CZ-604D-GY/BK 

定価 ¥94,8000 


21型カラーディスプレイ 


CZ -8 NJ 2 I 限定 I 

籲インテリジェントコント a — う 

定価 V 23.800 

超特価 ¥18,6 00 




CU-21HD 

定価 ¥148,000 


A CZ -603 C + CZ -605 D . 定価合計¥ 453,000►オ クト大特価 

「12回| ? 「24回1 ? 厂 36回 | ? | 48回 I ? | 

8 CZ -6 I 3 C + CZ -605 D . 定価合計¥ 563,000►オ クト大特価 

「12回 f ? ]24回 「 ？ 「36回1 ?148回 | ? | 

C CZ -653 C + CZ -605 D . 定価合計¥ 400,000►オ クト大特価 

「12回 r ? 厂24回 r ? 厂36回 r ? 回「 ？ i 

D CZ -663 C + CZ -605 D . 定価合計¥ 510,000►オ クト大特価 

112回 | ? 124回 | 「36固！ - ? 1—48 回 「 ？ 1 

E CZ -603 C + CZ -6 I 3 D . 定価合計¥473,000►オ クト大特価 

(1"2回 1 ? ~ T 2 m 1~ ? 厂36回「 ？ IT 8 回1 ? I 

F CZ -6 I 3 C + CZ -6 I 3 D . 定価合計¥ 583,000►オ クト大特価 

I 12回 1 ?124回 X ~ I 36画~]~ ? | 48回 I ? I 

G . CZ -653 C + CZ -6 I 3 D . 定価合計¥ 420,000►オ クト大特価 

厂厂2回 I ? 124回 | ~ T ~ 「36固 " T ? 「48回 1 ? 1 

〇 CZ -663 C + CZ -6 I 3 D . 定価合計¥530,000►オ クト大特価 

112回丨 ？ 丨24回[―? 136回 ? 「48回"！ ？ 1 

I . CZ -603 C + CZ -604 D . 定価合計¥ 429,800►オ クト大特価 

I 12回 了 ¥28,000 T 24回！" ¥ 14,800「36回「¥10,200 |_48回 「 ¥8,000 1 

J CZ -6 I 3 C + CZ -604 D . 定価合計¥ 542,000►オ クト大特価 

厂12回「¥ 36,000 丨 9 , 000 I 36回「¥ 13,100 |—48回「¥ 10,200 | 

K ； CZ -653 C + CZ -604 D . 定価合計¥ 379,800►オ クト大特価 

|~12回「¥ 25,400「24回¥ 13,400 丁 36回" [ ¥ 9,300148回7,200 1 

L CZ -663 C + CZ -604 D . 定価合計¥ 489,800►オ クト大特価 

1 12回「¥32,200丨_24回「¥ 17,000 | 36回「¥ 11,800厂48回 「 ¥9,200 1 

M CZ -603 C + CU -2 IHD . 定価合計¥ 486,000►オ クト大特価 

rwr ? r 24 ii ?厂36回 r ?厂仙回 r t i 

N CZ -6 I 3 C + CU -2 IHD . 定価合計 ¥ 596,000►オ クト大特価 

||2回| ? 丨24回 | ? 厂36回 "T ? 「48回 T ? 1 

0 CZ -653 C + CU -2 IHD . 定価合計¥ 433,000►オ クト大特価 

112回 I ? 124回 | ? 「36回 「 ？ 厂48回 「 1 1 

P CZ -663 C + CU -2 IHD . 定価合計¥ 543,000►オ クト大特価 

I 12回 |_ 一" ? |_24回 | 一 — ~~ L 361 U " ? 1:48回] ? | 


りどんどん TEL しょう。安〈なるかもヨ♦グ 
り クレジット価格は、消費税込みですヨ。ご利用下さい,グ 


※クレジットの回数は 1 回〜 60 回、ボ -- ナス併用などありますのでお電話でお問合せ下さい 


■朗報です。冬のボ—ナス I 括払い(12月末)1//:手数料なし。(翌月末払いも涨//:)ご利用下さい。 


■本体セッド送料無料 •店頭デモ実施中…専門の係員が詳細にアドバイス致します。ぜひご来店 下さい。 

※上記料金には、消費税は含まれておりません。消費税が付加されますので、詳しくは、電話でお問合せ下さい。 








































































































































銀行振込:お近くの銀行より(電信扱い〉にて 
お振込み下さい- 

現金書留:封筒の中に住所•氏名•商品名を 
ご記入の上当社までお送り下さい 


専用お申込用紙をお送り致します 
ので、必要事項をご記入、ご捺印の上 
ご返送下さい-手続きは簡単です 


富士銀行三菱銀行 
久ヶ原支店蒲田支店 
@N0.1824 @N0.0278691 
株式会社億人(オクト） 


※掲載の価格は変動しますので、まずは、お電話にてご確認ください。 ※連休のお知らせ= 

※上記料金には、消費税は含まれておりません。消費税が付加されますので、詳しくは電話でお問合せ下さい。 
※銀行振込、または、現金書留でご注文の際には、あらかじめ輋話でご確認の上、お申し込み下さい。 


厳選された製品を、より安ぐより早〈、皆様のお手元にガ 


広告掲載商品以外の 
製品も取扱っております。 


SX-WINDOW 搭載。 



•ザ•ワークステーションと呼ふ:に3、さわしい 
スーパーな 68000 .グ新登場.グ 

SUPER-HD 0 

※プレゼント/① MD -2 HD 10 枚 ③ジョイカード（連射式） 

②サンダーブレード（¥9,500)④シリコンキ ーボード（¥2,800) 

X68000 SUPER-HD 

• CZ- 623C-TN+CZ-613D-TN 
定価合計¥ 633,00 0. . •大特価.グ TEL 下さい。 

※マウス.トラックボール 付. グディスプレイにはスピーカ2 個、 チル ト台付 •グ 


他のディスフレイ (I CZ-602D、C2 6I2D、(3 CZ-603a | 
-5 CU-21 HD の組合せもございますのでお問 L 、合せ 
下さい。 


12回I 


I 24 国 |= ? 1=36 回 I 


48 [II [ 


り安くてゴメンなさい。今だけヨ// 


オクト限定スペシャルセ、 


mi . 

. JaeB : 


ラストチャンス . 
^ 早い者勝ち 


|•CZ-6I2C(BK 
(¥466,000) 
卜 CZ -602 D(BK 
(¥99,800) 
MD -2 HD l(M 

籲ジョイカ-ド(連射 

オクト起特価 • シリコンキ-ポ-ド.: 

¥364,000(送料儀 

※ディスプレイ =( DOZ -604 D ② CZ - 
③〇 Z -6 I 3 D ④〇 U _ 
との組合せもございます。 TEL 下さ 


• CZ-6BE I 旧 M 增設 RAM ボード…… (¥ 35,00 0) ►特価 ¥ 26,500 

• CZ-6BEIB I MB 增設 RAM ボード .(¥ 28,00 0)^ 特価 ¥21,000 

• CZ-6BE2 2MB 增設 RAM ボード…… (¥ 79,80 0) ►特価 ¥ 60,500 

• CZ-6BE4 4MB 增設 RAM ボード…… (¥ 138,00 0) ►特価 ¥104,800 

•CZ-6BFI 増設用 RS-232C ポード•.… (¥ 49,80 0) ►特価 ¥ 38,500 

•CZ-6BGI GP- 旧ポード .(¥ 59,80 0) ►特価 ¥ 45,000 

• CZ-6BMI MIDI ポード .(¥ 26,80 0) ►特価 ¥ 20,500 

• CZ-6BN I スキャナ用ハラレルボード •（¥ 29,80 0) ►特価 ¥ 22,800 

•CZ-6BPI 数値演算フ□セッサボード （¥ 79,80 0) ►特価 ¥ 60,500 

•CZ-6B0I ユニバーサル |/〇ポード… （¥ 39,80 0) ►特価 ¥ 30,500 

• CZ-6EB I/BK 拡張 I/O ボックス .（¥ 88,00 0) ►特価 ¥ 66,800 

• CZ-6VTI/BK カラーイメージ.ユニット… •（¥ 69,80 0) ►特価 ¥ 53,000 

• CZ-6BL2 LAN ポード .( ¥298,000 )►大 特価 


• CZ-8NM2A マウス .（¥ 68,80 0) ►特価 ¥ 5,300 

• CZ-8NTI マウストラックボール ••（¥ 98,80 0) ►特価 ¥ 7,500 

• CZ-8NSI カラ-イメージスキャナ…•… （ ¥188,000) ► 大特価 

• CZ-6BCI FAX ポード .(¥ 79,80 0) ►特価 ¥60,500 

• CZ-8TM2 モデムユニット .(¥ 49,80 0) ►特価 ¥38,000 

•CZ-64H 增設ハードディスク… •（¥ 120,000 )卜 大特価 

• CZ-6TU GY/BK RGB システムチューナー… （ ¥ 33, 100) ► 特価 ¥25,000 

• BF-68PRO 高性能 CRT7 ィルタ-•…… (¥ 19,80 0) ►特価 ¥15,500 

• SX 侧(システムサコム) MIDI ポード . (V 19,80 0) ►特価 ¥15,000 

• PIO-68BEI-A0/O DATA) IMB 增設 RAM ボード.…… ( ¥ 25,00 0) ► 特価 ¥18,500 
» PIO-6BE2-2M0/O DATA) 2MB 增設 RAM ポ-ド.…… （ ¥ 50,000) ► 特価 ¥37,000 

• PI06BE4-4M (I/O DATA) 3MB 增設 RAM ポード…… (¥ 88,00 0) ►特価 ¥65,000 

• CZ-6BVI ビデオボード .(¥ 21,00 0) ►特価 ¥15,800 


アイテック（送料¥1，00 0) 

• IT-X640( ¥ 158,000) 

特価 ¥ 103,000 

參 IT-X680( ¥ 198,000) 

特価 ¥ 134,000 


• MD - I 200 AIII . 特価 ¥1 

• MD -24 FS 4. 特価 ¥3 

• MD -24 FS 5. 特価 ¥3 

• MD -24 FP 4. 特価 ¥2 

• MD - I 2 FS . 特価 ¥1 


CZ -8 PC 4 ¥99,800, 


闕 


| .48 ドット 

サーマルヘッド 


L ^B5 〜日4 まで 
I ハガキ可能 
Iカラー 対応 

オクト大特彳面^ 4580 T 


① CZ -8 PK 10 (24 ピン漢字プリンター136桁） 

定価¥97,800 . 大特価.グ TEI •下さい。 

② CZ -8 PGI (24 ピンカラー漢字プリンター80桁) 
定価¥130,000…•… 大特価.グ TEL 下さい 0 

③ CZ *8 PG 2(24 ピンカラー漢字プリンター136析） 
定価¥160,000…•… 大特価ガ TEL 下さい。 

④ 10-735 x ( カラーイメージシエット） 

定価¥248,000•…… 大特価ガ TEL 下さい。 


①五段キャスター付 



5段キヤスター付 
キーポードが収納できる 
力も、手元でマウス操作が 
ラクラクできる 
棚 te 5 段のマルチに 
活用できるディスク。 

ウーン、こいつはデキル/ 

1325(H) X640(W) 
x700(D) 


②■キヤスタ-付 


% 




特価 ¥16,000 ^ ^ 


4段抑スター付 

どんなパソコンにも 
フレキシブルに対応./ 
使い易いデスクです。 


1245(H) X6I4(W) 
x600(D) 

特価 ¥ 12,000 


③三段キャスダ 

jiili N 

囑 i 


3 段キ t スタ- 

場所を選ばな 
簡易で使利な 
ディスクです。 

IW1 




1175(H) x 64( 
x 600(D) 

特価 ¥E 


X 昍〇00ソフト大セール実施中※ゲームソフトオール 25 %off 


( グラフィック〉 *Z，s STAFF PR068K Ver.2.0 
( シャフト ) 定価 ¥58,00& 

才外特価¥40,000 

( データーペース〉春 KAMIKAZE 
( サムシンググッド）定価 ¥68,000 

オクト特価¥46,000 
( グラフィック〉 *C-TRA 〇 E68 
( キャスト）定価 ¥68,000 

ォクト特価¥51,000 

(0 首語 > • G & Professional Pack 
( マイクロウェアジャパン ) 定価 ¥ 58,000 

オクト特価¥44,000 

( グラフィック〉暑サイクロンエキスブレス 

定価 ¥78,000 

オクト特価¥58,000 

( グラフィック > • デジタルクラフト 
定価 ¥39,800 

才外特価¥28,000 

( ワープロ〉 •ハィノ 、♦-ワード 

定価 ¥ 39,800 CZ-25IBS 

オクト特価¥29,800 


型 名 

商 品 

定 価 

特 価 

CZ-ZIILS 

Ccompder PRO-68K 

¥39,800 

¥28,800 

CZ-2I2BS 

BUSINESS PR068K 

¥68,000 

¥48,000 

CZ-2I3MS 

MUSIC PR068K 

V 18,800 

¥13,500 

CZ-2I4MS 

SOUND PRO-68K 

V 15,800 

¥11,500 

CZ-2I5MS 

Sampling PRO-68K 

¥ 17,800 

¥12,800 

CZ-2I9SS 

0S-9/X 68000 

¥29,800 

¥21,000 

CZ-220BS 

DATA PRO-68K 

V 58,000 

¥41,000 

CZ-257CS 

Print "ShoD PR0BM.V.2 

V 19,800 

¥14,300 

CZ-223CS 

Communication PRO-68K 

V 19,800 

¥14,300 

CZ-224LS 

THE 福袋 V2.0 

V 9,900 

¥ 7,500 

CZ-226BS 

CARD PRO-68K 

¥29,800 

¥21,300 

CZ-24IBS 

システム手掁リフィル集 

V 9,800 

¥ 7,500 

CZ-242BS 

活用フォーム集 

V 9,800 

¥ 7,500 

CZ-244SS 

Homan 68K Ver2.0 

¥ 9,800 

¥ 7,500 

CZ-247MS 

MUSIC PRO-68K[M DI) 

¥28,800 

¥20,800 

CZ-240BS 

Stationery PRO-68K 

V 14,800 

¥11,500 

CZ-243BS 

CYBER NOTE PRO*68K 

¥ 19,800 

¥15,200 

EW 


V 38,000 

¥29,800 

G-68K 


V 14,800 

¥11,400 

E-68 


¥19,800 

¥15,300 


籲 CZ -6 IIC ( BK ) 定価 ¥399,800. 

• OZ -652 C ( BK ) 定価 ¥298,000. 

• 0み6620(日1<)定価¥408 / 000. 

• CZ -60 ID ( BK ) 定価 ¥119,800. 
籲 CZ -60 ID ( GY ) 定価¥119,800. 
離 GZ -6 I 2 D ( GY ) 定価 ¥119,800. 

• 10-735 定価 ¥248,000. 


•大特価¥218: 
•大特価¥1的: 
•大特価¥248, 
•大特価¥ 68, 
•大特価¥ 68, 
•大特価¥ 74, 
•大特価¥158, 


店頭ゲームソフトオール 25%off/hf ジネスソフト 25 % より特価中 


•尚、送料とじ T 1 ケ¥500、2ケ 
3ケ以上で¥1,000となります。 


★通信販売お申込みのご案内 ★ 〒丨44東京都大田区蒲田 4-6-7 TEL ： 03-730- 

お屮込みはお屯』 K ホ恥いします。お济梯のく代所〉く氏名><屯,沾裉り-〉及びく rtW , 名〉をお知らせドさい。*人金確認後ただちに而品 


6271 


オクトラクラククレジット表 


1回 

1 % 

3回 

2.5% 

6回 

3.5% 

10回 

5% 

12回 

5% 

15回 

7.5% 

18回 

9% 

20回 

10% 

24回 

11% 

30回 

14.5% 

36回 

15.5% 

48回 

20% 


※連休のお知らせ= 



■店頭にて、ゲームソフト 25% OFE く/ (税別）、超低金利ハッピークレジットをご利用ください♦ク 

■特に人気のある商品によっては、しばらくお待ち願うことがありますのでご了承下さい。 


1 


★オクト今月だけの新品限定販売(各1台限) ぉ 


熱転写カラー漢字プリンター （ 


モデムコーナー（送料 Y 1.000) 


オクト特選シャープ周辺機器（送料 ¥1,000) 


※超低金利クレジットご利用下さい。1回〜60回払い、頭金ナジ/ボーナス1回払い、ボーナス2回払い OK / 


チヤンス/ X 68000. SUPE 闩 - HD (チタン) = 丁 送料ナシ ♦// X 68000 EXPERT-HD 


■平成2年冬のボ—ナス|括払い OK //:( le 月末)手数料ナシ// 


超低金利クレジツトをご利用下 CV い。 


ン 




側 

2 


^1 




Lrl -605 : 


D 


■ 


0 0 0 0 0 
0 0 0 0 0 
8 5 8 9 0 
4 14 7 5 


付 


〇 

8 


nu o 

nu ^ nu nu nu nu 
^ ^ ^ ^ ^ ^ ^ 






























































































































I12 回 I ? I 24 回丨 ？ 丨 36 回 

|» セ.ソト： CZ -603 C + CU -21 HD . 二. 

I 12 回 「 ？ r24 回1 ? 「36 回 


EXPERT 11 -HD 

A セット： CZ -613 C + CZ -604 D . 定価 5 / 542 • 800 ►料 価（価格はお霣 IS 下れ 

LJ 2 回1 ? | 24回 L ? 「36囱1 ? ] 48回〔 ? LM 回1 ?^一 


て'セット： CZ -613 C + CZ -613 D 


•-定価¥583 . 000 ►特価（価格はお電話下さい。) 


B : CZ -613 C + CZ -6 MD ••••_•. 定価 Y 563 • 000_ 忭恤（価格はお霣 IS 下さい ) 

l：M"| ■ 37.700 I 24 N I 19,800 I 3 Gf>l I 1 3,700 丨 48 回 i lU.fHM) : (iOltll H . 900 


12[»] ? 」 24 囬』 ? I 36 回し ? 148 回 J ? I 60 回 | 」 

r) セット： C2-6I 3 C f CU-21HD . .二 ..... 二 . 定埤： . 000 ► 1.*, <(6 ( 価格は お霄括下さい ) 

12囬 [ ? 〔24回」 ？ 36回 ？ 48回 ? 60回 ？ 


EXPERTI1 

A セット： CZ -603 C + CZ -604 D 定価 ¥432. 800 ►特価（価格はお電 IS 下さ uv ) 


[ 12回1 

r 1 24 回丨 ？ 

1 36回 1 

? ri 8 回 t 7 I 如回 I ?~ 

B セット: 

: CZ -603 C + CZ -605 D . 


定価¥453.000 ►特愐（価格はお霄話下さい ) 

( 12回 J 

30.200 124回1 15.900 — 

I 36 囱 1 

11,000 1 48回 i 8.500 160回丨 7.100 1 


◊ セット： CZ -603 C + CZ -613 D . 定価 ¥473.000_特価（価格はぉ《括下#\ > \ > > 


EXPERT 


EXPERT-HD 


PRO-HD 






EXPERTII 

セットでお買い上げの方に、 

•ディスケット10枚 j 

•加力-ド2ヶ}プレゼント中ガ 

EXPERTII-HD 

セットでお買い上げの方に、 

❿ディスケット10枚〕 


►ジョイカード2ケ 


-プレゼント中.グ 




手数料(金利)無料 

(平成2年12月末払いをご利用下さい〇) 


CYBER STICK 

• CZ -8 NJ 2 
(定価 ¥23,800) 

超特価.グ 
¥18,500 (送料•调資税込み¥19370) 


しへ 

llilf 

X V 1 Q 


X 68000 シリーズ専用 特価¥16,480 
MIDI インターフェースポード 
SX -68 M (サコム) 

(純生コンパチ)定価¥19,800 

送料づ肖黄税込み 



電話にて、ドンドンお問合せ下さい.グ 
クレジット表には、出せないほどの価格です。 
メーカーさん、ご免なさい。 

ユーザーの方には大勧迎されそうです。 
今がチャンスです、ハイ 0 


SUPER-HD 

セットでお買い上げの方に、 
•ディスケット10枚〕 


SUPER-HD 

A セット： CZ -623 TN + CZ -604 D 


定価¥ 592 . 800 ►特価（価格はお電括下さい J 


きジョイカード2ケ 


>プレゼント中.グ 


: 12 m I 7 , 24回1 

I 36回 1 

? 

i 48回 T J 60固丄 ? 

B ■セット： CZ -623 TN + CZ -605 D 



定価¥61 3. 000 ►特価（価格はお電 IS 下さい。） 

12回 ？ 24回 ？ 

1 36回 

? 

48回 ？ 60回 ？ 

0 セット： CZ -623 TN + CZ -613 D . 



••定価¥ 633 . 000 ►特価（価格はお電括下さい J 

| 12回142,700 | 24回122.500 

I 36回 1 

15,500 

1 48回"！ 12. 100 「60回 T 10.100 ] 

の)セット： CZ -623 TN + CU -2 1 HD . 



定価¥646 . 000 価（価格はお電 IS 下さい） 

12回 ？ 24回 ？ 

36回 

? 

48回丨 ？ 丨60回1 ? 


I P & A 恒例サマー大バーゲン祭 

開催中.グ 


PROII-HD 

セツド C お買い上げの方に、 
•デイスケット10枚〕 


►ジョイカード2ケ 


PRO I1-HD 

< a ‘ セット： CZ -663 C + CZ -604 D - 


定価 Y 489.800 ►特価 （価格は お電栝 下さい 〉 


^プレゼント中.グ 


( 12 回 1 1 I 24 回1 

? 

I 36 回 1 

? I 48 回 1— ? | 60 回1 ? "I 

B ) セット： CZ -663 C + CZ -605 D 


定価 ¥510. 000 ►特価（価格はお電 IS 下さい.) 

12 回 34.100 24 回 

17,900 

1 36 回 1 

12,400 r 48 回 T 9,600 1 60 回] 8.100 ) 

、〇セット： CZ -663 C + CZ -613 D . 


. 定価 ¥530.000 ►特価（価格はお電話下さい」 

12 回 ? 1 24 回 

? 

36 回 

? 1 48 回 1 ? 1 60 Q ] 1 

D ， セット： CZ 663 C + CU -21 HD . 


. 定価 ¥543. 000 ►特価（価格はお電 IS 下#い ) 

12 回 ？ 24 回 

? 

36 回 

? < 48 回 ? 60 回 ? 



PROII 

セットでお買い上げの方に、 
•ディスケット10枚1 

> プレゼント中.グ 

• ジョイカード2ケ 


p 闩匚 m 

A セット： CZ -653 C + CZ -604 D • 


••定価¥ 379 . 800 ►特価（価格はお電 IS 下さい」 


112回丨 f 

1 24回1 

? 

[ 站回 L 

? 

I 48(111 

1 

1 60回丨 1 1 

B ) セット： CZ -653 C 4- C 2-605 D . 



••定価¥400 . 000 ►特価（価格は お霄 IS 下さい J 

12回丨 26,800 

24回 

14,100 

I 36回 1 

9.700 

48回 

7,600 

60回 6,300 ! 

. C .‘ セット： CZ -653 C + CZ -613 D 



定価¥ 420. 000 ►特価（価格は お霄 I * 下さい。） 

12回 ？ 

24回 

? 

36回 

? 

48回 


60回 ？ 

D セット： CZ -653 C 4- CU -21 HD . 



-定価¥ 433. 000 ► 特価（価格は お電 IS 下さい J 

12回 ？ 

24回 

? 

36回 

? 

48回 

? 

60回 ？ 


[ ジョイスティック送料¥500 
• X-1PR0 

定価 ¥9. 500 ►特価 ¥7.800 
•ASCII STICK 

定価¥6,800 ►特価 ¥5,500 


セットでお買上げの方に、 

_ ♦デイスケット10枚籲ジョイカ ード2個プレゼント中 _ 

• CZ-602C + CZ-6I2D. 定価 ¥ 475,800 ► 特価 ¥ 306,000 

• CZ-602C + CZ-604D. 定価 ¥ 450,800 ►特価 ¥ 300,000 

• CZ-602C + CZ-605D. 定価 ¥ 471,000 ► 特価 ¥ 320,000 

• CZ-602C + CZ-6I3D. 定価 ¥491,000 ►特価 ¥ 336,000 

• CZ-602C + CU-2IHD . 定価 ¥ 504,000 ►特価 ¥338,000 

• CZ-612C + CZ-6I2D. 定価 ¥ 585,800 ► 特価 ¥ 375,000 

• GZ-6I2C + CZ-604D. 定価 ¥ 560,800 ► 特価 ¥ 369,000 

• CZ-612C + CZ-605D. 定価 ¥581,000 ►特価 ¥ 386,000 

• CZ-612C + CZ-6I3D. 定価 ¥ 601 ,000 ► 特価 ¥ 403,000 

•〇 Z-6I2 〇 + GU-2IHD . 定価 ¥ 614, 000 ► 特価¥407，〇00 

• CZ-662C + CZ-6I2D. 定価 ¥527,800 ► 特価 ¥ 339,000 

• CZ-662C + CZ-604D. 定価 ¥ 502,800 ►特価 ¥ 333,000 

• CZ-662C + CZ-605D. 定価 ¥ 523,000 ► 特価 ¥ 352,000 

• CZ-662C + CZ-6I3D. 定価 ¥ 543,000 ► 特価 ¥ 368,000 

• CZ-662C + CU-2IHD . 定価 ¥ 556,000 ► 特価 ¥ 372,000 


プリ ンター 10台 限定 1 (送料 ¥1.000) 

■ CZ-8RKB (定価 y 152.000) 

• 24 ビン漢字ブリンタ P&A . - . _ _ _ _ 

( 136桁） 限定特価¥ 499800 

• ハカ干印字 OK . グ _ (An-il'iWHAiA ¥52,324) 



XbHUUU 用メモリーボード (i/odata) (送料 ¥500) 

① PIO-6BE 卜 A w-iri 

定価 ¥25.000 ¥1 8j000 

(送科•消費税込 ¥19.055) 7 

©PIO-6BE2-2M 心ハ crkrfc 

定価 ¥50,000 . ¥36^00 

(送料•消黄税込 ¥38. 110〉 7 w 

② PIO-6BE4-4M ^ 八 - 
88.000 ¥ 64,300 

(送料•消費税込V66.74 4) 7 





台数限定 


送料、消費税込み 


X68000 シリ ■ 


〜 PSA スペシャルセツト = 限定誌上販売 // 


Eew]X68000EXPERTII/II-HD & PR0II/PR0II-HD & SUPER-HD (送料•消費税込) 


9/15H0/15 


_ お近くの方は ; 
參本体単品で 
• ビジネスソフト 5 





P 8 A 超低金利クレジットをご利用ください^ 


•本広告の掲載の商品の価格については、消费税は含まれておりません。•営業時間=平日 AM 10:00 へ PM 7:00、 日祭 AM 10:00 〜 PM 6:00 


















































































































































































Z.s STAFF PRO68K Ver2.0( ツァイト） . 

Z’s TRIPHONY デジタルクラフト（ツァイト） . 

テラッツォ（ハミングバード） . 

KAMIKAZE ( サムシング • グッド） . 

EW&EI ( イースト〉 . 

C&Professional Pack ( マイクロウ:!:アジ ヤノ ン ）" 

Final Ver3.2 ( エーエスピー） . 

DATA PRO68K CZ220BS . 

CARD PR068K CZ226BS . 

〇 comoiler PR068K CZ2I I し S . 

0S-9/X 68000 CZ2I9SS . 

AI-68K CZ234 し S . 

THE 很袋 V2.0 GZ224 し S . 

SOUND PR068K . 

MUSIC PR068K CZ21 3MS. 

Sampling PR068K CZ2I5MS . 

MUSIC-studio PR068K 237MS . 

MUSIC-PRO68K CMIDO 247MS . 

New-print Shop 22IHS. 

Communication 223CS . 

C-TRACE68 Vor.3.0( キャスト） . 

サイクロン EXPRESSa68. 

G68K Ver2 PRO . 

THE FILE PROFESSOR ( ロゴシステム） . 

G ツール（ザインソフト〉 . 

た一みのる 2(SPS 〉 . 

マジックノレット（ミユージカノレプラン〉 . 

Hypor word CZ-25IBS. 

• ゲームソフト 20%OFFOK. グ（一部ソフト除く〉 


•定価¥ 
••定価¥ 
••定価¥ 
••定価¥ 
••定価¥ 
•定価¥ 
•定価¥ 
••定価¥ 
•定価¥ 
•定価¥ 
•定価¥ 
••定価¥ 
••定価¥ 
••定価¥ 
•定価¥ 
••定価¥ 
••定価¥ 
-定価¥ 
••定価¥ 
••定価¥ 
•定価¥ 
•定価 V 
'•定価¥ 
•定価¥ 
•定価¥ 
••定価¥ 


58,000 -► 特価 ¥ 39,500 
39,800 岭 特価 ¥27,500 
19,800 岭 特価 ^! 

68,800 岭 特価 Y 45,500 
38,800 岭 特価 ¥ 29,500 
58,800 岭 特価 ¥ 43,000 

38, 〇〇〇 峙特 fmyno.intT 

58, 〇〇〇岭 特価 ¥ 40,500 

29,800 岭 特価 TEL 下さい。 
39,800 岭 特価 ¥ 28,500 
29,800 岭 特価 ¥ 20,700 
188,000 岭 特価 TEL 下さい。 

9,900"* •特価 ¥ 7,400 
15,800 岭 特価 ¥11,300 
15,800 ■►特価 ¥ 13.300 
17,800 岭 特価 ¥12,500 
15,800 ■►特価 TE し 下さい I 

28,800 岭 特価 ¥ 20,500 

19,800 *4 •特価 TEL 下さい,， 
19,800岭 特価¥ 14,200 
98,000_ 特価 ¥50,000 


98, 

22 , 


•定価 ¥ 19,8004 特価 y 1 Hinorr 

•定価 ¥ 39,800 ■» 特価寥3 _ lOOCT 


ーナー（送料 ¥500) 


(g)CZ-8NSI . 定価 Y 188.000 ►特価 ¥145,000 


•定価 Y 69.800 ►特価 ¥ 

定価 Y 33.100 ►特価 ¥ 

•定価 Y 19,800 ►特価 ¥ 

•定価 Y 35,000 ►特価 ¥ 

•定価 Y 38.000 ►特価 ¥ 

.定価 Y 79,800 ►特価 ¥ 

•定価 Y 138,000 ►特価 ¥107,000 
•定価 Y 49,800 ►特価 ¥ 38,200 
定価 Y 79.800 ►特価 ¥ 

•定価 Y 26.800 ►特価 ¥ 


54,000 

25,000 

15.500 

26.500 
28,600 
60,000 


(B ； CZ-6VTI . 

◎CZ-6TU. 

◎ BF-68PRO. 

(E>CZ-6BEI . 

©CZ-6BEIA. 

◎CZ-6BE2. 

<H)CZ-6BE4. 

① CZ-6BFI . 

⑪ CZ-6BPI . 

OOCZ -6 BMI . 

(UCZ-6EBI. 定価 Y 88,000 ►特価 ¥ 

⑽ AN-S100. 定価 Y 36,600 ►特価 ¥ 

(/VDCZ-6SDI. 定価 V 44,800 ►特価 ¥ 

CO)CZ-8PC3. 定価 Y 65,800 

(0CZ-8PC4. 定価 Y 99.800 

(Q) CZ-8PG1. 定価 Y 130 • 000 

(g)CZ-8PG2. 定価 ¥ 160.000 

⑤ CZ-8PK10 . 定価 ¥ 97.800 

⑦ CZ-6PVI . 定価 Y 1 98,000 ►特価 ¥ 153,000 

(UJIO-735X . 定価 Y 248,000 ►特価 ¥190,000 

(g)C2-8BSI. 定価 Y 23,800 ►特価 ¥ 19,000 

WPI0-6BE1-A(l/0 DATA) I X PIO-6BE2-2M(l/0 DATA) I Y PIO-6BE4-4M(l/0 DATA) 
…… 定価 ¥25.000 ►特価 ¥18,000 I …… 定価 Y 50.000 ►特価 ¥36,50—0 I …… 定価 Y 88.000 ►特価 ¥64,300 


61，〇00 
20,300 

67.500 

28.500 
35,000 


P&A 超特価 
TE し下さし、〇 


中古パソコンは P & A におまかせ•グ 


その場で高価現金買取り•高価下取り OK// 

■まずはお電話下さい。 ■下取り•買取りでお急ぎの方、直接当社に来店、また 

03-651-1884 FAX：03-651-0141 は、宅急便にてお送り下さい。 

參下取りの場合 . 価格は常に変動じ C いますので査定額をお電話で確認して下さい。 

(差額は、 P&A 起低金利クレジットをご利用下さい〇) 

籲買取りの場合 . 現品が着き次第、2日以内に買取り金額を連絡し、振込み、又は書留 

でお送り致します。 

•近郊の方は、 P&A 本店まで、直接お持ち下さい。即金にて、¥1,000,000までお支払い致します。 


《便利な起低金利クレジットをご利用下さい》 

•月々¥1,000円から 0 K // •ボーナス払い 0 K (夏冬10回まで 0 K ) 
•支払い回数1回〜84回•お支払いは、8ヶ月先からでも 0 K . グ 


プリンター(ケーブル•用紙付）限定5台新品 （送料 ¥1,000) 


アイテム 

• HXD-040 (40 MB /23 ms ) . 定価¥ 118,000 ►特価 ¥ 88,000 

• HXD-042 ( 増設用） . 定価¥ 128,000 ►特価 ¥ 95,000 

アイテック 

• ITX -640(40 MB /28 ms ) . 定価 ¥.158,000 ►特価 ¥ 89,000 

• ITX-680 (80 MB /20 ms ) . 定価 ¥ 198,000 ►特価 ¥ 116,000 

• CZ-8PC3( カラー;莫字 24 ドット熱車云写プリンター） 

定価 ¥65,800 . 特価 ¥39,800 

• CZ-8PK8(24 ピン漢字プリンター 136 桁） 

定価 ¥ 152,000 . 特価 ¥49,800 

• CZ-8PC4 P&A 特選•グ（カラー漢字 48 ドット熱転写プリンター） 

定価 ¥99,800 . 特価 ¥59,000 

(〜MD-24FS5( オムロン） . 定価¥ 49,800 ►特価 ¥ 34,800 

⑧ MD-24FS7( オムロン) . 定価¥ 64,800 ►特価 ¥ 45,000 

<© コムスター2424/4 (NEC). 定価¥ 38,800 ►特価 ¥ 28.000 

(6) コムスター2424/5 (NEC) . 定価¥ 44,800 ►特価 ¥ 32,000 


P & A 特選パソコンラック（送料無料）移動自由(キャスター付) 



®3 段 ⑧4段 

875( H ) 口 酬 H ) 

X 580( D ) x 600( D ) 

X 610( W ) X 630( W ) 

¥9,000 ^ ^ >¥11,500 



广 ©5 段 

1280( H ) 
X 600 ⑼ 
X 620( W ) 

¥15,000 


中古パソコン(セットはモニター付）送料¥2,000 


• X 68000セット .► ¥ 180,000 

• X 68000 ACE セット .► ¥ 200,000 

• X 68000 ACE-HD セット . ►¥ 215,000 

• EXPERT セット ► ¥ 230.000 

• EXPERT-HD セット …… ►¥ 265,000 

• p R0 セット…………… ► ¥ 250,000 


• X 68000 PRO-HD セット . ► ¥ 270,000 

• EXPERT 11セット .► ¥ 250,000 

• EXPERTU-HD セット >¥320,000 

• PRO II セット . ►¥ 240,000 

• PR 01 I-HD セット . ►¥ 310,000 


アフターサービス 万全 

全商品保証付。専門の担当者がお客様の立場で対応します。 

初期不良、輸送トラブル etc . 

万が一初期不良、輪送トラブルが発生しました際には、即交換させていただきます ^ 


>定休日/毎週水曜日二第3水曜•木曜は連休とさせていただきます(祭日の場合は翌日になります） 


通信販売お申し込みのご案内 


〔現金一括でお申し込みの方〕 

參商品名およびお客様の住所•氏名•電話番号をご記入の上、代金を当社まで、現金 
書留でお送りください。(プリンター•フロッピーの場合、本体使用機種名を明記のこと） 
〔銀行振込でお申し込みの方〕 

•銀行振込ご希望の方は必ずお振込みの前にお電話にてお客様のご住所•お名前 • 
商品名等をお知らせください。 

(電信扱いでお振込み下さい〇) 

〔クレジットでお申し込みの方〕 

•電話にてお申し込みください。クレジット申し込み用紙をお送りいたしますので、ご記入 
の上、当社までお送りください。 

•現金特別価格でクレジットが利用できます。残金のみに金利がかかります。 

•1 回〜 84 回払いまで出来ます。但し、 1 回のお支払い額は ¥1000 円以上。 

起低金利クレジット率 


〔振込先〕住友銀行新小岩支店 
当 No . 263914 ㈱ ピー•アンド•エー 


回数 

3 

6 

10 

12 

18 

24 

36 

48 

60 

72 

84 

手数料 

3.0 

4.0 

5.5 

5.5 

10.0 

11.5 

16.0 

21.0 

27.0 

35.0 

42.0 


マイコン 

ビデオ 

ビデオテープ 



株 A 会社ピ ー• アンド•エー’ „ 0:00 〜 PM7:00 

亍124東京都葛飾区新小岩2丁目1番地19号 日祭: AM 10:00 〜 PM 6:00 

s03-651-0148Wt) 53 6510141 



•現金 誓留 及び銀行振込でお申し込みの方は、上記商品の料金に3%加算の上でお申し込み下さい。詳しくは、お電話でお問い合せ下さい。 


84回払いまで 0K. グ 


★頭金なし/★即日発送 


汉 M 超特価セ■ルでご奉仕// 


t 寄り下さい。専門係員が説明いたします。 

E で受付します)詳しくは電話にてお問合せ下さい。 
E の20%引き OK/ TEL ください。 


■ i 1 


X 68000 用ソフトコーナー（误料1ヶ〜5ヶまで¥ 500) X 68000 用ハードティスク（送料¥1 ， 00 0) 


超特価でクレジットが組める/ 











































































































































定価580円 


I ； 


1 




SOFT 

BANK 


ソフトバンク出版事業部 

亍108東京都港区高輪 2-19-13 
303(5488)1360: 営業部 
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東芝 DynaBooK / J - 3100シリーズ 
アブリケーシヨン活用誌「フ|■一/ 勺べ tJ 


f 靂 


IBM PC より移植が決定された日本語版主要アプリケーション • 
〇 S などの製品レポートまたは、 GUI やネットワーク関連の応 
用と実践 

NEW PRODUCTS 

[ 最新八ードウエアおよびアプリケーションのレビュー 

入門•活用 

DynaBook の活用や Windows 、 ネットワークなどをテーマに 
初級、中級、上級レベルの3段階で構成 

連載 _ 

[■エッセイやコラム、企業 ユーザー レポ—卜 


八ードウエアやジャンル別アプリケーションの活用 

DynaBook / J - 3100八ードの活用、アプリケーション、周辺機 
器、〇 S 、 通信、ファイルコンパート、付録ディスクのアプリケ 
ーシヨンの紹介など 


SPECIAL REPORT 


















表示偭格には消费税は含まれておりません 


mmmm 

掲載商品2万円以上趋鹊函測淡 


L IXB 日 000 シリ-ズ 

1 




PROS 


•yt 曠 、n rv ノ 八廿里，て v 

ット標準装備 

EXPERT !![ 


- 光磁気ディスク ユニッ ト - 


CZ653C 定価乎 28M0(L 
CZ663C 定価辛 39MQIL | 

肇次世代のインテリジェンス、 SX - WINDOW 搭載春知的ニュー 
スタンダードフオルム參 BIOS の改良によりハイスピード処理を実 
現•之聞パイトの大容量メモリを標準装備*拡張 I / O ボート4スロ { 
ット播準装備 

CZ603C 定狐 ¥"338^ j 
CZB13C 定価 ^ 48UlQaj 

• 次世代のインテリジェンス、 SX - WINDOW 搭載籲象微のフオ 
ルム、マン/、ッタンシ x イプ • BIOS の改良によリハイスビード処 
理を実現* 3 M バイトの大容量メモリを棵準装備 

SUPER l:l_J j 

•次世代のインテリジェンス、 SX - WINDOW 搭載••■チタン」力 
ラーのクオリティブラック ♦BOMB SCSI ハードディスク搭載•世 
界棵準 SCSI インターフェース標準装備*日 IOS の改良 ( CJ ： り/ 
イスビード処理を実現參 3 M パイトの大容量メモリを檷準装備 

ツクモ特価販売中 A / 


八ードテイスク- 


012013771999 


，商品の お問い合せは各店又は通販部撕ド J 


I 「 MIDI サウンドライブ in オータム j 

月大好評の MIDI ライブショーの第2弾です/ 

lililin 9月22日編)旧)午後3回 

_ (12:30/1;.: 30/2： 30 ) 3 0 分ずつ。 

tMil 九十九_闊7^店1階店頭にて、 
X 68000 # MIDi _ を使った楽しい 
演奏_イズ胃って景品が当る/ 
是非馬:ち寄り下さい。 


， ，， XB 8000 用 MIDI 5/5/3 
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シャープ アイテツク 

CZ-6M01 予約受付中/ I 丁 X 640 

定価 ¥ 丨 58 ,000 特価ヂ , r ジジ 

CZ - S 略 約受付中 ， IT XB 昍 

定価 ¥198,000 
特価 y//‘ 

(カラー：ブラックとグ1 


)SI ボード 

:-6BSl 予約受 f 


一流スーカー 

40 MB HDD 
限定特価 
¥59^00 


CA セット) ( B セット) 

は囊 — 一 / 

CM -64 . ¥129,000 

SX -68 M . ¥19,800 

_ Musicstudio Mu -1-¥19,800 

合計定価¥108,600 合計定価¥168,600 

ツクモ特価¥ ? Af ジジ ツクモ特価¥ 144.000 

( 消費税別途 ¥2,754) (消贄税別途¥4, 320) 

クレジット例(税込）月々 ¥5, B 30 X 1 咂払クレジット例(税込）月々 ¥7.107 X 24 回払 
! ★Musicstudio PRO -68 K V 彳•丨又は 、 Music PR 068 K(M 旧 I )のソフトの場合 
1 には¥8,000プラスになります0 


CM -32 L . ¥69,000 

SX -6 BM . ¥19,800 

Musicstudio Mu - l "¥ l 9,800 


XB 8000 用メモリーボード 


ア-トツール 


通信モデム S ソフ 


ACES PRO 


一流メーカー 

特価 Jt W / ¥594 ノ をフルヵラ-読み取り 

2MB 拡張 RAM ボード . ツクモ特価 Y 5 穸ジジ 


1MB 増設用メモリ—ボ_ド i リ-ズ内蔵用 

ツクモ. 


(消*税別途¥1,1 94) 


\mmo 


カラーイ メー ジユニット ー流メーヵー 

SIBiSB 2400ボークラス4 定価 ¥54,800 

5 1 2 ドット' 65 , 536 色の鮮やかな映像 ツクモ特価 y ぞでジジジ (消費税別途 ¥840) 


CZ - BVT 1 A 力。 

定価 ¥69 r 6 Ga 


4MB 拡張 RAM ボード . ックモ特価 F グヂ / % ク K デオポー ト； 

(消費税別途¥2,094) 

^2 MB と 4 MB は全シリーズ対応。拡張スロット用。 CZ -6 BV 1 定価¥21,000 


i r 


た〜*みのる 2 定価 ¥ n , 800 

ツクモ特価 y /5,ククク (消*税別途¥ 45 〇> 

Communication PRO-6BK 

ツクモ特価 消*税別途 ¥594 > 


S 勧めソク付 


^ ツール S ビジネスソフト ホビーソフト f 



SX-WINDOW 

^6 t 80 CL 

C compiler PRO-68K Ver.2.0 

¥^4 t 80 (L 

CYBERNOTE PRO-68K 


Hyper WORD 

¥39 t 800. 

マジックパレット 

^Y/6^30 

サイクロン Express a 68 

賴3,300 

デジタルクラフト 

Q¥SSJS(? 

Z’s STAFF PRO-68K Ver.2.0 

49300 


| Sim City 
ポビュラス 
^タンジヨンマスター 

r サンタ ーフレー ド 

ワンダラースフロムイース 
ヮールドコ-卜 

ギャラガ 88 
P クオース 



大路評入会畚篡集/ 

ドロ - 》 

も'及 


1 ¢ 


国内•外で活躍/ 

使って便利、持ってて安心/ 

ツクモグローバルカードは 
ジャックス • VISA 、 セン 
トラル • マスターとの 提携 
カードです。ツクモ各店で 
のお 買物が らくらくで吉る 
5えに、国内はもとより海 
外でのショッピングも OK / 

しかも18 歳 以上なら学生で 
ち OK / 

冬のボーナスー括払•金利手数料無/受付中// 
お申し込みは ( 03 ) 251-9898 又は各店で 


叫ぬ4 

浦 ㈣•- 


ツクモは「ス-パー X PRO SHOPj です0 ツクモ7号店 003-253-4199( 担当荒井） 

pri nn n 17=71 ctz=d M 1 便利で^な通懦販 売 ] 

nu uu f^r : 店 ： r : 

TAPF - )) _ J J IL — ■ニ ユーセンター店行 03-25 卜 0987 旧当 _ 


全国代金引き換え配達 

お 申 し込みは 003-251-9911 へ 
お 電話1 本/ 

配達日の指定もできます。 

クレジツト払い 

月々 Y 3,000 以上の均等払いも 
頭金なし、 夏 •冬ボーナス 2 回 

払いも受付中/ 

現金書留払い 

〒彳〇卜 91 東京都千代田区神田 
郵便局 私書箱135 号 
九十九 電機 祛通信販売部 oh/X 係 

銀行振込払い 

事前に a でお届け先をご連絡下さい。 
富士銀行神田支店(普) No . 894047 

九十九 電機 ㈱ 


店店店^ 
号号号 L 
512 

モ屋屋モ 
ク古古ク 
ツ名名ツ 
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HE ||SER，S UIORKS 


•5 いつふす 2 #GEM DROP 


パソケットなど，同人市場で流通している 
プログラムの紹介コーナーです。単に同人 
ソフトという枠でなくユーザーの作ったプ 
ログラム紹介して，個人で作った大規模な 
プログラム，ネット上のシェアウェアなど， 
広く紹介していきたいと思います。 

• 

同人ソフト紹介の第1弾として X 68000 
を中心とした同人サークル EXIZ の作品を 
2本紹介しよう。 

•ういっぶす2 ( X 68000 用) 

画面中の鍵を拾って鏡の扉を抜ければ1 
面クリア。障害としては，丸いパックマン 
風の敵キャラが追いかけてくる。 

一見するとアクション ゲーム 風に見える 
が，主人公キャラクタの女の子になぜか才 
プション （？） が3つついているというの 
が ゲームに パズル性を与えている。オプシ 
ョンの間隔を変えることで敵キャラをうま 
く停止させたり，すり抜けたりでき，最低 
限の危険性でことを運ぶのがゲームのボイ 
ントとなる。あまりに安全策をとっている 
とタイムオーバーになることもある。 

起動してゲームを始めると，前回までの 
最高面までの面セレクトモードになるなど 
の気配りもよい。基本システム以外にも面 
データを集めたディスクがあり，末長く楽 
しめる。 

通販価格基本システム 1，000円 

追加データ1〜3 各700円 

•GEM DROP ( X 68000 用） 

カラムスのようなハットリスのようなリ 
アルタイムパズルゲーム。画面上方から落 
ちてくる宝石を一定のパターンで消してい 
くというテトリス以来ありがちなパターン 
ではある。 

初心者モードでは宝石の色か形が3っ揃 
えば画面から消えるようになっている。上 
級モードでは消える条件がシビアになる。 
カラムスなどと違う点は落ちる場所を指定 
する際にブロックではなく，落ちる場所の 


面が進むと落ちて 
くる宝石の数も增 
え，速度も速くな 
つてくる。入門モ 
ードのほうがルー 
ルと して面白いの 
だが，プレイヤー 
の理解を超えた と 
ころでブロックカ< 
消えていくのは問 
題かもしれない。 



ういっぷす2の画面。キラキラした鏡が美しい。 
しかし，ただ走り回ればいい面とオプションを駆 
使しなければならない面との格差が大きいんじゃ 
ないかい？ という気もしないではない。 


ほうを動かすことだろう。左右がつながっ 
ているので，ときとして予想以上のブロッ 
クが消えることがある。 

グラフィック，ミュージック，プログラ 
ムなど総じて完成度は高い。宝石の落ちる 
場所は制限されていてもカクカク感はない。 
この点では一部の市販ソフトにも優る。こ 
の手のブロックゲームはやり込めばそれな 
りに面白いので，とりあえずおすすめ。 

通販価格 1，500円 

•入手方法 

今回紹介したソフトの購入希望者は以下 
のものを用意してほしい。 

1) 申し込み内容を書いた手紙 

2) 料金分の無記名の郵便小為替 

3) 返送先を 書いた 宛名 シール 

1) は当たり前。自分のほしいものを明 
記し，通販希望の旨を伝えること。 

2) は郵便局で買ってくる。名前を書く 
欄があるが，なにも書いてはいけない。料 
金はソフト代+送料分となる（送料はディ 
スタ何枚でも一律300円）。 

3) は発送をスムーズにし，郵便事故を 



防止するためにも必ずつけること。文房具 
屋で無地のタックシールを買っておくとよ 
い。どうしようもない場合は，適当な大き 
さの紙に自分の住所氏名を書いて同封する。 
トラブル防止のため，宛名シール以外のと 
ころにも自分の住所を書いておくこと。 

申し込みは以下の宛先に封書で。 

亍223神奈川県横浜市港北区箕輪町 
2-18-27 田 口方 
同人サークル EXIZ 

* 

さて，この コーナーでは 引き続き同人ソ 
フト，その他の紹介を行っていく予定。誌 
上での紹介を希望するサークルは， Oh ! X 編 
集室 「THE USER’S WORKS 」 係まで連 
絡を。ただし， スペースの 都合，およびソ 
フトの内容によっては掲載できないことも 
あるのであらかじめ了承してほしい。 
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C-TRACEB8 ver.3.0 S C-TRACEB8 TP //A 


C-TRACE68 ve「.3.0+ トランスピュータによるサンプル画像。従来 
は物体数の2乗に比例した計算時間がかかっていたため，レイトレー 
シングで複雑な物体を描くにはそれなりの覚悟が必要だった。そこで 
現れたのが交点計算を軽滅するポクセル分割だ。ポクセル分割は物体 
数が増えるほど効果が表れてくる。 

さらにトランスピュータを搭載すれば劇的に計算速度が向上する。 
どれくらい速いかというと，「ここで挙げた程度のレイトレーシングな 
ら手鞋に作れる j くらいには速い。 

いちばん大きな写真の再帰樹木の場合，1本の枝が4つに分割され 
て……というのを5段階再帰した結果，テキストデータに換算して 
32000行の形状データとなった。これがモデリング（データは C 言晤に 
よる自動生成)，テスト計算，本計算まで含めてひと晩がかりだ（デー 
夕生成プログラムの作成時間含む）。これを速いと見るか？ まだ遅い 
と見るか？ 




同系列のフラクタ 
ルでカラーマツピ 
ングとバンプ マツ 
ビングを作成して 
張り付けた地図。 
気のせいか，ポピ 
ュラスを思い出さ 
せる。 





透過率マッビングで描いたステゴちゃん，バンプマッビングの時計文字盤， 
まわりの中に青空のカラーマッピング（これもフラクタルで作った）を張 
り付けたもの。マッピングにもいろいろある。 



シャポン球の背景には上 
のような図形がマッピン 
グされている。映り込み 
を利用したトリッキーな 
画像。マッピングにはフ 
ラクタルがよく似合うよ 
うだ。 



これがトランスピュータボード。ボード上に 
並んだ8本の RAM。 これで 4M バイト。そう， 
4M ビットチップを使っているわけだ。隣に8 
本並べると8 M パイトに増設でき，さらに子 
ポードをこの上に4枚装着してトランスピュ 
一夕5台の並列計算が可能。 
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ポップアートツール CANVAS PRO-B8K 





シャープから近く新しいグラフィックアー 
トツールが登場する。先月もちらっとお知ら 
せしたように， X 68000 では初めてのドロー系 
グラフィックツールだ。開発も着々進んでい 
るようで，編集部でもその開発途中バージョ 
ンを見せていただいた0まだ，詳しいレビユ 
一記事が書ける状況ではないが，写真をご覧 
いただければ，どういうコンセプトのツール 
かなんとなくおわかりいただけるだろう。商 
品名は CANVAS PRO -68 K に決まったとか。 
ともかく期待の一作だ。完成を待ちたい。 


ドロー型 ツールの メリットは，少ないメモリで絵を表 
現でき，拡大しても滑らかなラインが崩れない。特に 
プリン ト アウ トする と違いがはっきり する。 なお画面 
はドロ ーオ ブジェク ト をスケル ト ンモードで編集した 
ときと，リアルモードで表示したときだ。 


複雑なドローオブジェク 
卜をいくつも組み合わせ 
て作成する。ドローオブ 
ジェクトは表示順位を変 
えたり，グループイ匕して 
編集したりもできる。ま 
た，作成したオブジェク 
卜をペイントセルにコピ 
一して，ドローセルと重 
ね合わせ表示もできる。 


'痛^！》^ 

‘觀_ 


CANVAS PRO -68 K では， 
ベジヱ曲線と呼ばれる 
ドローラインをもとに 
いろいろな図形を作成 
する。画面は円のコン 
トロール 情報を マウス 
でいじって変形させた 
ところ。 


J 州 : 


作成したオブジ x クトは自由に変 
形することができる。画面は複数 
のドローオブジェクトに対してべ 
ジェ縦変形というエンべローブ化 
を行った例。 
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今月も新しい情報は少なかった……。期待 
して待っていた読者の方々，ごめんなさい 
ね。もうちょっとすると，年末年始に出さ 
れるソフトがどばどば発表されると思うか 
ら，ね。もうちょっと，だよ。 



さあ，夏休み気分もすっかり抜けて，体 
育祭やら文化祭の準備で忙しい季節となり 
ました。皆さん，お元気ですか？ 

さてさて，今月は スペースがホン トに少 
ない！さっさとやらねばね。 

今月のトップは，シャープから発売され 
る熱血高校ドッジボール部サッカー編。お 
馴染みくにおくんが活躍するスポーツアク 
ションゲームです。 ファミコンで 発売され 
ていたので，きっと出るな，と思っていた 
読者も多いはず。トーナメントモードと練 
習試合の2つのモードが用意されています。 
しっかし，ドッジボールやらサッカーやら， 
そのうえケンカまでやっちやうんだから， 

くにおくんも忙しいやねぇ。 

お 次は， ブラザー エ業のハイドライド3。 
このゲーム， T & E の代表作ともいえるアク 
ティ ブ RPG で，ハイドライドシリ ー ズの完 
結編です。今回発売されるのは， PC -9801 な 
どで発売されていた“ハイドライド 3 SV ” 


の移植版， X 68000 の特性を生かした仕上がり 
になっているそう。発売は10月13日の予定 
です。お楽しみに。 

はい，次。アートデインクから第2次世 
界大戦を題材にしたシミュレーションゲー 
ム機甲師団が発売されます。取り込みを駆 
使したョーロッパの地図やセピア調の画面 
が，雰囲気をうま〈かもし出しています。 
このゲーム，ヘックスやターンはなく，リ 
アルタイムに進行していくので，テンポよ 
く進められるのがうれしい。詳しくは来月 
また紹介しますね。 

さてさて ，XI ューザーには うれしいお知 
らせ。延び延びになっていたボニーキャニ 
オンのプール•オブ • レイデイアンスがい 
よいよ発売されるもよう0この ゲームは 
RPG で，アドヴァンスト•ダンジョンズ. 
アンド.ドラゴンズという海外の テーブル 
トークの移ネ直版。う一ん，やりがいがあり 
そうですね。 

んでもって，マイ クロプローズジャパン 
の GUNSHIP 。 もう発売されていますが，フ 
ライト シミュレーションゲームです。 なか 
なか実際に操縦している気分にひたれてい 



期待票で大物2作がランクインだ！ 

I ポピュラス（含プロミストランド） I 


2 スーパーハングオン 7 t 

3 三国志 II 一 T 

4 ダンジョンマスター 2 i 

5 ワンダラーズ•フロム.イース I 0 T 

6 ギャラガ’88 6 

7 シムシティー ー初 

8 ソーサリアン 8 

9 グラナダ 31 

10 ワールドコート ー初 

トンネルズ&トロールズ 9 i 


とまあ今月はこんな感じです。ポピユラスの 
強さはいつもどおりですが，それを追いかけるの 
が スーパー ハングオンってのも妙ですな。 ロン 
グ セラー の ゲームは ほかにもありますが，こん 
なに得票に瞬発力のあるものはちょっとない。 
逆にいえばコンスタントに順位をキープできな 
い弱味があるともいえるんですけどね。 

三国志 II とシムシティーが， X 68000 版の登場 


前だというのにチャートに入ってきました。ど 
ちらもトップを争える強豪だけに，ポピユラス 
にとっては不気味な存在。大作と目されながら， 
いまだトップを取っていない三国志 II 。最近人 
気の海外ソフトの大御所だとだれしも認めるシ 
ムシティー。ポピユラスからトップの座を奪う 
のは，たぶんこの2作に絞られるんじゃないか 
な0 

ワンダラーズ.フロム.イースは5位まで戻 
ってきました。上と下を見ると「う一ん，ゃっ 
ばりこの辺になるだろうなぁ」という感じ。イ 
ース I • II の人気には届かないみたいです。 

今月の新人は，実質ワールドコート丨本でし 
た。ハガキでは「2〜4人の対戦がいい」「キ 
ャラクターがかわいい」などの感想がでていま 
す。 テニスゲームは 敵も少ないし，人気もある 
ジャンルなので伸びる要素は十分ですが，要 2 M 
というのがネックになるかも。 

では，次回「海外ソフト対決ーポピユラス 
対シムシティ ー j に，イナズマキイーツク！！ 

(浦） 
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機甲師団 



プール•オブ•レイデイアンス 


いもんです。空中にいる感じがなんとなく 
してくるから不思議なもんですね。 

それでは，いきなりタケルの情報です0 
ブラザーエ業ではただいま XI 用にセレク 
テッドソーサリアン 5 とヴァーチユアナイト， 
X 68000 用には FLY を発売中。セレクテッド 
ソーサ リアン5 は，ソーサ リアンシリーズ 
のシナリオ集。もう何もいうことはないでし 
よ う。ヴァーチユアナイ トは LOGIN ソフト 
コンテストの入赏作品で，横 スクロール タ 


イプの RPG です。 FLY も同じく LOGIN ソ 
フトコンテストの入賞作品で，こちらは磁 
力を持つ球をスピード調節しながらコース 
を回るゲーム。どちらもお手頃価格2,000円 
なのでサクサクッと遊ぶにはよさそうです。 
しっかし， XI て RPG ばっかりになっちゃっ 
たなあ。 

最後に，光栄からは三国志 II の X 68000 版 
が発売中，データウェストからは Misty 5 が 
今月末に発売される予定。じや，また。 


Oh ! X 読者代表，ポピュラス大会で優勝!(した人に負けちやった） 


8月号でお知らせしたポピュラス大会が予定 
どおり， 7 つの パソコン誌の 読者代表，およびイ 
マジ ニア 代表によってとり行われました。 

まずは， Oh!X の代表の紹介から。われらが Oh!X 
の代表は熾烈な全国大会の末(本当かなあ），横浜 
市にお住まいの大学院生，田中啓介君 (24) に決 
定しました。彼は大学の研究室で，日夜⑺対戦 
に励んでいたそうで，かなりの腕前。ハガキの 
文面によると「この大会は私のためにあるよう 
なものです」 とのこと。う 一ん，これで丨回戦 
で負けたりしたら，ただじゃあ…… 。 

さて，いよいよ決戦当日の 8 月 18 日（土)。 THE 
COMPUTER 館 6 階の大会会場に足を踏み入れる 
と，そこには ズ ラリと並んだ PC-980I が…… 。し 
かし，決戦場所の隣にはゲーム コーナー なる， 
自由に「ポ ピユ ラス」，「シムシティ—」を遊べ 
る場所が用意されていて，そこには X 68000 や 
FM TOWNS もあったぞ。よかったね （？） 

さて.われらが田中君の様子はというと，こ 
れが結構 リラックス している模様。一方，ほか 
の人たちはどうかなと見回してみると……，「や 
っぱり」，予想どおり LOGIN 代表はなにか衣装を 
用意している。 さすがは LOGIN 。 

それともうひとつびっくりしたのが，コンブ 
ティーク代表。なんと女の子（人？）じゃあな 
いか。う〜ん，編集者の趣味だろうか。うちは 
パソコン ギャルでも出せばよかったかな。 

そして気になるのが，イマジニア代表。 1 ■やは 
り，主催者の面目にかけて，年棒|億円ぐらい 


HI 


LOGIN 

POPCOM 

コンブテイーク 

テクノポリス 

0H!X 

0H!PC 

マイコン BASIC Magazine 

イマジニア 


で外人助っ人ゲーマーでも引き連れて来るんだ 
ろうか」とかと，いろいろ考えていたのだが 

. 。 実際にイマジニアの人から紹介されたの 

は，これまた女の人（イマジニアの社員だそ 
う）。いいなあ，むさくるしい男ばかりの中に花 
が2つ添えられたようで。しかし，これはぬい 
ぐるみで中に作者のピーター.モリニュー氏が 
入っているのかもしれないから警戒しようっと。 

いよいよ，丨時。戦いの始まりである。まず 
は，くじ引きで対戦相手の決定。うちの相手は 
Oh!PC に。いきなり，内部抗争か。いやな，雲行 
き。まあ，しょうがない，死んでもらおう。 

第1回戦 

Oh!PC の代表はなかなか手強く，混戦模様。そ 
れに加えて，機械の調子が悪いのか，ケーブルが 
悪いのか，しょっぱなからハングアップの連続。結 
局最後までハングが続き，勝敗も判定でうちの 
勝ちということになった。人口などを見ても最 
後にはほとんどこっちの勝ちは決まっていたと 
はいえ，ちょっとかわいそうだった Oh!PC 代表 
でした。初めのうちははしゃいでいた田中君に 
も壮絶な戦いに疲労の色が少し見える。 

第2回戦 

今度の対戦相手はィマジニア代表に圧勝した 
マイコン BASICMagazine の代表。 I 回戦の戦いぶ 
りを見たけれど，どれくらいの強さかはわから 
なかった。しかし，いざ試合が始まってみると， 
結構あっさり勝ってしまった。 

意外と早く試合が終わったので，もうひとつ 
のほうの対戦である LOGIN 対コンブティークに 

目を移してみると . 。 LOGIN 代表もさること 

ながら，コンブティーク代表の女の人もなかな 
か強い。これなら代表に選ばれたのも納得でき 
る，というぐらいなのでした。認識の甘さに反 
省することしきり。対戦の結果のほうはという 
と激戦の末， LOGIN 代表が見事勝利をおさめ， 
決勝戦へと駒を進めたのでした。 

いよいよ決勝戦 

さて，いよいよ LOGIN 代表との優勝争い。こ 
の LOGIN 代表，実は田中君の研究室でいつも対 



GUNSHIP 



田中君はなんと Oh!X 
をマウス パッ ドに使 
っているぞ！ありが 
たいやら，もったい 
ないやら（写真左)。 
LOGIN 代表は原始人？ 
(写真下） 



戦しているライバルだそうで，因縁の対決とい 
うか，世間は狭いというか。 

両者の対決は実際の戦いぶりもさることなが 
ら，舌戦のほうがこれまたすごい。ほとんど， 
周りのことなど気にもせず，研究室での対決を 
地でいってるなという感じでした。口では田中 
君のほうが勝っているようでしたが，戦いのほ 
うは田中君がだんだん不利な状況に追い込まれ 
ていってしまい， ゲーム エンド。 

というわけで残念ながら，田中君は結局準優 
勝に終わったのですが，がんばってくれました。 
皆さん，彼の健關をたたえてあげてください。 

会場で気になったのが，対戦には目もくれず 
に黙々と ゲームコーナーで 遊んでいる人たち。 
みんな，あんまり人の対戦には興味がないのか 
な。あと，見に来ていた Oh!X の関係者の多いこ 
と。みんな，ポビュラス好きだから。しかし， 
少しうちばかり騒ぎすぎたという感もあります。 
みなさん，どうもご迷惑をかけました。 

しかし，まあ並み居るゲーム雑誌の中で（ゲ 
—ム雑誌でない） Oh!X の読者代表が準優勝とい 
うのは，かなり名誉なことではないでしょうか， 
えらいえらい，と日記には害いておこう。とい 
うわけでポピュラス大会のレポート終わり（あ， 
ちなみに後日来日したピーター•モリニュー氏 
はそんなに強くなかったそうです）。 
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•プロテニスワールドコート 



友達とやるのが〇の 
テニスゲ■厶 

Yamada Jun" 

山田純二 

Kageyama Hiroaki 

影山裕昭 

X 68000 にひさびさに登場した正統派スポ 
ーツゲーム。 もともとはナムコの アー ケー 
ド版ですが， PC エンジンにも移植されてい 
るので知っている人も多いでしよう。対コ 
ンピュータでの必殺技も公開しちやいます。 



XB 8000用 5"2 HD 版2枚組8,800円(税別） 
SPS 00245(45)5777 


AM 1 : 20チャツチャカチャ〜。 

皆さん今晩は，「今日も元気でスポーツど 
ん！」の時間がやってきました。今日は新 
発売の「ワールドコート」の対戦を生中継 
でお送りしていきます。それでは，影山さ 
ん，山田さん，どうぞ！ 

からん ころ〜ん]> 

影&山：こんばんは〜。 

アナウンサー（以下ア）：おはようございま 
す。ごめんなさいね2人とも，わざわざこ 
んな時間に呼び出してしまって。 

山：まあ，暇でしたから。 

影：僕は，今日は山田君の泣き顔を見にき 
ただけですから。 

ア：おやおや，影山さんやけに自信ありそ 
うですね。 

影：もう以前の僕ではありませんからね。 
ア：山田さんはどうですか？ 

山：やってみればわかりますよ。 

ア：そりゃそうだ，というところで始めま 
しよう力％ 

影：それじゃあ，僕はチナチロパで。 

山：僕は，サボテン。コートはロンドン， 

1セツ トマ ツチで いいですね。 

影：いいよ（ポチ）。 • 

X 68000 :ラブオール （0 - 0)〇 
影：まずは，僕からのサービスゲームです 
ね。いきま〜す（パシツ）。 

山：そんなへなちよこサーブ，俺には通用 
せん（すかっ）！ 

X 680 Q 0 :フイフティーンラブ （15 — 0)。 
山：おゃあ？ 

影：はっはっは〜の，もひとつ“は”。この 
ゲーム，軽くキープさせてもらいますかサ 
ーブ （ハ 0 シツ）！ 

山：そうは馬屋のけつレシーブ（パシツ 
影：素直なレシーブ命取り，クロスあたた 
たたっく！ 

X 68000 :サーティーンラブ（30—0)。 

影：次いくぞ！ていっ（パシツ）。 

山：あじゃぱっぱ〜（スカツ）〇 

コーチ（以下コ）：山田！ なにやってん 

だ，俺が教えたことを忘れたのか。 

山：す，すいませんコーチ。 

ア：おっと，いきなりわいて出てきた U コ 
ーチ，「俺が教えたこと」とは？ 

コ：必殺技です。 

ア：はあ，そうですか。 

影：ふん，なにが必殺技だ。次のゲームも軽 
くブレイクさせてもらいましよう力、。 

山：ふっふっふ，聞いて驚け見てびっくり。 
必殺（これを使えば，ハムスライスでコン 
ドルに勝てるかもしれない）天井サ〜ブ（ポ 

ヨヨン）〇 


影：なんじゃこりゃ（スカッ）。 

ァ： おおっ確かに，意表をつ〈サーブ。コ 

ーチ，これはいったい . 。 

コ： まず，ボールを上げてすぐに空振りを 
する。次に， B ボタンでロブ。すると，今 
のような山なりのサーブが打てるんです。 
ァ： なるほど。 

さこ 最終 ゲーム 

ァ：ポイント，2 (影）一 5 (山），となり 
いよいよ最終ゲームカ％すでにカウントは 
30 — 40。調子を取り戻した山田に影山，苦 
しいゲーム展開となってしまいました。 

影：くっそ〜，俺の血と汗と涙の特訓はな 
んだったんだ。 

山：無駄だったんじゃない。 

影：ぬううう（パシッ）。 

山： これで，ひと思いに決めてやるレシ ー 
ブ（バシッ）！ 

ァ：あ一っと，前に出ていた影山の逆をつ 
いた痛烈なレシーブ，これで決まったか0 
影：飛んでくれ一！（バシッ） 

X 68000 :デュース。 

ァ： なんとかくらいついて，デュースに持ち 
込んだ影山。しかし，このあとすぐにダブ 
ルフオールト，アドバンテージ山田だが， 
両者必死のラリーを続けています。 

影：うおっ，とえっ，だ〜！ 

山： このっ，このっ，うりゃ！ げっ，し 
まった一。 

影： （にやり）はっはっは，ラッキ ー ボ ー 
ルをありがとう，まだ負けるわけにはいか 
ないぞス マーッ シュ！ 

X 680 Q 0 :アウト。ゲームセツトアンドマツ 
チ。 

影：うそだ〜。1ドットライン上にのって 
る I ゃないか。 

ァ： あ，影山さんディスプレイを揺すらな 
いで。 コーチ これはどういうことなんでし 
よ う力'。私には確かにライ ン 上にボールが 
のっているように思われるんですが。 

コ：そうですね，こればっかりはどうしよ 
うもないんじゃないですか。ときどきこう 
いったことが起きるようですね。 



ハデなすコートで4人でルンルン；' 
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ァ：そうですか，とりあえず山田さんの勝 
ち。山田さんどうでした，この試合？ 

山：影山さん，まだまだ修業が足りないよ 
うですね。 

影：うそだ，うそだ……。 

ァ： おやおや，影山さんいつまでもめげて 
いないで，今度は気分を変えてダブルスで 
もやってみません力、 

影：うう，いいですけど0山田君，ダブル 
スのあともうひと勝負やりましょう。 

山：どっちにしても僕が勝ちますけどね。 
ァ：すっかり熱くなってしまった2人。今 
度はダブルスですから，協力してがんばっ 
てくださいね。 

影&山： は〜い。 

てなことでダブルス 

山：どうせなら男女混合にしてみない？ 

影： いいねえ 0じ や僕コンドル （ポチ ）0 
山：じゃあ 僕はサボテンに します（ポチ）。 
影： コンピュータはマケロウとステッピイ 
でいいよね （ポチポチ ）0 コートはカラフル 
なニュー ョ ークに して ゲームスタート。 
X 68000 :チロリン。ラブ オール （ 0 _ 
0)0 

影：僕のサービスからね（ポンポンボン）。 
ステッピイごときに俺の稲妻サーブが取れ 
るかな？それっ！（バシッ）。あれ一？ 
X 6 B 000 :フオールト。 

ア： わずかにラインを越えてましたね。 

山：次はしっかりしてくださいよ。 

影：ああ（バシッ）。げっ，やばい。 

X 68000 :ダブルフ オール ト。ラブフイフテ 
ィーン （ 0 —15) 0 

ア：あれあれ。いきなりダブルフオールト 
ですか。 

山：ちょっとちょっと，真面目にやってる 
んですか。わかった。僕に負けて動揺して 
るんでしょ。 

影：ま，まさか。これは愛敬さ。これくら 
い サービスし なきゃ。ま， ハンデ かな。 

山：そのわりには冷や汗かいてますけど。 
影'•そ，そんなことないさっ。 

ァ： さあ影 山， 気を取り直して再び サービ 
スです。 

影：どりゃあ（バシッ〉。 

ァ：気合いの入った一発。さすがは男子プ 
口，球の速さが女子プロとは段違いですね。 
しかし，マヶロウも負けてはいません。体 
勢を崩しながらも球を返しています。 

山：チヤーンス（バ シツ ）0 
ァ：前衛の山田，マヶロウの返した球をす 
かさずボレー。これはうまい。しかしステ 
ッピイ，飛びついてこの球を拾ったあ。 



アナウンサーのおね一さんもグッドですよ 


山：この生意気な！（スカッ）やべっ，影 
山さんお願い。 

影：了〜解（スパコーン）。 

ァ：後衛の影山も前衛の動きをよく見てい 
ましたね。先ほどの敗戦の影響はもうないよ 
うです。前衛のステッピイは抜かれました 
が，またもや後衛のマケロウが負けずに球 
を拾っています。 

山：今度こそっ。ちくしよ一。それっ。し 
つこいぞ！ 

ア：今度は前衛同士の激しいボレー合戦0 
どちらが勝つのか？ おっと，ステッピイ 
がこれに耐え切れずロブを上げてしまいま 
した。これは山田のチヤンスボールです。 
山： このこわっぱが。チョコ•ザイ•ナア 
— (バシッ）。しまったアウトだっ。 

影：うまいっ。 

X 68000 :フイフテイーンオニル （15-15) 
山：？ 完全にラインの外側だったのに。 
コ：ダブルスになるとサイドラインが外側 
になるんです。 

山： あっそうか。 

ア：今のは見事なスマッシュでしたね。 

山：あ，どうもどうも。 

コ：それはそうと，読者から2人だけで楽 
しむなと クレーム がつきそうなので ゲーム 
の解説をしてください。 

山： U コーチから 教育的指導を受けてしま 
いましたね。じゃゲーム中断 （ ESC ポチ）〇 
影： ダブルスは女の子と和気あいあいと遊 
ぶもんだね。男同士でやるなら絶対シング 
ルス。やっぱり人間が相手だと数倍面白い0 
山： 噂じや4人で遊べる モー ドがあるそう 
ですよ。 

影：その噂は本当らしい。なぜマニュアル 
に明記しなかったのか，疑問だけど。 

山：やっぱり X 68000 C はジョイステイツ 
ク端子が4つ欲しい。あとライン際の曖昧 
な判定がゲームを面白くしてるのも事実。 
影：そうだよね。あの判定でゲームの流れ 
がガラッと変わるし。泣きたいときもあれ 
ば笑っちゃうときもあるよね。 

山：遊んでいてキャラクターに感情移入し 
ちゃうよね0ナムコにこのテのスポーツゲ 



セレクトモード。硬派と軟派，どっちを選ぶ？ 

ームを作らせたら業界一だと思う。でも2 
MB ないと遊べないのは辛いよね。てなとこ 
ろで，ぼちぼちゲーム再開といきますか 0 
影： いや，ダブルスはもうやめてシングル 
スにしよう。 

山：でもゲームの途中ですよ 0 最後までや 
らないとタイトルに戻りませんよ 0 
影：あま一い。この秘孔インタラプトをつ 
けば……。 

一 同：おお一っっ〇 

影：さっきの負けはマニュアルを読んでい 
なかったからさ。それに選んだキャラクタ 
一がいけなかった。僕はサボテンじゃない 
と駄目なんだよ。 

山： そういう言い訳の応酬も対戦ならでは 
の面白さですよね。 

一 同： ワツノヽツノヽツハ0 

ア：こ れから シングルスのリターンマツ チ 
が行われるところですが，残り時間がわずか 
になってしまいました。誠に申し訳ありま 
せんが，そろそろお別れしなければなりま 
せん。最後にひと言ずっどうぞ。 

影：サボテンが1番。 

コ：ハムスライスでしよ。 

山：チョコ•ザイ•ナ ァ〜。 

ァ：それではみなさん，さようなら〜。 

前方不注意，要 2 MI 

ゲーム性，完成度ともに，「う〜ん，よしよ 
し，う〜ん j なのですが，どうにかならなかっ 
たんですか，要 2 MB 。 初めてパッケージを見たと 
きには理解に苦しみましたが，ゲームを始めた 
途端「はあ」というためいきとともに，すべて 
を悟ってしまった。確かに，あれだけのサンブ 
リングデータとキャラクタデータを使えば ，I 
MB では収まり切れないかもしれません。それな 
ら ， IMB ユーザーの場合はサンプリングデータ 
をカットするなり，なんらかの対処をしてほし 
かった。といっても面白いんだよな，このゲー 
ム。特に対戦は燃える。こうなったら， IMB ユー 
ザーの人はメモリを増設して遊ぶしかない。よ 
し。 

(評価：満点5 ) 

完成度： ◎◎◎◎◎ 

キャラクター： ◎◎◎◎ 

おしゃベり： ◎◎◎ 

ガッツの勝利 （2 プレイ） ：◎◎◎◎◎ 
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COPYRIGHT © 1990 T&ESOFT Inc 
Made in Japan 


マルチエンデイング 
がうれ しい RPG 

Kaneko Syurvchi 

金子俊一 


T&E の最新作は，マルチシナリオタイプ 
の RPG。 今度の勇者は山賊に育てられた 
口の悪い好戦的な少年という設定。う〜ん， 
やはり RPG とはこんな少年も使いっぱに 
してしまうものなのね……。 



X68000 用 5 W 2HD 版2枚組8,800円(税別） 
TSE SOFT 0052 (773) 7770 


私が被害車の運転手，金子と申します。 
最近，ぶつけられ癖がついてしまって困っ 
てます。おはらいでもしようかな。 

さてこのゲーム，一般:的な ARPG と比 
ベて特筆すべき点は，経験値というものの 
存在がないということ，マルチシナリオで 
あるといった点でしよう力、。経験値がない 
点は， レベルアップ アイテムの導入という 
方法で実現しています。とはいえ，宝箱に 
入って いる アイテムで レベルを 上げてしま 
うのは，かなり強引なような気もしますが 
(たいていの人は宝箱を全部開けるしね）。 

そして，マルチシナ•リオということで R 
PG にありがちな“お願いします攻め”を 
表面的に回避することもできます。たとえ 
ば，“〇〇を取ってきてください”といわれ 
たとき， N 0を選択すると相手は引き下が 
ってしまいます。が，その場合次に何をす 
べきか途方に暮れてしまい，結局は引き受 
けたほうがよかったりする場合もあります。 

さらに， レベルを 上げるためにできる限 
り多くの冒険をすることになると思います 
ので，結局このゲームはごく普通の RPG 
として成り立っているようです。 

山賊の子はヨーグルト7 | ■II ■■ 

ウェーデル山脈の大いなる峰々が，神々 
しい朝焼けに染まる。朱光の毛織は瞬く間 
に山腹を駆けおり，大地に生命の息吹をも 
たらしてゆく。広大な針葉樹の森は，朱か 
ら深い緑へと彩りを変え，その偉容を現し 
始める。ここは，神聖サイア王国とウェイ 
デニッッ公国の国境近くの森林地帯。山脈 
越えの旅人が，その疲れた体と心を癒す静 

かな土地である。新緑に萌える大地を 〇 

「うるせえ！」 

俺の名前は雪印ナチユレ。こんなふざけ 
た名前を付けやがった親父は，まがりなり 
にも山賊の頭領だ。デイトウールの牙って 
いやあ，ここら I ；や知らないヤツはいねえ。 
気の短さなら天下一品，親父譲りともいわ 
れているが，親父にも負けねえつもりだ。 
ケイズニク：若，こんなところにいやした 
力 5 。さっきから，お頭が呼んでやしたぜ。 
ナチユレ：なんだ？ また昨日の喧嘩の続 
きでもやろうってんじやね一だろうな。あ 
の，こうるさいおっさんも，いい加減元気 
なやつだな。 

ケイズニク：まあ，どっちもどっ•ち，お互 
いさまじやないんすか？ 

ナチ ユレ： なんだ と一 っ！ 

ちっ，まっいいか。ケイズ ニクの 野郎は， 
あとでゆっくりと締めてやるとして，とり 
あえず親父のところにでも行くか……。 


ガラン：いよう，来たな，ろくでなし。今 
日はな，おめえが生まれてからちようど17 
年目。それを祝ってやろうてんだから，ち 
ったあ感謝しろ。ほら酒だ，酒だあ。 

ナチユレ：あんだ あ？ 祝宴だ あ？ てめ 
一， 昨日の仕返しにこの俺をハメよ一とし 
てんだろ。どっこい，こんな子供^?''マシに 
ひっかかるよ一な俺じゃねえぜ。 

ガラン：何をいってやがる，おめえも17， 
これからは，いっぱしの男として働いても 
らわにゃならん。親父としてこんな嬉しい 
ことがあると思うか？ え？ 

ナチユレ：… いいたい こ とはそ れ だけか？ 
ガラン：そこで初仕事だ。なあに，たいし 
たことじやねえ，セルトレの町にあるしけ 
た教会から剣を1本盗ってくりゃいいんだ。 
ナチユレ：ああ？ 剣だあ？ てめ一，俺 
をナメてんな。おうよ。まあ見てろってん 
だ。ほんじゃあな。 

ガラン：こら，まてい！ コリノ爺さんの 
ところで装備を整えてから行くんだぞ！ 
まったく，こうるさいじじいだぜ。ま， 
そり ゃおい といて。よし，装備を整えたら 
ケイ ズ ニクを 締めにでも行くか。 

ナチユレ：おう，ケイズ ニク， さっきはよ 
〈も馬鹿にしてくれたな，成敗してやる。 
ケイズニク：勘弁してくださいよ。そうだ, 
かわりに盗みのコツってやつを教えてあげ 
るってことでどうです？ 

なるほどねえ。盗みの道も奥が深いのね 
え。おかげで秘風剣サータルスを，楽に教 
会からいただけたぜ〇レベルも上がったし， 
まあ首尾は上々ってやつだな。あとは，あ 
のクソ親父に俺の実力を見せつけてやるか。 
さあて，ザノバ砦にでも帰るとするか。 

山賊の子は運命の子 — 

おや？ 女の子が僧衣の男たちに囲まれ 
ている。新興宗教の勧誘，いや新手のナン 
パかもしれないな。今年のトレンドは宗教 


だって，誰かがいってたような……。 

少女：きゃ-！ 

ちょっと違ったみたいだな。ふつ，俺の 



そんなに力いっぱい名のらなくても 
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出番だぜ！ 

少女：助けてください。 

ナチユレ：あとでメシに付き合えよ。 

少女：あなた，誰？ 

ナチユレ：俺？ 俺は雪印ナチユレだ。 
仮面の男：ぶわははは，雪印ナチユレ！ 
面白い名前だ。お前の名前に免じて，今日 
のところは引き揚げてやる。 

ナチユレ：お前の名前は？ 

仮面の男：暗殺:魔術団< ヴィーフォ〉の神 

団長，レシエル•カロスだ。 

ナチユレ：そう力％お前がジョーのパンチ 
で廃人になっちまった……。 

少女：それは力ーロス • リベラ。 

ナチユレ：そういう君の名は？ 

少女：ミリム•ルセアンよ。 

ナチユレ：電話番号は？ 

ミリム：この世界に電話はないのよ。 

ナチユレ：いや，いつもの癖で 〇 

が，砦に帰った俺を待ち受けていたのは， 
レベルアツプでも祝杯でもなく，血だらけ 
の仲間が大地に横たわっている，まさに地 
獄絵図のような光景であった。 

ナチユレ：なんだよ，これは！ 親父ィ， 
シヤレに しちやきつすぎるぜ〇 
ガラン：黒い布の男たちが現れて……。 

ナチユレ：わかった，もう話すな。 

ガラン：ばかやろう，本題はこれからだ。 
お前はわしの本当のせがれじやねえ。 

ナチユレ：げろげろ，橋の下で拾ってき 
たってのは，ほ，本当だったのか？ 

ガラン：ばか，お前が手にしているその剣 
の精霊が，17年前お前を連れてきたのだ。 
精霊：私は秘風剣サータルスの精霊。この 
子は運命の子，世界を光に導く運命の子だ。 
ガラン：じやじやじやじや〜〜ん。 

精霊：…それはベートーベンだ。ともかく， 
この子を頼んだぞ……。 

ガラン：そうして，おまえをわしに託した 
精霊は消えてしまったのだ。 

ナチユレ：どこまでが本当なんだ？ 

ガラン：すべてだよ。わしはもう寝るから 
な，がんばって世界を光に導けよ……。 

ナチユレ：親父 t -! 

山賊の子は旅に出た 

親父や仲間の仇をとるべく，俺は旅に出 
た0なぜかミリムも一緒だ。暗殺魔術団く 
ヴィーフオ > の噂を求め，サルトレの町に 
着いたはいいが，相変わらずシケた町だぜ。 
まあ，噂話ってのは酒場に集まるって相場 
は決まってるからな。夜になるのを待って 
俺たちはドリオル酒場に行ってみた。 

アル： おお，ミリム様ではありません力、 



健康状態が“泥酔”ってのもすごいな 


ビジュアルシーンにもいろいろパターンがある 



ミリム：あらアルじやない。 

アル： その横にいる小汚い山賊みたいな野 
郎は何者ですか？ 

ナチユレ：山賊とはいってくれるじやねえ 
の（当たってるけどよ）。 

ミリム：まあいいじやないの，旅は道づれ 
世は情け，火事と喧嘩は江戸の花（注 1) 
っていうでしよう0アルも私たちと一緒に 
旅に出ましょう。 

仲直りもかねて他の店で飲みなおすこと 
にした。ところがどっこい，.この町には酒 
場がひとつしかない。どうしてもはしご酒 
がしたかった俺たちは，サイアの街にやっ 
てきた。町ではなくて街というところにこ 
の街の大きさを想像してもらいたいね。た 
だひとりミリムが反対したけど，この辺じ 
やいちばんの街だし酒場ぐらいあるだろう。 
ナチユレ：この店で飲みなおしだあ。 

ミリム：わかったわよ。こうなりやとこと 
ん付き合うわよ。ングングング，プハ〜。 
ナチユレ：お前酒乱だったの？ 

ミリム：酒乱とはなによ，私と勝負しよ 
うってのね。え〜いぼかすかぽかすか……。 

ナチユレ：このやろ—ぽかすか 。 

警察：… トラ箱行きなさい，あんたたち。 

治安警察に捕まった俺たちはトラ箱に入 
れられちまったんだ。 

ミリム：なんでこんなとこにいるのよお。 
ナチユレ：おまえ，なんも覚えてないの？ 

ミリム：なんのこと？ 

ナチユレ：ほんっとおに，なんも？ 

ミリム：だから，なにをよう。 

ナチユレ：酒場で暴れ回ったの！ 覚えて 
ない？ 

ミリム：この上品なあたしがそんなことす 
るわけないじやない。 

ナチユレ：…こいつ本格的なトラだぜ。 
アル： 姫様，迎えに上がりました。 

ナチユレ：姫様あ？ 

カナン王：おお，そなたじやな，娘を救っ 
てくださったのは。礼を申すぞ。 

ナチユレ：はあ。 

カナン王：そこでだな，ついでといっては 


なんではあるが，エリスの首飾りを拽して 
きてはもらえぬだろうか？ 

ナチユレ：やっと RPG らしくなってきた 力 1 。 
カナン王：何かいったかの？ 

ナチユレ：いや，こっちのことだ。まあ旅 
のっいでに捜してやるよ。どど〜んと大船 
に乗ったっもりで侍っててくれ。 

カナン王：それはありがたい。それではつ 
まらない物ではある力 ? ，旅の支度をさせて 
あるから受け取ってもらいたい。 

なんだかんだいって レベルを 上げた俺は 
エリスの首飾りを捜す旅に出た。ああ，こ 
れから使いっぱ（注 2) の與髄を極めるわ 
けだな，こり ゃ。 やっぱ， RPG の 主人公 
は使いっぱだよなぁ。 

注 I :昔の偉いお奉行様（記憶では大岡越前） 

が本当にいった言葉。正しくは火事と喧嘩は江 
戸の恥である。いつからか江戸の花といわれる 
ようになった。 

注2:ぱしりともいう。クラスに最低 I 人はい 
る。使いっぱの君，落ち込まないで自分を RPG 
の主人公だと思おう。少しは気休めになるかも 
ょ。 

総評 

この ゲームの タイトルである ルー ン ワース 
はこの世界そのものの名前な のです。 

で， パッケージを 開ける と永久保存 版 デ ー 
タ ハンド ブックなんてものも付いてくるんだ 
けど，これが 使えない。その中にむちゃくち 
ゃ 細かい設定が 書いてあって，その上にこの 
話が成り立っているのだけど（ようするに 黒 
衣の貴公子編ってわけね)，実際に活用され 
る 部分は，最後に 載っているアイテムガイド 
だけ。 初めて読んだ ときは，あまりのめん ど 
くささに途中で寝ちゃったもんね。 

この おまけの 内容にちょっと凝りすぎた 分 
だけ，実際のゲームの 奥が深く思えてこなく 
なっているのではないかな。結局はマニ ユア 
ル プロテク トで 終わってしまっているのは， 
かなりもったいない 0 バックストーリーはプ 
レイヤーに想像させるほうが 楽しいと 思い ま 
すが，いかがなもんでしょう， T & E さん？ 

イース 度 （10 段階評価） 7 

音楽 5 

シナリオ 7 

グラフィック 6 

オーガスタへの期待 10 
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•闇の血族 



美少女探偵は 
超能力者？ 

Komura ^atoshi 

古村聡 


読ませるアドベンチヤーゲームとでもいう 
べきノヴェルウヱア0やっとこさ登場の新 
作はミステリアス アニメー シヨンアドベン 
チャーという思わず舌を嚙んでしまいそう 
なジャンルの「闇の血族」です0 



X 68000 用 5〃2 HD 版4枚組8,800円(税別） 
システムサコム S 03 (635)7609 


当初の予定よりちよっと遅れて登場のこ 
のゲーム （ 1力月やそこらなら遅刻のうち 
には入らんというのがこの業界の锭だった 
りもするんだけど）〇 サコムの ノ ヴェル ウ 
ェアの5作目にあたるわけであります力 5 '， 
今回はいままでとはちよっと趣が変わって 
映画仕立てのゲームになっているのであり 
ます。まさか，スタッフが締め切り間際ま 
で映画ばっかり見てたせいで納期に間に合 

わなかったんじゃ ，などと思ってしま 

う疑い';茱い私なのであります。 

ま，それはそれとして実はこれで結構映 
画好きな私のことでありますから，喜び勇 
んでこのゲームを侍ち望んでいたのであり 
ます。 

この「闇の血族」なのでありますが，い 
ままでのノヴヱルウェアでの，やれ近未来 
にドームができた，38万 キロのエレ ベータ 
ができた，というような SF チックな話と 
は180度，いや，まったく違って，なんと現 
代のとおきおのアパレル娘（決して暴れる 
娘ではなひ）が主人公。美少女名探偵魅 
由の繰り広げる ミステリアスアニメ ーシヨ 
ンアドベンチャー第1弾！なのでありま 
す。艶やかなファッション界を襲う奇怪な 
殺人事件。南米の血に隠された秘密とは？ 
そして魅由を待ち受ける血族の宿命は？ 

……なお，これらはパッケージに書いて 
あるままであって，これらの問題が解決し 
ない，あるいはどこでそれらのことが解決 
したのかよくわからなくても，私のせいで 
はありません。 

さあて“闇の血族”試写会 だ!— 

というわけで，こちらは「闇の血族」試 
写会会場前です。寝袋に入った人たちがご 
ろごろと並んでいる光景はまさに壮観なの 
であります。一応，念のために言っておき 
ますが，本当に試写会があったわけではあ 
りません。映画風に仕立て上げられたゲー 
ムなので，試写会としゃれてみただけであ 
ります。 

あっ，かあいい受付のおね一さん，この 
ごろごろとまるで築地のマグロのように転 
がっている人たちは，やっぱりこの試写会 
を見るために並んでいるんでしようか？ 
「いいえ， この人たちは制作スタッフで 
す。昨日，やっと今日試写するものが出来 
上がったんですけど，すぐにパート2のほ 
うの制作に入るので試写会が終わるまで， 

ここで仮眠しているんです」 

う一ん，たしかに試写会の招待券には# 
1(第1話という意味）と書いてある。そ 
うか，すぐにパート2が出るのか……。そ 


こはかとなく一抹の不安が裘をよぎるの 
であります。 

さて，右手にポップ コーン， 左手にコー 
ラのコップを持って席に着くと，いよいよ 
試写会の「はじまり，はじまり」というわ 
けで'あります。 

すうっと，毎度おなじみの サコムのマー 
クが消えると今度は NOVELWARE の文 
字がずずずずっっと出てきます。う一ん， 
最近は拡大 • 縮小が業界中の流行なのであ 
ろうか。ずずっ。 

どっかのテレビドラマ!? 

オープニング。 

東京•新宿の夜景。靖国通りだろう力 1 。 
伊勢丹が見える。 

画面は横にパンしていく。 

黒のマネキン人形が帽子を被った横顔を 
ショウウインドウのガラス越しに見せる。 
首の スカーフには シャネルの マーク0 
夜の道路に赤いテールランプ0 
遠く，西口のほうには高層ビルが見える。 
三井，住友，そして左の少し小さなビルは 
NS だろうか……。 

そして，タイトル0 “闇の血族”の文字 

. 。背景は ダウン スクロール0 

オープニング終了。 

ここで，魅由の自己紹介。 

サンプリングの声が流れる。 

彼女は新宿にあるデザインスタジオ Yo 
の新人アパレルデザイナー〇 

マンションの 朝。ガラステーブルがある。 
ソファーやステレオも。カーテンが開いて 
光が差す。遠くから小鳥の声。そして子供 
の声。 

ここは魅由の部屋。出窓のピエロ。白い 
机に椅子。白いクローゼット。 

父親が このマンションの オーナー0彼女 
は世間でいう「お嬢様」ってことになるわ 
け。 

……だそうである。いえ，別にいいんで 
すけどね。なん力％女の子の独り暮らし， 

そして東京のド真ん中で ワン ルームではな 



危険なイメージが赤い色で 
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い マンション（ワンルーム だって 月 10 万円 
じゃきかないし）という優雅な生活。思わ 
ず，浅野ゆう子とかが出てきそうな気がし 
てくる。カチ，カチ，カチ（マウスをタリ 
ックする音）。 

んで本筋はとし . . . 

魅由の持つ力とは……。桁外れの勘の銳 
さ，常人にはない強い第六感。調子しだい 
では未来予知もできる。電話のベルが鳴っ 
た瞬間に誰がかけてきたかもわかる 。 

電話のベルが鳴った。その瞬間，危険な 
イメージが脳袈を走った。 

マリーが死んだ。唯は泣きじゃくりなが 
ら電話口でそう言った。マリーが殺された 
と。 

マリー•富岡。通称クイーン。華麗な男 
役の似合う，メキシコと日本の ハーフで ス 
タジオ Yo の専属モデル。魅由の4つ年上0 
マリーの死体の中には赤い血がなく別のも 
のが詰まっていた。なぜマリーが？ 

スタイリストのリーンとともに魅由はス 
タ ジオ Yo にやって くる。 なにか異様 だ。 
中原さんもいる。……なに？なんで泣い 
ているの？ みんな，魅由たちが入ってき 
たことに気づかない。 

「唯が……，唯が殺されちまったよ才 
ッ！」 

……魅由はその夜，夢を見た。遺跡のよ 
うだった。夜の森。そして湖。……建造物 
……見たことがある。あれはマヤ文明の… 
…ユカタン半島の……神殿，そして彫像。 
こっちを向いている。なにか神がかった彫 
像。 

そして，どこかから声が， 

「……流浪の民百千が集い，その姿宇を 
神へと変容せしめしこの地に汝の真の姿あ 
りしや …… J 

最後のなにか，詩の一節のような声。そ 
の声は魅由自身のものだった。これはいっ 
た L (「姿宇」ってなんだろう？）。 


そういうわけで，このゲームはこのあと発売 
予定の完結編あってのパート丨で，現時点での 
評価はちょっと避けたいと思います。内容に関 
する評価は完結編が出てからということにさせ 
てもらいましよう。 

それにしても，ディスクに入りきらない，あ 
るいはシナリオが大きすぎてひとつのゲームに 
はできなかった，というのであれば前後編の2 
つに分けるのではなく，無駄なところや本筋と 
はあまり関係ないところを削って I 話にまとめ 
るべきだったと思う。前後編に分けた結果.無 
駄な描写や表現（前半部の自己紹介，シャワー 
のアニメーション）が多くなり枝葉の部分ばか 



ここがスタジオ Yo 


そして朝。魅由は喫茶 FELICS へと向 
かった。 マスターに よると，唯の直接の死 
因は刺傷からの大量出血。頭部，心臓，下 
腹部をメツタ突きにされていた。そして， 
「唯の死体の血も赤くなかったそうです 
よ……」 

唯も身体中の血液がなく，別のものにな 
っていた。死体の周りには赤い血が飛び散 
っていたというのに。 

オーこ 来週の 〇〇〇〇〇は 

まあ，さわりだけ紹介すると，こんなお 
話なわけです。 

しかし，同じノヴェルウェアの「ドーム」， 
「38万キロの虚空」でも思ったんですが， 
ちょっと設定が消化不良じゃないでしょう 
か。あれだけ，いろいろ設定を細かく作っ 
ていながらそれが十分に生かされてないの 
はとても残念です。 

つまり，どういうことかというと，「魅 
由は新宿のスタジオ Yo 」 のデザイナーな 
んでしょ。なぜ，作者は新宿ということに 
したのか？ あれだったら南青山でも表参 
道でも関係ないんじゃないでしょうか？ 
それになにか新宿と南米を結ぶ線があって 
もよかったのではないかな。 

たとえば， NS 地下や小田急で南米マヤ 
文明展がある。そこで，そういえばおばあ 
ちゃんがブラジルだっけと思い出させる 
(あるいは南米方面には誰と誰がいるとい 


り見せてしまい肝心の幹の部分がぼやけてし 
まっているようだ。 

自分たちの作った，設定•脚本•プログラム 
がもったいない，かわいい，出してやりたいと 
いう気持ちは私もとてもよくわかる。が.ゲー 
ムをする人が気持ちよくゲームを終了するため 
に，あえて自分の害いたシナリオを削りデータ 
を打ち捨てる。たとえ，結果的に自分の作った 
ものの半分，1/3しか見せることができないこ 
とになってしまっても，それこそがプロのなす 
べきことであり，プロの厳しさなのではないか 
と思うのだが。 

完結編に期待しよう。 



—瞬，女かと思った 


うのを思い出させる）。昼間の東口の雑踏 
のなかで例の詩の文句が聞こえる。え，な 
に？ 空耳？という効果が使える。真夜 
中の誰もいない新宿地下道で例の詩が聞こ 
えてくる（今度は結構不気味なイメー ジが 
出る）。そして，成田空港で「そうだ，メ 
キシコへ行くんだ！」と思わせる。 

こういういう感じで設定をうまく使えば 
いろいろなやり方で演出できるのに，ただ 
夢の中で1回だけ出しちゃう。ちょっとも 
ったいないんですよねえ，やっぱり。そん 
な細々した設定は作らなくてもいいんだか 
ら（作ってはいけないとはいいませんが)， 

1つひとつの設定を生かすことを考えてス 
トーリーを作るようにしてほしいと思いま 
す。 

さて，今回の話は前編ということで，な 
んと次回の予告もついています。これがま 
あとんでもなくよくできているんです。も 
うサンプリングあり，拡大•縮小ありのあ 
りありモードでほとんど映画のよう。あま 
りによくできているんで，もしかしたらこ 
の予告編を見せたいがためにこのゲームを 
作ったんじゃないかと思ったりしました。 
はい。 

それと，よくできているといえば，オー 
プニンダ。私が新宿を知っているからそう 
思うのかもしれません力 ？ （あるいは画像取 
り込みだから当たり前なのか）新宿という 
街の無機質な感じがよ〈出ていて，設定が 
生きている部分だと思います。 

さて，ストーリー的にも，まだ，序盤と 
いう感じで終わってしまったこのゲーム， 
どういう人物かわからないうちにみんな殺 
されてしまったのはご愛敬としても，この 
先，どう展開するんでしょうね。そうやっ 
て考えると，このペースだととてもあと1 
回くらいじゃ終わらないような気がするん 
ですが，完結編としっかり予告に書いてあ 
るし，とりあえず次回に期侍ということで 
すね。 

それではみなさん次回までサヨナラ，サ 
ヨナラ，サヨナラ（やると思ったでしよ〉。 


厳しいかもしれないけど‘ 
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•提督の決断 



提督の艦隊 
沈黙の決断 

Ogikubo Kei 

荻窪圭 


光栄の鬼才，シブサワ • コウの新作は太平 
洋戦争を舞台にした本格派シミュレーシヨ 
ンゲーム。君の冷静な判断力で実際の歴史 
では負けた戦いをも勝利へと導こう0まあ， 
連合国側でやるのもいいけどね。 



X 68000 用 5 W 2 H □版3枚組14,800円(税別) 
光栄 0045(561 )6861 


なにやら8月15日は終戦記念日だそうで 
ある。私は生まれてなかったから知らない 
が，毎年「連合艦隊」やらなんやらの和製 
戦争映画をテレビが熱心に見せてくれるの 
で戦争があったことくらいはわかる。でも， 
「あ一そ一ゆ一もんだったんだね」とか感 
じるだけで，もはや他人事である。 

しかし，その他人事感が日本の豊かで暖 
かな戦後教育によるものだと知ったのは， 
台湾の女の子たちと飲んだときであった。 
あのときは日本語を喋れる留学生と，日本 
に遊びにきた英語と中国語しか喋れない元 
新聞記者と，秋葉原にハンディカムを買い 
にきた中国語しか喋れない旅行者と，日本 
語しか喋れない我々が入り混じって，“英語 
漢字混じり文”という恐ろしい筆談までし 
てしまうシュールな体験をさせてもらった0 
そのとき戦争の話題を持ち出したのはこっ 
ちであった。気になっていたからだ。そし 
て，台湾の人々（すべてかどうかはわから 
ないが）にとっては他人事ではないという 
ことだけはわかった。 

他人事かそうでないかはさておいて，侵 
略戦争はあったのである。核爆弾を落され 
た日本が原爆の日を記念するように，被害 
者は常に忘れないようにしている。終戦記 
念日くらい“もう侵略はしないぞ集会”で 
もすればいいのに，と思うのであるが，誰 
もやんないだろうな。鶏の頭なみに素早く 
忘れたがっているらしいから。 

そんなことを思いながら，「提督の決断」 

を立ち上げた私は CRT 上に美化された太 
平洋を侵略していくのであった。 

最初が面倒，最初が肝心 ■ 

「提督の決断」は例のシブサワ • コウで 
あるから，おなじみ，キャラクタのパラメー 
夕設定から始まる。山本五十六などといっ 
た有名人が居並ぶ中， スペース キーを押す。 
勝とうと思ったら，特化才能人材をたくさ 
ん作る必要がある。作戦会議用に作戦能力 
の特化したやつ，艦隊戦用に艦船能力の特 
化したやつなどなど。全部で120の数値を 
4つに振り分けるのだが，そのうち勇敢さ 
(こんなもんは役に立たない）以外のどれ 
かを80以上にしたいところだ。んでもって， 
作戦会議担当はひとりでいいので，あとは 
艦隊を任せられる将校にすべきだ。シブサ 
ワ.コウゲーム 全般にいえることだが， 「最 
初が肝心」なので時間をかけねば。 

シナリオはあの有名な“リメンバー真珠 
湾”から“ミツドウヱイ”，“最期の奉公， 
大和沈没”までいろいろある。が，私とし 
ては最初の“日米決裂”シナリオをお勧め 


する。これは“太平洋戦争すべてを最初か 
ら最後まで自分でやる”という地獄のシナ 
リオだ。そのかわり，史実を睨みながら負 
けるとわかっている作戦はしなくて済むし， 
じわじわと戦況をコントロールできる。し 
かし，時間だけは飽きるほどかかる。夏が 
終わってアキが来るくらい時間がかかるぞ。 
心しておくように。 

て、、， 母港の呉から話は始まる。プレイヤー 
は海軍司令官で，陸軍はコンピュータが勝 
手にやる（ろくなことはしてくれないが)。 
最初はたくさんの艦船とたくさんのお金と 
たくさんの暇があるわけで，ここで楽をし 
ては楽しめない。次に述べるようにすれば， 
明るい艦隊戦に臨め-るというもんだ。 

まず，艦隊の編成0デフォルトだと第1 
艦隊に空母が集まっているから，第1艦隊 
は空母4隻くらいにして，残りは別の艦隊 
へ移す。んでもって，各艦隊は敵基地攻略 
用と味方基地防衛用 • 支援用に分けて編成 
し，決して中途半端なものは作らない。 

編成が済んだら，補給をする。一度に全 
部やると20日以上かかるので，最初に出撃 
する3艦隊くらいにしておく。 

作戦会議を開いて重点作戦目標を決める。 
作戦能力の高いやつを会議に出すと希望が 
通りやすい。作戦能力が低いと陸軍の提案 
を飲むはめになり，それは敗北への道だ。 
間違ってもハワイなどといってはいけない。 
まずは，原油のとれるソロンやサンダカン 
だ。 

補給が終わるまでやることがないからと 
いって寝ていては駄目である。会議を開い 
て技術開発なり兵器生産なり（航空機は絶 
対に足りなくなるので，たくさん作るべし） 
工作員の派遣なり外交政策なり，とにかく 
怠慢しては勝てない。 

補給が終わったら，残りの艦隊を補給に 
回し，補給済み艦隊は作戦開始である。第 
1艦隊は一度出港すると戦果を上げて戻る 
義務があるので，重点作戦目標へ突き進む。 

最初は敵も元気なので，こちらの基地を 
狙ってくる。敵艦隊の攻撃を受けたらそこ 



港へ攻め込んだところ 
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へ艦隊を直行させよう。敵艦隊には雷撃機。 
頑張れ空母！である。 

歴史なんか狂わせろ ■ 

そんなこんなで，史実に従った宣戦布告 
がなされる。でも，真珠湾なんか行かない。 

前半は余計な領土拡大を狙わず，じわじ 
わと，うろうろする敵艦隊を叩きつつ，富 
国強兵殖産興業文明開化滅私奉公……。- 

海で出会うなり基地へ空撃なりして始ま 
る戦闘は，相も変わらず HEX 戦。でも面倒 
臭くはない。なぜかというと，自分で戦う 
必要はないから。第1艦隊以外は勝手に戦 
ってくれるし（それがうっとうしいときは 
HEX OFF にすると結果だけ教えてくれ 
る），第1艦隊だって司令官に任せておけ 
ばいい。 もっとも，コンピユータは往 々に 
して間抜け（というより戦闘のアルゴリズ 
ムが目の前の戦果を求めるよう組んでるみ 
たい）なので，「この大バカ者！」と歯を嚙 
みしめるのは精神衛生上よろしくない。こ 
ちらが圧倒的戦力のときを除いて，第1艦 
隊くらいは自分で戦いたいものである。 

しばらくすると，史実に従って大和やら 
武蔵やらがいろいろと完成する。私のよう 
に大和を空母に改造するなどとやって遊ん 
でいたら（空母大和！……私の歴史では 
“宇宙戦艦ャマト”はなく “宇宙空母ャマ 
卜”なのだ)，あとで工業力が足りなくなる 
ので注意。 

敵さんはある程度戦力をずたずたにされ 
ると， ハワイに こもるようだ。だから，そ 
うなったら（昭和18年くらいかな？）連合 
国の（つまりアメリカの） ハワイに 向けて 
富国強兵。技術力は上がっているはずなの 
で，艦船を修理に出してパワーアップした 
り，新兵器が開発されたらそれを搭載でき 
るように改修したりと仕事は多い。 

でもって，東南アジアを野放しにしてお 
くと，いつの間にか敵基地からの攻撃を受 
けて陥落したりするので，基地への補給は 
忘れずに。空母に雷撃機を積んだ小艦隊を 
敵輸送船襲撃用に洋上に置いておくと便利 
である。 

私なんか富国強兵政策の一環として，ソ 
ビエトや タイと同盟を結んでしまった。イ 
タリアはもう降伏してるし，歴史はシッチ 
ャカメツチャカである。なんてったって， 
昭和19年というのに，日本はジ ヱット 戦闘 
機を開発してる（陸軍がぶつぶついうのも 
構わず，航空技術に金を注ぎ込んだのだ） 

し，ミッドウエイは傘下だし，ガダルカナ 
ルも占領下，ホンコンも領土という具合な 
のである。 



僕の大事な空母大和 



ほら，日本とソ連とタイの三国同盟 


で，ハワイへ総攻撃をかけ，敵艦隊を殲 
滅すれば“勝利”であるが，それがなかな 
か大変（当たり前だ)。 

ヨーロ ッパ では史実どおりに ノルマ ンデ 
ィ上陸はするわパリは陥落するわで，ドイ 
ツが降伏する前に頑張っておかないと孤立 
無援になってしまうので注意だな。 

こうしてこうしてこうして，戦況は泥沼 
となり，原稿は進まず，ほかの仕事にまで 
影響が出て，エアコンのない部屋で X 68000 
と私の脳味噌は熱暴走するのであった。 

歴史 SL G は教育か7 ■■ — 

というわけで，義務は果たした。ここか 
らは好きなことを書く。 

あ 一， かったるい（いきなりですみませ 
ん)。 

こういうゲームは，戦闘しているときと 
次の作戦を練っているときが一番楽しい。 
しかし，一番大切で一番時間のかかるのが 
作戦と戦闘の間なのである。完全修理には 
何力月もかかるし，第1艦隊はいちいちマ 
ウスで少しずつ移動せねばならないし，マ 
ップはいちいちデイスタに読みにいく。 

何が いけない のか考えてみると，プレイ 
ヤーは戦況を見ながら「次はどこを攻めよ 
う」とか「次の作戦はあそことあそことあ 
そこだ」などと考えるのである。で，「行く 


ぞ！」「おう」となるのであるが，「次はこ 
うするぞ！」と「行くぞ，おう！」の間の 
準備にやたら手順があるのだ，悠久の時間 
が流れるのだ。疲労の原因である。 

光栄の ゲームは E&E 。 「エネルギー&エ 
レクトロニクスの 東芝」 ではな〈て， 「エン 
ター テイ メント&エ デュケイ シヨン」 だ。 
つまり，遊びながら勉強するというありが 
たい お 題目だ0その陰で歴史 シ ミュレ ーシ 
ョンを 鮑きもせず送り出してきた。 

しかし，である0この歴史 シミュレ ー ショ 
ンシリーズが何を生み出したかというと， 
「歴史，好き？」と問われて「はい」と答 
えようもんなら「信長と秀吉と家康で誰が 
好き？」とか「三国志がどうとか，かんと 
か？」という風潮だ。これは光栄のせいで 
はなくて，うっとうしい世間での風潮なの 
だが，いつから「歴史 J =「日本の戦国時 
代」 or 「中国の戦国時代」になってしま 
ったのだろう。わたしゃどっちにも興味は 
ないが，歴史は好きである。特に古代ロー 
マやョー ロッパの中世史が好きである。勝 
手に歴史の範囲を狭めてもらいたくないの 
である。光栄さん，次は「ガリア戦記」で 
もやりませんか？ 

でもまあ，単なる戦争 シミュレーション 
が 「エン タ ー テイメント& エデュケーショ 
ン」なのだから，いい時代になったものだ。 


この道はどこへ行く道 


光栄の歴史シミュレーションシリーズも「信 
長の野望」スタイルを継承したまま，とうとう 
「明治維新」どころか，「太平洋戦争」まで来 
てしまった。この道はどこへ行く道，だ。 

「提督の決断」も X 68000 用に BGM や効果音が 
ついたり，フルマウスオペレーションになった 
りしたが，良くも悪くもシブサワ•コウそのも 
のである。ついでに RAM ディスクやハードディ 
スクへのインストール機能もほしかったところ 
だ。ディスクをガシガシ読みにいきすぎるから。 

で，そろそろ HEX を使った大規模戦争ものに 
みんな飽きてもいい頃ではないか。たとえばァ 
一トディンクは同じ太平洋戦争でも HEX を使わ 
ない，指令だけすれば米粒ほどの艦隊がノソノ 
ソと CRT 上を動いていくお得意の箱庭観賞型シ 
ミュレーシヨンを（成功したかどうかはともか 


く）作った。 HEX というのはしよせん，ボード 
ゲームからの借りものに過ぎないのだ。 

同じ HEX でも，こんな大規模の戦争ものでも 
大陸ものでもなく，たとえばボードゲームの「夕 
クテイクス」のような市街戦だっていいではな 
いか。 

まさか次が「ベトナム戦争もの」にとは思わ 
ないが，そんな泥沼は避けてもらいたいと思う。 


シブサワ • コウ度 9 
終戦記念日度 8 

HEX 度 7 

操作性 6 

病みつき度 8 

安定度 8 

保守度 10 


スカっとさわやか度 3 
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AFTER REVIEW 


StUiES 


ゲームに もいろいろあって，お手軽なもの 
もあれば，じっくりやらなきやいけないも 
のもあるんですよね。あなたはどちらがや 
りたいですか。まあ，両方を交互にやると 
いう のが一 番いいかも。 




►今月，（記事の中で）一番わらけたので。 

愛知県•志賀宗一 (17) 
►電波のオリジナル（アレンジモード）が気 
に入ってしまった。栃木県•毛塚健次 (17) 
►むしようにマッピーか，ラリ ー X をやりた 
くなる。 栃木県•鹿又健 (21) 

►音楽がよかったから。 

東京都•辻康介 (16) 
►なにも考えずに楽しめる。グラフィック， 
サウンドもよいほうだ0 

京都府•岡田伸一 (22) 
►な……なつかしい。東京都•竹川忠 （17) 

► X 68000 のはやったことないけど，昔から 
ギャラガが好きだから。 

福島県•捧宏太郎 (18) 
►いまさら，なんでか面白い。 

神奈川県•中村雅彦 (22) 
►ギヤラクテイック•ダンシングがいい。 

静岡県 • 山下禎久 (17) 

► X 68000 で一番手軽に楽しめるソフトだと 

思う。 兵庫県•木下達也 (18) 

►擎って，撃って，撃ちまくる快感！やめ 
られまへ〜ん！ 三重県•竹腰敦司 （19) 




▲神奈川県•丸藤俊之 


►画面がきれいだから。デンパだから信頼が 
あるから。 岐阜県•高橋賢 （18) 

► FM TOWNS でも， PC —9801でもないと 

いうゲームあるじやない。これがそう。 

大阪府•遠藤勇 (33) 
►このゲーム，うちの父さんのお気に入りと 
なってしまったようです。 

静岡県•小澤健一 (16) 
このギャラガ’ 88は PC エンジン版でやった 
という方も多いことでしょう。あれもなかな 
かよくできていたけれど， X 68000 版はさら 
によい出来。なんか高級感が漂っているんで 
すよね。本体が高いからというわけではない 
でしょうけど。やっぱり，音とか絵の鮮明さ 
が違うからでしょうか。効果音もほとんどサ 
ンプリング音だし，ちょっとしたしゃべりも 
入っている。ボスのアイキヤツチシーンもし 
っかり入っているしね。 

しかし， 3機合体したあとでやられてしま 
うと，もうやる気がなくなってしまって思わ 
ず電源を落としてしまう……。あきらめ力 ? 早 
すぎるんでしょう力、それにしても2機合体 
は役に立たない，まあそこがいいっていう話 
もありますけど。 

X 68000 用 5"2 HD 版2枚組8,200円（税別） 
電波新聞社 003(445)61 1 1 


発売中のソフト 


★三国志 II 

XI 用で先行発売されていた三国志 II が，お待 
ちかね X 68000 にも登場だ。劉備，曹操といった 
英雄になり代わり，数々の外交手段や計略，戦略 
を巡らして中国全土の統一を目指す。 X 68000 版 
では漢字も読みやすくなり，メイン画面にコマン 
ドメニューが出たり戦闘時にグラフィックが表示 
されたりと一段とクオリティアップしているぞ。 
X 68000 用 5〃2 HD 版3枚組14, 800円（税別） 

光栄 0045(561)6861 

★セレクテッドソーサリアン5 
TOP 10でも息のなが一い人気を保っているソー 
サリアン。読者からのシナリオコンテスト優秀作 
シリーズも，今回で一応完結。賞金丨万$を賭け 
て行われるレース「それゆけ！ ドトーのトライ 

アスロン」と，脱獄したワ_ウルフを捕らえる「封 
印」の2作のシナリオを収録。 

また，マガジンディスクには NEW ドラゴンモー 


ドもついているのでお買い得かも。 

XI turbo 用 5"2 D 版2枚組2, 900円（税込） 

ブラザーエ業 ( TAKERU ) 0052(824)2493 

★ヴァーチユア•ナイト 

遥か昔，すべての生き物を滅ぼそうとした魔人 
がいたが，とある魔術師が聖なる武器によって異 
世界へ封印することに成功した。いま再び世界の 
異変を感じ取った魔術師の後継者マスダミ•アー 
はその原因を探るため旅に出る。ログインのソフ 
コンで 3 rd Prize を獲得した横スク ロール 型アク 
シヨン RPG 。 6種の魔法の画面効果がウリ。 

XI 用 5"2 D 版2枚組2, 000円（税込） 

ブラザーエ業 （ TAKERU ) 0052(824)2493 

★ FLY 

ログイン ソフコ ン入選作。慣性力が働く円形の 
自機を操作し，コースを3周してタイムを競うア 
クシヨン ゲーム。ルールはシンプルだが，ツルツ 
ルの コースから 落ちないように回ろうとするとな 
かなか難しい。好きな面をプレイできるモード， 

I 面から順番にプレイしていくモード，ビデオ機 
能などがついている。 
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►初めはかったるいが，やり込むと面白くな 
ってくる。 静岡県•笠井博一 (20) 

►テーブルトーク RPG 派なので1票0 

東京都•國竹泰天 (16) 
► D & D がキライだから。 

京都府•岡本直樹 (17) 
►根気を養わせてくれるから。 

愛媛県•本田和正 (16) 
►フロツピー交換の苦労を味わいなさい！ 

徳島県•菅野宏和 (18) 
►いま，つまってるから（なんじやそれ)。 

兵庫県•中馬高嶺 (19) 
►テーブルトークでもやっていたし，なんと 
いっても装備の変化に伴い画面上の姿も変わ 
るのがいい！ 北海道•池内亮平 (18) 

じっくり腰を落ち着けてやると，かなり面 
白そうだけど，時間がかかりそう。そういう 
本格派のゲームだから一度はまるともうやめ 
られないでしようね。比較的時間が余ってい 
るという人にはぴったりのゲームではないで 
しようか。 


►はっ，はまる。いまのところ 14 X 12 が最高。 

愛知県•魚住雄一 (21) 
►タイトル画面の帽子をかぶった女の子が好 
きだから。 千葉県•竹沢裕利 （18) 

►対戦モードが面白い。 

東京都•木村亮 (17) 
►デモの巨大な四角を私は一生忘れない。 

静岡県•清水健太郎 (17) 
►初めて2つめのジョイス テイ ック端子に パ 
ッドをつないだ。 宮城県•小松仁 (17) 
パズル ゲームは もうなんとなく食傷気味な 
んですけど。やっぱりこういうお手軽なやつ 
にはついつい手を出してしまうんですよね。 
始めてしまうと結構燃えてしまうし，なんと 
いっても2人プレイがある0まあ，これもブ 
ロックを消す快感ということで，ありふれて 
はいるんですけど。それにしても最初のデモ 
は力が入ってますよね。どんなたいそうな ゲ 
ームが 始まるんだろうかと思っていると，あ 
の超シンプルな ゲームが 始まる，すごい ギヤ 
ップを感じますよね。なかなか笑える。 


►昔から（ I から）ブロンウインが好きっ！ 
北海道•西崎貴博 (15) 

►ブロ ンウイン，かわいいウ 

京都府•大谷将友 (17) 

►パッケージのブロンウインがかわいい！！ 

奈良県•森芳生 (14) 
►パッケージのブロンウインがめちゃかわい 

い。 東京都•清水健年 (19) 

►ブロン ウインが好き！ 

愛媛県•住友智代 (17) 
……別にいいんですけどね。なんかもう，ブ 
ロンウインが好きばっかりなんですけど……。 
内容のほうには意見がないんでしようか。ス 
トーリーと力 1 ，システムなんかも結構よくで 
きているはずなんですけど。まあ，「なには 
ともあれ，ブロウインがすべて」ということ 
なんでしようか0こういうハガキばかりでも 
しようがないような気もしますね0ブロンウ 
インのかわいさのあまり，みんなほかのとこ 
ろには目が届かなかったということにしてお 
きましよう。しかし . 。 


X 6800 Q 用 5〃2 HD 版3枚組 9， BD 0 円（税別） 
X 1/ tu 「 bo 用 5〃2 D 版12枚組9, 800円（税別） 
スターク ラフト 003(988)2988 



X 68000 用 5〃2 HD 版6, 800円（税別） 

コナミ 003(262)91 10 



X 68000 用 5〃2 HD 版4枚組8, 800円(税別） 
データウェスト 006(968)1236 



X68000 用 5〃2HD 版2, 000円（税込） 

ブラザーエ業 （TAKERU) 0052(824)2493 
★GUNSHIP 

アメリカのヘリコプター • シミュレーション 
「GUNSHIPj が X68000 に登場。アメリカ軍の最新 
攻擊ヘリ AH-64A アパッチを操縦して訓練飛行か 
らゲリラ戦，米ソ間の仮想戦まで，幅広いミッシ 
ョンをこなしていく。任務の達成具合によって得 
点が与えられる。働きによっては昇進や勲章授与 
などもあるとか。キー操作も凝っているため，操 
作がひとめでわかるテンプレートまでついてくる 
という力の入れようだ。 

X68000 用 5" 之 HD 版11，800円（税別） 

マイクロ プ ローズジャパン 00423 (33)7781 


IfK 乍情報 


★MISTY V 0 L .5 

推理の面白さを中心に据えたアドベンチヤー 
ゲーム。依頼者の話を聞いてさまざまな場所を訪 
れ，手掛かりを得て犯人を推理する。不必要なグ 


ラフィックやミュージックを排除し，ロープライ 
スを実現している。ューザーを対象にシナリオ投 
稿も受付中とのこと。9月21日発売予定。 

X 68000 用 5〃2 HD 版 ，XI turbo 用 5"2 D 版 
定価5, 000円（税別）タケル価格4, 000円（税込） 
データ ウェスト 006 (968)1236 

★機甲師団 

史上最大の作戦といわれる連合軍のノルマンデ 
ィ上陸作戦のシミュレーションゲーム。作戦画面 
で各マップに投入する戦カバランスを決定し，戦 
場画面で各部隊に指示を与えてドイツ軍を擎退す 
る。隊の移動や戦闖はリアルタイムに進行し，移 
動コースもへクス上ではなくラインを描いて指示 
するなど，アートディンクらしい独創的なアイデ 
アを凝らした作品だ。9月28日発売予定。 

X 68000 用 5"2 HD 版3枚組9, 500円（税別） 

アートデインク 00474 (77)7541 

★プール•オブ • レイデイアンス 

AD & D シリーズ第2弾が登場。前回はアクショ 
ン RPG だったが，今度は本格的 RPG 。 ストーリー 
の舞台となるのはワランという都市。幾多の盛衰 


を繰り返したこの街は，人間の住む新市街とモン 
スターのはびこる旧市街に分かれてしまっている。 
プレイヤーはこの街で次々とクエストをこなし， 
やがて旧フランを支配する勢力を打倒することが 
目的となる。マルチクラス制，6種類のアライン 
メントなど，システム関係も充実している。10月 
21日発売予定。 

Xlturbo 用 5"2 D 版5枚組9,800円（税別） 

ポ ニーキヤ ニオン 003(221)3161 

★ 熱血高校ドッジポール部サッカー編 
熱血高校のくにおくんが，今度はサッカーゲー 
ムで登場。食中毒で倒れたサッカー部員に代わっ 
て大会に出場することになったのだ。プレイヤー 
が操れるのは I 人だけだが，事前に作戦を決めて 
おいたり，ほかの選手に指示を出すことによって 
試合をコントロールすることができる。強豪12校 
を倒し，マネージャーのみさこちゃんとの約束を 
果たせるか？もちろん，2人での対戦，あるい 
は協カモードもあるぞ。 

X 68000 用 5"2 HD 版価格未定 

シャープ S 03(260) II 6 I 
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• C-TRACE68 ver.3.0 

• C-TRACE68TP 



C - TRACE のバージョンアップも久しぶ 
りである。バージョン2が発表されたのが 
咋年の春だから，かれこれ1年半になる。 
以前トランスピュータ版のレビューをした 
のだが，それでも1年前。そのあいだに C - 
TRACE はューザー層を着実に広げてきた 
ょぅだ。 

そして1990年秋。満を持しての登場とい 
うべき力、， C - TRACE はバージョン3に向 
けて大き〈変わった。マニュアルもきちん 
と本の形式になった0中身もリファレンス 
マニュアルと ユーザーズ マニュアルに分か 
れ，読みやすいものになっている。 

同時に，トランスピュータ版もバージョ 
ンを3に上げた。標準システム版もトラン 
スピュータ版もコンパチブルなので，今回 
は主にトランズピュータ版を使ってみた 
(だって速いほうがいいんだもん）。ボード 
を期限つきで借りたせいか貧乏性が出て， 
24時間フル稼働させてしまった0 


高速&超高速 
レイトレ新次元 

Tan Akihiko 

丹明彦 


ポクセル分割を加えて高速イヒ C - TRACE の 
バージョン版とさらにトランスピュータで 
起高速化した TP 版を紹介する。トランスピ 
ュータボードの大幅な値下げで CG アニメ 
も夢ではなくなった？ 



X 68000 用 5”8 HD 版98.000円(税別) 
( TP 版曲8,000円) 
キャスト 003(705)1065 


レイトレーシンクとはなにか 

さて，レイトレーシングといわれてもわ 
からない人のために若干の解説をしておこ 
1 〇 

まず，空間上に3次元図形を描く。とい 
ってもいきなり複雑なものを描こうとせず， 
簡単な方程式で表せるものを組み合わせる 
ことが多い。次に視点から画面の1ドット 
ごとに飛ばした視線と物体の交点を求める。 
そこから光源まで光を飛ばし，その点の輝 
度を決定する。これを画面の全部の点に対 
して繰り返す。といった数学的方法で絵を 
描こうというわけだ。 

こうすると「いかにも CG 」 という絵が描 
ける。計算を多用するだけあってパソコン 
レベルでは 重い処理になるのだが， C - 
TRACE は 32ビットの CG 専用マシンと同 
等のレイトレーサを X 68000 上に持ってき 
たという素性の持ち主。時間さえかければ 
本格的 CG 画像ができるとあって，発表時の 
インパクト は 大きかった。 

今回はポクセル分割だ . . . 

レイトレーシングの 描画は遅いといわれ 
る。確かに3次元 CG のアルゴリズムのなか 
ではもっとも遅い部類に入るであろう。そ 
れでも レイトレーシングが すたれないのは， 
計算時間に見合うだけの作品ができあがる 
からなのである（異論がある方もいるだろ 
うが)。 が， 綺麗だから遅くても我慢しよ 
う，というわけにはいかない のがユーザー 
の偽らざる心境であり，高速化があれこれ 
試みられている。 


C-TRACE は約1年前にハードウェアで 
の高速化を図ってトランスピュータ版をリ 
リースした。計算を専門に行うトランスピ 
ュータボードを本体のスロットに差し込み， 
レイト レースの 作業はすべてそちらに任せ 
る。 X 68000 は計算結果をもらって描画する 
部分などを受け持つだけである。 

トランスピュータは高速化に絶大な力を 
発揮する。気軽に購入できる価格ではない 
力す ( X 68000 本体は軽く買えてしまう），時は 
金なりともいうから，本格的にレイトレー 
シングをしようという方なら初期投資もす 
ぐに回収できるだろう。 

これに対し，ソフトウェアによる高速化 
のなかで現在もっと1> 効果を上げていると 
思われるのが，今回 C-TRACE が採用した 
ボタセル分割である。ボタセル分割は1年 
前にサイクロン Expressa で採用され大き 
な効果をあげている。ボタセル分割が登場 
するに至った構図は以下のとおり。 

レイトレーシングは，画面上のピクセル 
1つひとつについて視線を発生させ，視線 
と最初にぶつかるプリミティブの色を画面 
にプロットして画像を作り上げていくアル 
ゴリズムである。 

i 

レイトレーシングの処理時間の大部分は， 
視線とプリミティブの交点計算に费やされ 
ている。 

丄 

しかもその大部分は無駄である。なぜな 
ら，明らかに視線と交差しないプリミティ 
ブについても律儀に交点計算を行っている 
からである。 

i 

これでは物体の数が増えれば増えるほど 
計算時間は増えていく。 

I 

それでは，あさっての方向を向いている 
視線の計算を省くにはどうしたらいいか。 

i 

視野を大まかなブロックに分割して，各 
プリミティブがどのブロックに入っている 
か調べておく。そして視線と交差するブロ 
ックに入っているプリミティブとの交点だ 
けを計算する。 

1 

こうすれば，物体の数が増えても計算時 
間が増えるのを抑えることができる。 

氺ホ氺 

いつでも理屈どおりうまくいくわけでは 
ない力 ? ，このボタセル分割はある局面では 
非常に効果的である。プリミティブの数が 
多いと特においしい。 
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ボクセル分割はレイトレースの前処理と 
して動イ乍する。 C - TRACE に描画コマンド 
( run ) を与えると，最初の数秒〜数分をボ 
クセル分割に使い，それから描画を始める。 
たとえは悪いが，コンパイラ言語で実行の 
前にコンパイルが必要なのと同じようなも 
のである。それでは実際に動かしてみるこ 
とにしよう。 

見よ！ ボタセル分割の威力（見えない 
って）。物体の数を多くしていってもゆっく 
り.としか遅くならない （？） のが快感。プ 
リミティブの数に対する感覚が麻痺してし 
まいそうになる。 

サンプルは今年の1月号の C 言語特集で 
再帰呼び出しの応用例で作った木である。 
そのときよりも再帰レベルを深くして，枝 
の数を増やした（プリミティブの数は1366 
個）。これをトランスピュータを使って全画 
面 （512 X 512 ドット）に描画させてみた。 

これは従来では暴挙以外の何者でもなかっ 
たのだが……。 

たったの30分。嘘ではない。ァンチエリ 
アシングを最高レベルでかけてみた力 ? ，そ 
れでも5時間。これを長いと思うなかれ。 

いまのように反射も屈折もマッピングも 
しない場合はボクセル分割の威力がいかん 
なく発揮される。これがガラスなどのよう 
に反射.屈折が多発する材料だった場合， 
ボタセル分割といえどもがっくりスピード 
が落ちる。こんなときは，トランスピュー 
夕に感謝するのみである。 

ボタセル分割では描画時間がシーンの状 
況に左右される力％ト ランス ピュータを使 
えば無条件に何倍も速ぐなる。同じことを 
標準 システムで やった日には， X 68000 がハ 
ングア ップしているようにしか見えないか 
もしれない。 

大幅に拡張されたデータ形式—^ 

ところで， C - TRACE は，初期バージョン 
から2年間変わらなかった形状データファ 
イル （ RDT ファイル）のフォーマットを変 


iif 



えた。大きな変更は3つ。そのうちうれし 
いのが2つ，個人的には歓迎したくないの 
がひとつ。歓迎したくないほうのひとつか 
らいってみよう。 

ボタセル分割の導入に伴ってだろう（僕 
の推測だが)，使えるプリミティブが減っ 
た。具体的には，平面と双曲面（楕円体の 
拡張で，サイズ指定のところで負数を入れ 
ると使えた）が使えなくなっている。どこ 
までも続〈図形というものは，存在範囲が 
限定できないので空間分割が命のボタセル 
と相性が悪いのであろう。 

双曲面が使えないのではあまりに具合が 
悪いという判断から力％—葉双曲面（つづ 
みのような形）だけは円柱の拡張という形 
で残された。つまり円柱の胴体を細らせる 
と一葉双曲面なのである。前と違って蓋も 
底もあるので，ボタセルともなじむ。 

まとめると， 

•平面はなくなった。 

•楕円体の拡張としての双曲面はなくな 
った〇 

• 新たに円柱が拡張され，円柱の側面の 
形を変えられるようになった。そのなかに 
一葉双曲面も入っている。またそのために， 
円柱のサイズを指定するパラメータがひ！： 
つ増えている。 

というわけで，従来のデータをそのまま 
読ませることはできなくなっている。さっ 
きの再帰木にしても以前の記事のままでは 
だめで，円柱のサイズ指定の部分を書き直 
したものである（蛇足だが，地面は平面で 
はなく直方体だったので変更は不要だっ 
た)。 

なお， コマンド 名のつづりが一部変わっ 
ている（たとえばアトリビュート指定が 
ratt — rat など）力 ? ，これは従来どおりの書 
き方でも読んでくれるようだ。 

* 

あとのうれしい2つというのは，純粋な 
拡張である。従来どおりに書いてあっても 
通す，つまり指定しなかったのと同じ扱い 
になる。改めて移植することを考えなぐて 
もよい。以後制作する作品に取り入れてい 
けばいいというのが便利である。 

ひとつはツリ ー 構造。 C - TRACE では 「ク 
ラスタ」と呼んでいる。サイクロンに対す 
る最大の弱みといってもよかった部分がこ 
れで解消されたことになる。 

一般的なレイトレーシングでは，用意さ 
れているプリミティブの種類は少ない。球 
や直方体，それに円柱など，ご〈簡単な形 
に限られる。それを積み木のように組み合 
わせていく。が，それだけで表現できる物体 



これがたった30分でできる 


の形など知れたものだから，論理演算を使 
って物体をくりぬいたり，切り取ったりす 
る。こうして一群のプリミティブからひと 
つの物体を構成する。問題はこの先だ。 

C - TRACE のバージョン2までは，上の 
ようにして作った物体をまとめて動かす手 
段がなかった。一群のプリミティブだから 
いっしよに動かせるというのが自然な流れ 
だし，動かせないというのは非常に具合が 
悪いはずなのだが，動かせなかった。 

そこで，プリミティブを1つひとつ勋か 
していくことを余儀なくされていたのだ。 
これはつまらないミスのもとだし，物体を 
あちらこちら動かしたいときにも苦労が絶 
えない。 

たとえばグラスを作ったとする。置いて 
ある場所が気にいらない。 x 方向に50動か 
したい。グラスを構成するプリミティブを 
1個1個動かす。描画してみる。あれ，足 
が元の場所に取り残されている。しまった 
動かし忘れた。再度テキストエディタに戻 
って足を動かす。もう一度描画。グラスは 
ちゃんと動いたが，この場所も気にいらな 
い。 z 方向に30動かそうか。ああ，また同 
じ仕事の繰り返しだ。これでは誰だって嫌 
になる。 

そこでクラスタの導入である。使い方は 
簡単で，グラスを定義した部分を 「cls 
〜 clsend 」 で囲めばよい。 PASCAL の 
「 begin — end 」 のようなものだ。 els の直後 
に動かすなり回転するなりの命令をつける 
だけで，クラスタ全体が，つまりグラスが 
動くのである。さらにうれしいことに，マ 
ッビングの情報もクラスタの中に入れられ 
る。クラスタを動かせば当然マッピングも 
いっしよになって動く。これは便利である。 
部品のライブラリ化が可能になったのだか 
ら。 

ツリー構造というからには，ネステイン 
グも可能である。相当複雑な表現も簡単に 
できることだろう。たとえば多関節キャラ 
クタなんてどうだろう。クラスタは，アニ 
メーシヨンに利用することを多分に意識し 


これがトランスピュータボードだ 
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テーブルの上の光景。描画が速いと遊び心も広がる 


ているのかもしれない。 追加はできても削除ができない，などの不 

満は数多くあった。しかし，操作性は上々， 
画面構成も小綺麗にまとまっていてわかり 
やすかった。レイトレース前に構図の確認 


うれしいこと2つめ，属1生マツビング。 
サイクロンでいうアトリビュートマツピン 
グができるようになった。いままではカラ 
ーマツビングとバンプマツビングだけだっ 
たのだが，今回は反射率•ハイライト•透 
明度などのマツピングまで可能になった。 
今回はうまい使い道を思いっかなかったが， 
それでもこっそりと使っている。これ見よ 
がしに使うなんて感心しないからね，とい 
いわけをしておこう。 

モデリング環境は悪くなった 7^— 

順序が逆のような気もするが，モデリン 
グのお話。といっても特別なソフトがある 
わけではない，むしろなくなったというべ 
きか0 

C - TRACE 付属のモデラ ー SPED . X が， 
バージョン3のシステムから姿を消してい 
る。あのモデラーは，基本の部分がとても 
よくできていたのに，残念である。 

確かに扱える物体の数が少ない，論理演 
算をサポートしていない，プリミティブの 


トランスピュータポードは安いとはいえない0 
もちろん，その性能を考えるとおつりが返って 
くるし，今回は大幅な値下げまで行っている。 
しかし，まだまだ一般庶民がためらいもなくぽ 
んと買える値段ではない。しかも用途は特殊で 
ある。 

トランスピュータは，それ自体 I 個の CPU で 
あるから， c コンパイラだってある。並列処理を 
考えた設計だから，增設することでいくらでも 
速くなる。使い道はいくらでもあるのだが，現 
時点ではレイトレーシングに限られていると思 
っていいだろう。当然，そんなもの買ってなん 
になる？ と思う向きはひとりや2人ではある 
まい。 

ここにひとりの X 68000 ユーザーがいる。彼が 
あるとき「コンピュータグラフィックをしよう」 
と思い立ったとしよう。彼に求められるものは 
なにか。財力？ いやいやそんなことはない。 
X 68000 は標準装備だけで相当なことができる 
マシンだ。彼に必要なのは，努力とセンスだけ 
である（どちらもお金で買えないものだけに， 
かえってつらい）。 


ができたのだが，これからは出たとこ勝負, 
描画するまでわからない。今回はトランス 
ピュータを使っていたのでまだよかったが, 
これを標準システムですることを考えると 


データファイルのフォーマットが大幅に 
変わったので，それに追従するよりはモデ 
ラーを切り捨てる道を選択したのだろうか。 
まあツリー構造をサポートするのは大仕事 
には違いない。 

そういうわけなので，自分にあったテキ 
ストエディタを見つけることが最重要課題 
となる。ツリー構造も導入されたことだし， 
編集機能が強力なエディタがほしいところ。 
よく手になじんだエディタは，半端なモデ 
ラーよりは確実に使える。 

しかし，だからこそ，半端でないモデラ 
一を出してほしかったのに，よりによって 
割愛とは . 。 

それでもトランスピュータがほしい 

かつて， XI がスーパーインポーズや PCG やジ 
ョイスティックポートを標準装備して登場した 
ときも悪口は絶えないものであった。いま，そ 
れらに疑問を抱く者がいるであろうか。ジョイ 
スティックポートにつながったのはジョイステ 
ィックだけではないことも思い出してもらいた 
い0 

世の中には僕らが考えているよりもはるかに 
たくさんの才人が埋もれているかもしれない。 
もしもその人たちが，音楽でもグラフィックで 
もいいのだが，なにか特別なことをしようと考 
えたとする。そしてその人の使っているマシン 
がまったくのダルマさんだったらどうだろうか。 

「音楽をしてみたいんですが」 「 FM 音源ボード 
を買ってください j 「 グラフィックをやってみた 
いんですが」 「X X 社のフレームバッファを買っ 
てください」。……拡張，拡張，拡張。なにをす 
るにも拡張というのは，「無駄な機能はコストを 
押し上げる」という考え方からいえばたいへん 
合理的ではあるが，へたをすると優れた才能の 
芽を摘むことにもなる。 

初めから音楽が目的だ，とか， CG に情れてコ 


レイトレ作画講座もどきとサンプル ■ 

僕のような者が作画講座など開くのはお 
こがましい限りだが，はからずもサンプル 
の作り方がそれっぽくなってしまった。 

先月はランダムフラクタルで雲を作った 
が，これをさっそくマッピングに利用して 
みた。「箱庭（これぞ文字どおりのマッピン 
ダ？）」では，カラーマッピングとバンプマ 
ッビングを同じ形にしてある。先月のラン 
ダムフラクタルに再現性があることを利用 
している。 

ときには背景にも模様がほしくなる。し 
かしうまく立ち回らないとえらく間抜けな 
ことになる。たとえば後ろのほうにでっか 
い板を立て，それに背景を貼りつける。そ 
こで構図が気に入らなくなって，別の角度 
から描画してみる。すると，おお，背景が 
途中で切れて，その後ろが見えてしまって 
いる。世界の果てでは海が滝になって流れ 
落ちているという話を笑えないではないか。 
背景の端が見えるのはそれくらいみっとも 
ない。 

反射 • 屈折がからむともっと厄介だ。な 
にしろ反射光はどこからくるかわからない。 
ぱっと見にはうまくいっていても，映り込 
みの中に背景の板の形が見えていたりする 
のである。よく映画の特殊効果の種明かし 
をするメイキング物があるが，あれは映画 
と別にあるからいいのであって，映画の中 
でネタがばれてしまうような作り方はして 
はいけない0ましてやレイトレーシングは 
1枚絵である（基本的には）。穴のあくほど 
見つめられる。ごまかしはきかない。 


ンピュータを始めた，とかいう人ならば，その 
方面(‘二惜しみなくお金をつかうことができる。 
でも，コンピュータを始めてからそういったも 
のに触れる人のほうが世の中には圧倒的に多い 
のである。好きならば求めればいい，しかし出 
会いがなければ嫌いにすらなれない。 X 68000 
は，その出会いのチャンスを豊富に与えてくれ 
る希有のマシンである。 

X 68000 を十分に使い込んで，標準のシステム 
構成に飽き足らなくなった人は，さらに専門的 
なシステムを構築していけばよい。ここから先 
は，コストが上がっていっても少しも構わない。 
より強力になったシステムは，注ぎ込んだ費用 
以上の働きをしてくれるだろう。人によっては 
それが MID けごったり （ MIDI は X 68000 にとってそ 
れほど特殊ではなくなっているが)，フレームパ 
ッファやトランスピュータだったりするわけで 
ある。 

その道の素人でも優しく迎え入れ，達人にな 
ったあとも要求に答えていける，そんな包容力 
を持ったマシンを持てることは幸せである。以 
上，システムアップに対する僕の考えである。 
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C - TRACE の デイ スタには サンプル がつ 
いてくる。例のステゴちゃんのデータも入 
っていた。そこから解決法を頂戴した。よ 
くできたサンプルを読むと勉強になる。 

巨大な球を作ってその裏側にマップを貼 
る。基本はこれだけ。ただ，これだけだと 
いろいろ不都合を生じる可能性もあるので 
注意されたい。 

まず光源。球の外側からくる光は球の内 
側には届かないかもしれない。ひょっとし 
たら背景の球の内側が真っ暗になるかもし 
れない。すると，背景はおろか肝心の被写 
体も真っ黒になる。 

対策その1。球の一部にだけマッピング 
する（例：「時計」の青空)，これは映り込 
みでマップの形が見えないように注意する 
必要がある。球面マッピングは，マッピン 
グ範囲を角度で指定するので設定はしゃす 

い0 

対策その2。球の全面にマッピングして 
おき，その内側に点光源を置く（「シャボン 
玉」)。 

余談になるが，ここで疑問を持った方も 
多かろう。「シャボン玉」は背景にマッピン 
ダしてあるようには見えないだろうから。 
シャボン玉の表面をご覧いただきたい。こ 
の油膜の虹色模様は，背景が映り込んでい 
るのだ。これは僕ではなく，中野氏の提案 
による技である（感謝)。球面の内側にフラ 
クタルで作った虹色をマッビングしておく 0 
点光源を背後に置く。背景のうち，後半分 
だけが明るくなる。それが玉（正体はただ 
の無屈折のガラス玉）の表面に映り込む。 
種を明かせばそれだけのことだが，けっこ 
う雰囲気は出ている。ごまかしだって？ 
いやだなあ人聞きの悪い，せめて高等テク 
ニックといってくださいよ。 

ほかにも「球の表面に反射率マッピング 
する」という，よりそれっぽいごまかし， 
もとい，高等テクニックもある。ま，真剣 
にシミュレートしようと思ったら光の干渉 
を考えに入れるべきである。というか，実 
際にレイトレーシングでそういう試みはな 
されている。もっともこれはオリジナルに 
レンダラを組まねばならない力す0 

脱線したが，対策その3。背景色 ( bgc コ 
マンドで与える。バック•グラウンド•力 
ラーの略であろう力 1 )を明るめの白にして 
おいて，球面には透明率マッピングを施す 

(例：「再帰木その2」の夕焼けっぽい 
空)。この方法ではムラのない背景が得られ 
る（前2つではムラが出る可能性がある。 
それを利用するのもテクニックのうちであ 
ろう）〇 



バンプマッビング 


最後に一般論。 

綺麗な絵は作るのが難しい。特にライテ 
ィング（照明）は重要で，これの指定いか 
んでシーンがシラけてしまったり，妙にリ 
アルになったりする。 

お金があるっていし 、ことね^^^^ 

レイトレーシングー般にいえることだが， 
少し真面目にやろうと思うと途端に膨大な 
資源を要求する。 

まずハードディスクはもはや必需品。マ 
ッビング用イメージファイルには，1枚200 
K バイトなんてのもざら。 C 言語を使って自 
動生成した「再帰木」の形状データファイ 
ルのサイズもそう。指数関数的に増大する 
ので， 300 K バイトくらいは軽くいく。レべ 
ルをちよっと上げたらファイルサイズが3 
M バイトいった。これはさすが'にトランス 
ピュータのほうでメモリオーバーを起こし 
たので読み込めなかったが，フロッピーに 
入りきらないテキストデータを作ったこと 
自体ちよっとしたスリルであった。 

出力される画像ファイルも全画面で700 
K バイト以上。圧縮もかかっていない。これ 
でアニメーションなんてしようものなら， 
ハードディスクでもパンクしてしまう。光 
磁気ディスタの時代はそこまで来ている。 

トランスピュータもぜひともほしいとこ 


レイトレーシングでアニメーションなんてで 
きるのはよほど資金力のあるところだろうと思 
うが，理論上は誰でもアニメーションを作るこ 
とができる。そこで問題になるのが動きの設定。 
複雑な動作を指定するのはけっこう大変な作業 
である。なにが大変かといって.I秒に30フレ 
ームもの指定をするのが大変なのである。 

こんなとき，たとえばI秒につき5フレーム 
ずつ指定しておいて残りの25フレームは中割り 
で作らせるということができれば，作業の効率 
がぐっと上がることが期待できる。 

今回付属のアニメーションフレーマーは， C- 
TRACE で指定できるすべてのパラメータを直線 
またはスプラインで補間する。プリミティブの 
サイズ，座標，色はもちろんのこと，構図も滑 



これもカラーマツビング 


ろ。いまならさらに値下がりしてお得だ。 
大金持ちの人は，追加ボードでも載せて速 
度を一気に2倍にすることもできる（レイ 
トレー シングはアル ゴリ ズムの 性格上，速 
度がプロセッサ数に比例する）。描画が遅い 
ために生じるストレスから解放されないと， 
感性の活躍もなにもあったものではない。 

今回はけっこう楽しかった。トランスピ 
ュータにボタセル分割で鬼に金棒。今回の 
サンプルのほとんどは，解像度を最大にし 
ても30分で終わってしまった。テスト描画 
に至っては数十秒である。 

「時計」にしても最初はただの1枚板だ 
ったのが，バンプを つけ， 針を つけ， ガラ 
ス板を つけ， 四隅にピンを つけ， 気の向く 
ままに造形ができて楽しかった（そのあと 
で背景を青空にしたが，これは少々突飛だ 
ったかな）。ともあれ，造り込むとなんとな 
くそれらしく見えてくるから不思議ではあ 
る0少々派手にしたって大丈夫，トランス 
ピュータにはメモリが 4 M バイト入ってい 
る（拡張すれば 8 M バイトまで可能だそう 
だ)。マッピングもけちってはいけない。 

なんだかトランスピュータ礼賛になって 
しまった力 5 '，トランスピュータがここまで 
おいしくなったのもバージョン3だからだ 
ということを忘れてはならない。ボタセル 
分割万歳0さあ，次はメタボールだ。 


らかに変えていくこともできる。カメラワーク 
の勉強が必要だな。 

といっても正体はフイルタのようなもの。ア 
ニメーションフレーマーは C-TRACE 本体とは独 
立したアプリケーションで， RDT または KEY ファ 
イルのパラメータを細かく害き換えながら出力 
するだけのものである。ただ，レイトレーサ自 
体を子プロセスとして呼び出すことができるの 
で，全フレームを自動生成してくれるのがうれ 
しい。 

C-TRACE が面倒を見るのはレンダリングまで 
で，そこから先の動画像の再生についてはサポ 
一卜がないようである。これについては，そろ 
そろ出てきそうな「うごく ZO」 がなんとかして 
くれそうな気配である。 


アニメーションフレーマー 


THE SOFTOUCH 4 / 





I 新製品紹介 

プログラミングユーザーの必須アイテム 




C compiler PR0-68Kver.2.0 
I 


_ 響?:響 
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Izumi Daisuke 
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xc がいちだんと強力なツールを従えてパワーアップしてき 
ました。従来のユーザーも少々の出費で大量の マニュアル ご 
とサービスを受けられます。持っててよかった。 



待望久しい c compiler PRO -68 K (通称， 
XC ) の ver .2.0 がついに編集部に届きまし 
た。長い道程でしたが，これは！と思わせ 
る新機能を搭載しての登場です。 

新機能の第1点はソースコードデバッガ 
が付いたことです。これを使うと C のプロ 
グラムを1行ずつ実行しながら変数の値を 
確かめることができるようになります。 

第2点は ANSI 規格をより取り入れた表 
記をサポートするようになったことです。 

第3点はライブラリ環境が整備されたと 
いうことです0これまで複数のファイルを 
単にま とめた〜 . A というファイルをライ 
ブラリ代わりに使ってきましたが，今回専 
用のファイル形式が用意されました。 

そして第4点は，生成されるコードの質 
が少し向上したことです。 

怒濤のマニユア)レ攻撃 

まずは製品構成から始めましょう 。 C 
compiler PRO -68 K ver .2. 0のパッケージ 
に含まれるものは， 

1) XC システムディスク1 

2) XC システムディスク 2 

3) XC ライブラリディスク 

4) C ューザー ズマ ニュ アル (169 P ) 

5) C リフアレンスマニュアル （136 P ) 

6) C ライブ、ラリマニュアル VOL . l (621 P ) 

7) C ライブラリマニュアル VOL .2(469 P ) 

8) ソースコー ド デ 、ノ<ツカ、' マニュア ル (126 P ) 

9) •アセンブラ マニュアル （310 P ) 

10) プログラマーズマニュアル （754 P ) 

11) 登録カード 

の合計11アイテムです。 マニュアル 類の後 
ろの括弧に入れたのはページ数で， ver . 1 
で究極のコピープロテクトと呼ばれた怒濤 
の マニュアル 攻撃はさらに磨きをかけられ 
ています 0 マニュアル 総量は2585ページに 
達し，その重量はなんと 5.5 kg 。 ライブラリ 
マニュアルは 2冊に分けられ， X 68000 と 
Human 68 k に関するあらゆる情報が詰め 
込まれています。 

気になる価格ですが， ver . l より5,000円 
アップの44,800円に決まりました。 ver.l 
ユーザーには 差額+1万円程度でバージ ョ 


ンアッフ°サービスしたいとのことです。登録 
カードを返送している方には，もうバージ 
ョンアップの案内が届いている頃ではない 
でしよう力、。 

さて， ver . l では システム ディ スタは 1枚 
しかなく，買ってきた システム ディスクを 
起動するだけで C コンパイ ラを使えるよう 
になっていました。 ソースコードテ、、パ、ッカ'、 
などの機能が追加された ver .2.0 では シス 
テム ディ スタは 2枚構成となり，起動する 
とインス トー ラが自動的に立ち上がります。 
これは2枚の システム ディ スタに 振り分け 
て収められた種々のファイルを，目的別に 
ディレクトリを作成して分類整理してくれ 
るものです。 

フロツ ピー デイスタへのインストールと 
ハードデイスタへのインストールの2つが 
用意され，いずれも画面の指示にしたがっ 
て操作していく だけで 簡単に インストール 
できるようになって います。 フロッピーデ 
ィスクへのインストールでは 起動用と実行 
用の2枚の フロッピーディスタを 作成しま 
す。 

ここで残念なお知らせがあります。こう 
して作成した起動用ディスタでは， 1 M バイ 
卜しかメモリを搭載していないマシンで C 
コンパイラを使えません。 ver . 1では C コン 
パイラは （ BC . X )， CC . X ， CCP ， CC 0, 
CCl ， CC 2, そして AS . X の7つの プログラ 
ムに 分かれていました。これらが順次起動 
されながらコンパイルが進んでいくように 
なっていたのですが，今回のバージョンア 
ップで7つのファイルは CC . X という1つ 
の プログラムに まとめられたのです。この 
結果 CC . X は約 400 K バイトという巨大な プ 
ログラムに なっています。 

このように変更された理由は，複数のフ 
ァイルから 成る C の プログラムをコンパイ 

ルする際に，何度も CCP ， CCO , CC 1 ……を 
読み込む手間を省くためだと思われます。 
いろいろと試した結果コンパイルには700 
K バイトほどのフリーエリアが必要なよう 
ですので，作成されたディスタの CONFIG . 
SYS から ASK 68 K や OPM / PCM ドライバ， 
それにヒストリドライバのすべてを削除す 
れば 1 M バイトの X 68000 でも使えるように 


なります。 


ソースコードデバッガ 

ver .2.0 のもっとも大きな特長は，ソース 
コードデバッガが付属しているということ 
です。 Q で作成したプログラムはコンパイ 
ラにより マシン 語に変換されます。プログ 
ラムの実行は マシン 語ですから高速で，こ 
れが C 言語が普及する要因のひとつ！：もな 
りました。ところがプログラムの動作が変 
なときには， BASIC のように途中で止めて 
変数の値を確認するといったテストができ 
ないというデメリットも併せ持っています。 
このような場合， ver . 1では， 

1) C のプログラムをじっと睨む 

2) プログラムのところどころに変数を表 
示する命令を入れて再びコンパイルし，表 
示される値を見ながらおかしなところを探 
し出す 

3) マシン語を自分で調べておかしなとこ 
ろを探す 

といった方法で原因をつきとめるしかあり 
ませんでした。特に 3) の方法は自分の思い 
込みや勘違いを発見するのに有効な方法な 
のですが， マシン 語 レベルの 知識と C コン 
パイラがどのように マシン 語へ変換するの 
かを知っていなければなりません。一般の 
C 言語 ユーザーには とてもこんなことは無 
理な相談で， 1) や 2) の方法で地道にバグを 
つきとめるのが一般的な解決策だったとい 
えるでしよう。 

ソースコード デバッガはこのような暗黒 
のデバッグ時代に光明をもたらす画期的な 
デバッガです。 C 言語で書いたプログラム 
を見ながら自由にプログラムを動かしたり 
止めたりでき，変数の内容を表示させて確 
かめることが可能なのです。マシン語の知 
識は必要ありません。表示したい変数名を 
指定し，止めたいところでマウスをクリッ 
ク。これだけで勘と知識と忍耐を総動員し 
て立ち向かっていたバグと対決できるわけ 
です。 

ver .2.0 付属のソースコードデバッガ 
SCD.X はマウスオペレーションを基本と 
した簡便な操作が特長です。画面は大きく 


Gy フ PC レン r<fvlln?= 


C ライプラ uvl i ル VOLV 


C ライブラリマ I m ル VOL 2 
アセンフ1 fS マニ HK ル 
プ□クラマ— K 23 アル 
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5 つに分かれており，いちばん上がメニュ 
ー パ、 一，次が ゾース プログラム（この場合 
は C 言語）を表示するためのウィンドウに 
なっています。左上にある上下の三角印は 
表示されているプログラムの スクロール 用 

.です。3番目のウィンドウは MC 68000のレ 
ジスタゃ C の変数の内容を表示するための 
もの。4番目がコマンドを入力するための 
ウインドウで，コマンド投入ウインドウと 
名付けられています。 

いたずらに マウスに 固執することなく， 
必要に応じて マウスとキー ボードの両方を 
使える設計には好感が持てます。いちばん 
下のウィンドウ（画面下の黒い部分）はァ 
プリケーシヨンが通常使っている テキス ト 
画面が一部分だけ見えているところです。 
SCD.X は マウス カーソルと 同じ画面を使 
っていますので，通常のプログラムの画面 
出力にはまったく影響を与えません。 

もっとも簡単なデバッグ方法はメニュー 
の Trace あるいは Step でマウスをクリック 
することです。クリックするたびに C 言語 
のプログラムが1行ずつ実行されていき， 
実行中の行が網掛けで表示されます。プロ 
グラムを1行ずつ追いかけながら動きを確 
認できますので，実行されない if 文のチェ 
ックなどに役立ちます。 Trace は呼び出し 
ている関数の中まで1行実行する•点が 
Step と異なっています。 

変数の表示は watch を選択しプルダウン 
メニューから set を選ぶだけと簡単 0 変数名 
入力用のウィンドウが開きますので，見た 
い変数名を入力します。これで2番目のウ 
ィンドウに変数名とその値が表示されます。 
「変数未定義」と表示されたら，それは指 
定した変数が現在実行中の場所からは參照 
できないという意味です。 

先ほどのステップ実行と併せれば，初心 
者の方の格好の入門教材となるでしょう。 
変数の内容を16進数で表示したり，文字列 
として表示できますので，適宜使い分ける 
のがいいでしょう。ただ，変数に配列名を 
指定すると， 

sieve = Array :アドレス 
と表示されるだけで内容までは表示してく 
れません。もっとも1000個もの要素をもつ 
配列の内容を表示されても困るだけのよう 
な気がしないでもないのですが。この場合 
は，たとえば 「sieve [ i ]」 を表示するとい 
うように，添え字（変数で指定してもかま 
わない）を付けて表示させることになりま 
す。 

初心者のための入門教材という意味では， 
Exec メニューの中の Slow も捨てたもので 
はありません。これは自動 Trace ともいう 
べき機能で，1行ずつ順に実行していって 
くれます0自分の作ったプログラムが動い 
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マウスで 指定した行数 （25 行） まで 実行させる 
ていく様子を見ているのはなかなか面白い 
ものです。 

網掛けになっている行を実行中は SCD . 
X の画面が一時的に OFF になります。 この 
ため Slow 実行では画面が点滅するような 
格好になり目の衛生上よくありません。こ 
んなときに便利に使えるのがいちばん下の 
テキスト画面です。 

黒いところでマウスの左ボタンを押すと 
User Screen と書かれた バーが 現れます。 
そのままドラッグするとサイズは自由に変 
更でき，テキスト画面を常に表示しながら 
プログラムを追いかけることができるよう 
になるのですが，もうひとつ美味しい機能 
が付加されます。 SCD . X の画面が消えなく 
なるのです。チラチラが気になる方は，1 
行分だけテキスト画面を取っておくことを 
お勧めします。 

1行ずつの実行ではなく一気に数行実行 
したいというときには，止めたい行でマウ 
スの右ボタンを押すだけで OK です。指定 
した行までのプログラムが実行され，網掛 
け表示されて中断します。 

同様の機能にブレイクポイントの設定が 
あります。こちらはマウスの左ボタンで設 
定し， Run を選んでプログラムを走らせれ 
ば設定した行で中断します。いずれも大き 
なプログラムで，問題があると思われる関 
数が呼び出されるまでは普通に実行したい， 
というときに有効な方法です。目的の場所 
までは高速に実行させ，怪しそうなところ 
に近づいたらステップ実行で原因を探ると 
いう使い方をします。 

•ちょっと高度なデバッグ方法 

実行を中断する行を指定する，指定した 
行まで実行するといった前述の方法のほか 
に，条件が成立したら実行を中断するとい 
う方法があります。これは丁 race , Step , 
Slow 実行時しか有効ではないのですが， 

メニューの Watch から WatchPt を選んで， 
i = = 5 

のように指定しておけば， i が5になったと 
きに自動的に停止する機能です。 

さらにすごいのが TracePt 。 こちらはメ 
モリの内容が書き換えられたら停止すると 
いう優れものです0プログラムのどこかが 


ソースリストを参照する 

配列の内容を壊しているとき，あるいは配 
列の範囲を越えてデータを書き込んでいる 
ときには，見張るメモリを1•旨定して Slow 実 
行させておけば OK です。血眼になって探 
していたバグが，寝そべって本でも読んで 
いる間に探し出されます。 

SCD . X は従来のデバッガ DB . X を ソース 
コードデバ'ッガへと進化させたものです。 
したがって， DB . X で使っていたデバッグ 
テクニックをそのまま利用することが可能 
です。これらはコマンド投入ウインドウで 
コマンドを入力して使うことになり， DB . 
X と同じような操作環境になります。先ほ 
ど配列の内容は表示されないと書きました. 
が，メモリダンプ命令を使って 
d . sieve 

とすれば表示できるわけです。 XC はシンポ 
ルの前にアンダーバーを付けて使いますの 
で，酉己列 sieve を見たければ 「_ sieve 」 で指 
定します。 

実は， SCD . X を使っているうちに大切な 
機能が抜けていることに気づきました。一 
般に C の プログラムは機能ごとに複数の フ 
ァイルに 分割して作成されます。 SCD . X で 
もこれ に 対応し，実行が別の ソースファイ 
ルに 移ると自動的に ソースファイルを 切り 
替えて表示してくれるようになっています。 
ところが，この ソースファイルの 切り替え 
を 任意に行うことができないようなのです。 

「プログラムの動作を見ていると，どう 
も5 つ 目の ファイルの あの関数がおかしそ 
うだ」と思っても，5 フ 、貝の ファイルを 表 
示できないのですからブレイクポイントを 
設定できません 0 ト レースな どを繰り返し 
て目的の関数へ迪り着かなければならない 
わけです。これは致命的だと思ったのです 
が，とりあえず抜け道を発見したのでここ 
に言己しておきます。 

1) まず Find メニューから Symbol を選び 
ます。これはシンボルの検索を行うメニュ 
一て T 0 

2) ここで 「_ eraseRest 」 のように，ブレ 
イクポイントを設定したい関数を「シンポ 
ル」で指*定して探します0 

3) ソース 表示画面が逆アセンブルリスト 
表示になり，検索したシンボル（つまり 
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eraseRest 関数のエントリ）が最上行に表示 
されます。 

4) eraseRest 関数の最初のマシン語命令 
のところにブレイクポイントを設定します。 
あるいはマウスの右クリックで，最初の命 
令のところまで実行させます。 

5) ソース表示画面を C に切り替えます。 
以上の手順でクリアできますが，画面右 

上にでもファイルの選択用アイコンを用意 
してほしいところです。 


より ANS 頗格を取り込んで 


数年前には， c 言語の文献といえばカー 
ニハンと リ ツチーのプロ グラミ ング 言語 C 
しかないという状況でした。開発者によっ 
て著されたこ の 本は C という言語の 紹介 か 
ら処理系の詳しい内容まで多岐に渡ってい 
ましたが，どちらかというと C の精神論的 
な側面が強く処理系制作者がよりどころと 
するには厳密に定義されていない部分や処 
理系制作者に任されている部分も少なから 
ずありました。それぞれの処理系はこの本 
を元にしながらも，少しずつ違ったものが 
世に送り出されたのです。こうした事態の 
収拾に乗り出したのが ANSI で，以後 ANSI 
が提出した標準 C の草案を満たすべく C コ 
ンパイラが作成されるようになりました。 

ver . 1 でもこの草案のいくつかは取り入 
れられています力 5 '， ver .2.0 はさらに ANSI 
準拠の性格が強まった C コンパイラになっ 
ています。そのい〈つかを具体的例を挙げ 
ながら紹介していきましよう。 

•関数定義方法の追加 
ver . 1 では関数引数部は， 
void eraseRest ( seed ) 
int seed ; 

のように書かなければなりませんでした。 
ver .2.0 ではこれを， 

void eraseRest (int seed ) 

と表記できるようになっています。引数名 
だけでなくその型も同時に宣言できるよう 
になったのです。 

これはプロトタイプ宣言とも密接な関係 
があります。古い C では int 以外の型のデー 
夕を返す関数は，あらかじめ， 
double copy () ; 

のようにその型を宣言しておく必要があり 
ました。続いて引数の型も同時に宣言して 
おけるようになり， 

double copy ( double , douole ); 

リスト 1 


という表記が可能となりました。このよう 
に関数が返す型と引数の型をあらかじめ宣 
言したものをプロトタイプ宣言といいます。 
コ ンパイラはこれをもとに ユーザーが 書い 
たプログラムの引数のチェックや型変換を 
行いますので，うっかりミスのバグ防止と 
いう意味でもプロトタイプ宣言は重要です。 
ver . 1がサポー トしていたプロトタイプ宣 
言はここまでです。 
ver .2.0 はこれをさらに進め， 
double copy (double from , 
double to ); 

と，変数名までプロトタイプ宣言に入れる 
ことが可能となっています。変数の意味が 
わかりやすいだけでなく，関数定義行をコ 
ピーしてフアイ ルの 先頭に持ってくるだけ 
でプロトタイプ宣言行を作ることができる 
のは便利です。 

ANSI では printf 関数のように不定個の 
引数を受け取る関数を作る方法をサポート 
していますが，これも今回のバージョンア 
ップで取り入れられました。 

•構造体 • 共用体の柔軟な扱い 
XC は ver.l のときから構造体•共用体を 
単純な変数と同じように扱うことができま 
した。構造体どうしの代入をサポートして 
おり，また関数の引数•戻り値としても使 
用可能でした。 PC - 9800 シリーズ用の C コ 
ンパイラがこういった機能をサポートし始 
めようとしていた時期に， ver . 1 ではすで 
に実用化されていたわけです。ただ，関数 
の引数として使える構造体は1つだけで， 

2つ以上の構造体を渡そうとするとアドレ 
ス計算を間違えるというオマケがついては 
いましたが。 

ver .2.0 になって複数の構造体を引数と 
して渡した際のバグが取り除かれています。 

•ライブラリの拡充 

ANSI はその草案の中でどのコンピュー 
夕の C コンハ 0 イラでも使えるライブラリ関 
数を定義しており， ANSI 標準ライブラリ 
と呼ばれています。標準ライブラリで提供 
されている機能はマシンを問わず実行でき 
ることが期待されるわけで, XC でも今後と 
も拡充が望まれるところです。 

ver .2.0 は ハー ドウ ェアサボー トライブ 
ラリに加え， ver . 1 でサポートしていた関 
数のいくつかを標準ライブラリの仕様に沿 
う方向で変更しています。もっとも影響が 
あるのではないかと思われるのは setjmp.h 
と setjmp，longjmp 関連の処理です。これま 


で両関数の引数は jmp_buf へのポインタ型 
でしたが，これが jmp_buf 型へと改められ 
ました。頻繁に移植をしていた方は setjmp . 
h を書き換えてあるでしようから問題ない 
として，提供されていた setjmp.h をそのま 
ま使ってプログラムを作成していた方はプ 
ログラムを書き換えないと コンパイル でき 
ません。ご注意〈ださい。 


ライブラリの整備 


これまでライブラリ代わりに使用してき 
た〜 • A ファイルは複数のファイルを単純 
に結合し1つのファイルにまとめたもので 
した。 ver .2.0 ではライブラリは〜 .L という 
専用のファイルにま-とめられています。ラ 
イブラリファイルを変更した理由は，これ 
まで〜. A 内に分散していたシンボル情報 
をファイルの先頭に集めてリンク速度の向 
上を図るためだそうです。これにあわせて 
LK.X もバージョンアップされています。 

AR コマン ドで行っていたライブラリの 
管理は LIB コマンドに 任されることになり 
ました。 ver. 1 ユーザーのために従来の〜. 
A を〜 . L へ変換する機能が ついてい ますの 
で，自作ライブラリを ver.2.0 で使用すると 
きにはこれで変換するといいでしょう。マ 
ニユ アルでは LK.X ver .2.0 は〜 • A フアイ 
ルもリ ンク できることになっているのです 
が，編集室に届いたバージョンではコプロ 
セスで使うとエラーが出てしまいました。 

CC.X や GCC.X ( GNUC ) はい〈つかの 
コマンドをコ プロ セ スで順番に起動しなが 
ら作業を進めていきます。したがって CC.X 
で〜 . A 形式のライブラリを使用すること 
はできません。本誌6月号の付録ディスク 
で配布した GCC は必ず GNULIB.A と 
CLIB.A をリンクしますので，こちらでも 
そのままでは使用できません。 GCC を使う 
場合は - c オプションを指定してリンクフエ 
ーズをカットし，次に LK.X ver .2.0 でリン 
クするという使い方をすることになります。 

ホ 

さて，コンパイラがはき出すコードの最 
適化处理なども気になるところですが，こ 
こでは1000までの素数をエラトステネスの 
ふるいで求める簡単なプログラ ムをコ ンパ 
イルした結果を掲載してぉきます。比較し 
たのは ver. 1 ， ver.2.0, そして GCC です。 
コンパイル条件はすべてオプティ マイ ズオ 
プションのみを指定しました。 ver. 1 と ver. 
2.0 を比べると，共通文字列を削除している 
点，スタックに数値を積む場合に PEA を使 
っているほかはほとんど同じコードが生成 
されています 0 コードの質は ver.2.0 になっ 
て少し向上したというところでしょうか。 
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REM LK.X VER 2.0 を GCC で使ろ 
gcc -c -0 sieve.c 

lk sieve a:¥lib¥gnulib.a a ： ¥lib¥floatfnc.1 
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• J スト 2 -a 


1 

拿 エラトステネスのふるい XC VER1.01 

1 

零 エラトステネスのふるい XC VER2.0 

2 


2 


3 

include t efunc.h 

3 

INCLUDE fefunc.h 

4 

.COMM sieve, 1000 

4 

•GLOBL _main 

5 

.XREF main 

5 

.GLOBL ^eraseRest 

6 

.XDEF main 

6 

.XREF main 

7 

.TEXT 

7 

.TEXT 

8 

main: 

8 

main ： 

9 

— main: 

9 

LINK A6,*-4 

10 

BRA LI 

10 

PEA 2.W 

11 

L200O1 ： 

11 

MOVE.L #L4,-{SP) 

12 

MOVE.L -4(A6) f D0 

12 

JSR printf 

13 

ADD.L # sieve,D0 

13 

ADDQ.L #8 f SP 

14 

MOVE.L D0 9 A0 

14 

MOVE•L #3,-4(A6) 

15 

MOVE.B (AO),D0 

15 

BRA L5 

16 

EXT.W D0 

16 

L20001 ： 

17 

EXT,L D0 

17 

MOVE.L -4(A6) f D0 

18 

TST.L DO 

18 

ADD.L # sieve,D0 

19 

BNE L8 

19 

MOVE.L D0,A0 

20 

MOVE - L -4(A6)(SP) 

20 

MOVE.B (A0),D0 

21 

JSR eraseRest 

21 

EXT-W D0 

22 

ADDQ.L #4 V SP 

22 

EXT.L D0 

23 

L8 ： 

23 

TST.L D0 

24 

L7 ： 

24 

BNE L7 

25 

ADDQ.L #2 f -4(A6) 

25 

MOVE.L -4(A6) ， - (SP) 

26 

L5 ： 

26 

JSR eraseRest 

27 

MOVE•L -4(A6),D0 

27 

ADDQ.L #4 f SP 

28 

CMP.L #1000,00 

28 

L7: 

29 

BLT L 20001 

29 

ADDQ.L #2,-4(A6) 

30 

MOVE.L #10 f -(SP) 

30 

L5 ： 

31 

JSR putchar 

31 

MOVE.L -4(A6) t D0 

32 

ADDQ.L #4,SP 

32 

CMP.L *1000 y D0 

33 

L3 ： 

33 

BLT L 20001 

34 

UNLK A6 

34 

PEA 10.W 

35 

RTS 

35 

JSR putchar 

36 

LI: 

36 

ADDQ.L #4 f SP 

37 

LINK A6,#-4 

37 

UNLK A6 

38 

MOVE.L #2 f -(SP) 

38 

RTS 

39 

MOVE.L #L4,-<SP> 

39 

eraseRest: 

40 

JSR printf 

40 

~ LINK A6,#-4 

41 

ADDQ.L 58,SP 

41 

MOVE.L 8(A6) f -4(A6) 

42 

MOVE.L #3 f -4(A6) 

42 

MOVE.L 8(A6) ， - (SP) 

43 

BRA L5 

43 

MOVE.L #L4 f -(SP) 

44 

•GLOBL ^eraseRest 

44 

JSR printf 

45 

^eraseRest : 

45 

ADDQ.L #8 f SP 

46 

eraseRest: 

46 

BRA L13 

47 

~ BRA L9 

47 

L20003: 

48 

L20003 ： 

48 

MOVE.L -4(A6) f D0 

49 

MOVE.L -4(A6) f D0 

49 

ADD.L # sieve,D0 

50 

ADD.L # sieve,D0 

50 

MOVE.L D0,A0 

51 

MOVE.L D0,A0 

51 

MOVE.L #1,DO 

52 

MOVE.L #1,D0 

52 

MOVE - B D0,<A0) 

53 

MOVE.B D0 V (AO) 

53 

L13: 

54 

L13: 

54 

MOVE.L 8(A6),D0 

55 

MOVE•L 8(A6),D0 

55 

ADD.L D0,-4(A6) 

56 

ADD.L D0 f -4(A6) 

56 

MOVE.L -4(A6),D0 

57 

MOVE.L -4(A6) f D0 

57 

CMP.L #1000, D0 

58 

CMP.L #1000, D0 

58 

BLT L 20003 

59 

BLT L 20003 

59 

UNLK A6 

60 

Lll: 

60 

RTS 

61 

UNLK A6 

61 

L4 ： 

62 

RTS 

62 

.DC.B $25 f $33 9 $64 t $09 v $00 

63 

L9: 

63 

.DATA 

64 

LINK A6 f #-4 

64 

.EVEN 

65 

MOVE•L 8(A6)4(A6) 

65 

.BSS 

66 

MOVE.L 8(A6) ， - (SP) 

66 

.COMM sieve, 1000 

67 

MOVE.L #L12,-(SP) 

67 

.END 

68 

JSR printf 



69 

ADDQ.L #8 t SP 



70 

BRA LI3 



71 

• DATA 



72 

L4 ： 



73 

.DC.B $25,$33,$64 v $09 f $00 



74 

L12 ： 



75 

.DC.B $25,$33 ,$64,$09, $00 



76 

.EVEN 




=========== sieve.gcc ================ 

本 エラトステネスのふるい GCC VER1.37 

拿 NO^APP 
goc compiled : 

.text 


_main : 


L4: 


•dc.b $25,$33 ， $64,$09，$00 
.even 

.xref — main 
.xdef _main 

link a6 9 #0 
movem.1 d3/a3,-(sp) 
pea 2 
pea LC0 
jar _printf 
moveq.1 #3,d3 
addq.w #8 9 Bp 
lea _sieve,a3 

tst.b (a3,d3.1) 
bne L4 

move•1 d3,-(sp) 
jar _eraseReat 
addq.w #4 v sp 


addq.1 #2,d3 
cmp.1 #999,d3 
ble L6 
pea 10 

jar _putohar 

movem.1-8(a6},d3/a3 

unlk a6 

rts 

.even 

•globl _eraseRest 
_eraseRest ： 

link a6,#0 
movem.1 d3/d4(sp) 
move.18(a6) 9 d3 
move.1 d3 ， d4 
move•1 d3,-(sp) 
pea LC0 
jsr _printf 
lea _sieve f a0 
bra L8 


L10: 


move.b tl 9 (a0 9 d3.1) 

add.l d4,d3 
cmp*1 #999 f d3 
ble L10 

movem.1-8(a6},d3/d4 

unlk a6 

rts 

• data 
. bas 

.xdef _sieve 

• comm _sieve f 1 000 

• text 


でプログラミングを行うための総合開発セ 
ットという意味合いを持っています。 
MAKE . X という強力なファイル保守ユー 
テイリテイもついてきます。実はあまりの 
多機能さに今回は紹介できませんでした。 

また， FM 音源関係では OPM ドライバが 
新しいバージョンとなり，追加 BASIC 関数 
とし て MIDI への 対応もサポートされ てい 
ます。なお，登録され ている MUSIC 2 .FNC 
が本誌で発表したものと同じファイル名と 
なっているようですが，これらは追ってレ 
ポートすることにし ましよう。 

今回の目玉はなんといっても ソースコー 
ドデバッガです。 Microsoft が CodeView と 
いう ソースコー ドデバッガを発売したとき， 

「神の作り給うたデバッガ」と評した記事 
がありましたが，この感覚を味わっていた 
だけるのではないかと思います。 

リスト2 

S-b 


=========== sieve.c == 

# include く stdio.h> 

書 define MAXNUM 1000 

void eraseRest( int )； 

char sieve[ 1000 ]; 

void main( argc, argv ) 
int argc; 

char *argv [】； 


int 


i ； 


printf( M X3d¥t M f 2 )； 
for ( i=3 ； i<MAXNUM ； i+=2 ) 
if ( sievef i ] == 0 
eraaeReBt( i 

putchar( , ¥n , )； 


void eraseRest( seed 
int seed; 


2 -c 


int a = seed; 

printf( "X3d¥t", seed ); 
while (( s += seed ) < MAXNUM 
aieve[ s ]=1 ； 


2 -d 


123456789012345678901234567890123456789012345678901234567890 

111111111122222222223333333333444444444455555555556 
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[第 1 回] 


WMW 


よろこそここへ c 言語 


プログラムって何だろう 

皆さんお待たせしました。いよいよ c 言語入門講座が始まります。 
入門といってももちろん中身は本格派。でも大丈夫，講師の中 
,r, = a 森先生には高度になりすぎないよう編集部からお願いしてあり 

_ ます。ゆっくりそしてじっくりと攻めていきましよう。 


はじめに 

祝一平氏のあとを受けて今月から C 言語の連載を始め 
ることになった中森章です。祝氏の連載は C 言語の基礎 
よりもその応用面に力を入れていたため初心者にはつら 
いものがありました。この連載では C 言語の応用よりも 
基礎的な面に焦点を当てて，初心者が簡単なプログラム 
を作れるようになることを目標にしたいと思います。こ 
こでは C 言語に関する予備知識は特に必要としません。 
ただ，別のプログラム言語 （ BASIC でよい）をさわっ 
たことがあれば理解が少し早くなるかもしれません。 

連®の進め方としては，プログラムの考え方（概念） 
から始めてそれを実現する例として実際のプログラムを 
提示する方法を（可能な限り）とりたいと思っています。 
これは「型」から入る従来の方法とは少々異なります。 
もちろん紋切り型の「型」を繰り返すうちにその本質に 
近づいていくという方法論は大切です力 ? ，私は「型」の 
本質を知ったうえで「型」を繰り返しながらそれを復習し 
図1プログラミングの一般的概念 


目的 


準備 


実行 


プログラ厶- 


-プログラミング- 


図2プログラムの実行段階の概念 


入力 

—> 

操作 

—> 

出力 


プログラムの実行 


ていくほうが効果的だと思います。まあ，どちらにして 
もできるだけ多くのプログラムを繰り返し作ってみるこ 
とが必要なのは同じです。 

使用する C コンパイラは XC を考えています力 ? ，基本 
的にはどの C コンパイラでも動作すると思われます。一 
応 Human 68 k 上の XC と GCC での動作は保証すること 
にしましよう。 

プログラムと h うもの 

C 言語に限らずプロダラミングを行う前に確認してお 
かなければならないことがあります。プログラミングと 
はプログラムを書くことですが，そもそもプログラムと 
はなんなのでしよう。これがわからないうちはいくらプ 
ログラミング言語の文法を知っていてもプログラムを書 
けるようになりません（読むことはできるでしようけど）。 
そこでまず「プログラムとは何 か」 について考えてみま 
しよラ。 

•原因と結果（入力と出力） 

私たちがなにかをしようと思うとき，そこには動®あ 
るいは目的があります。この目的がなければなにも起こ 
りません。因果律"はプログラムの世界でも健在なので 
す。自発的であれ強制的であれ，ある目的を達成するた 
めに私たちはプログラムを作ります。この目的達成のた 
めの手段がプログラミングであるといえます。 

では目的達成のためには何が必要でしよう力 それは 
下準備です。たとえば，世界征服のためには悪の秘密結 
社を作らなければなりませんし，主砲を擊つためには卜 
ランスフォーメーションし なければなりませんし， スぺ 
シウム 光線を出すためには怪獣に痛めつけられなければ 
なりません。着々と準備を重ねたあとで一気にケリをつ 
ける（実行する）のが目的達成のための一般的な過程で 
す。 

目的達成のための手段がプログラミングであるとすれ 
ば，プログラムとは目的達成のための過程を記述するも 
のにほかなりません。したがってプログラムの中には「準 
備」と「実行」の段階が含まれていることになります。 

図1にプロダラミングの一般的な概念を図示しておきま 
す。この図がすべての基本です。 
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さて，プログラムの実行段階をもう少し詳しく眺めて 
みましょう。プログラムの実行はなんらかの効果をもた 
らします。つまり出力です。因果律の観点からは，そこ 
になんらかの原因が必要です。つまり入力です。 

出力としては，さまざまな演算結果，画面やファイル 
へのプリントなどが考えられます。 一方， 入力とは デー 
夕であり，その データは コンソール （キーボード） やフ 
アイルあるいは自分自身（プログラム内に格納され てい 
るか計算して作り出されるかのどちら 力、） から与えられ 
ます。そしてプログラムの実行とは，入力（原因）から 
出力（結果）を得るための操作であるともいえるのです。 
これを図2に示しておきます。 

•変数 

さて，これまでのことからプログラムとは， 

1) 準備を行う部分と， 

2) 与えられた入力を操作して出力を得る部分 

から構成される目的達成のための手段ということができ 
ます。当然ブログラムの主要部は入力から出力を得るた 
めの 2) の部分です。 

ここでひとつの概念を学びましょう。それは変数です。 
変な数。いやそうではありません。内容が変わる数とい 
う意味ですね。内容とはデータのことで，中に入ってい 
るデータが変わる数が変数なのです。しかし，変数は数 
というよりも単にデータの「入れ物 j と思ったほうがよ 
いかもしれません。ある入力を操作してある出力を作る 
と いう プログラムの実行過程に おいては， 入力となるデ 
ータの保存場所や出力されたデータの格納場所が必要と 
なります。そのための役割を変数が果たすのです。 
プログラム内で， 

入力—操作—出力 

という処理はひとつとは限りません。ある操作の出力が 
別の操作の入力になることもあります。プログラムの内 
部では「変数からデータを持ってきて別のデータに変換 
し別のあるいは同じ変数に格納する」という処理が至る 
ところで行われているのです。 

このように入力を出力に変換する小さな処理（ミクロ 
な処理）がいくつも寄り集まって図2に示すようなプロ 
グラム全体の実行という処理（マクロな処理）が実現さ 
れるのです 2 し 

したがって，それぞれの処理と処理の間でデータを受 
け渡しするための道具として変数が活躍するようになり 
ます。変数の役割を図3に示しておきましょう。 

•副作用 

ところで，ここまで読んできた人はある疑問を抱かれ 
るかもしれません。たとえば，画面へのプリントを考え 
るとその場合は変数に格納すべきデータを出力してこな 
いのです。この場合，プログラム全体の マクロな 処理の 
実行結果として画面にプリントされる動作も出力には違 
いありません（図2は満たされる）が，プログラムを構 


成するミクロな各処理からの出力（データ出力）は存在 
しません（図3が満たされない）。 

そこで図3を修正する必要があります。すなわち，プ 
ログラムの実行部の構成要素である「ミクロな処理には 
出力がないこともある」ということを付け加えます。た 
だし，この場合本当に出力が何もなければその処理は存 
在する意味がありません。存在しているからには何か理 
由があるのです。 

実はこのような処理ではデータ出力がない代わりにプ 


変数 

—> 

操作 

—> 

(変数） 
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(副作用) 


ログラムの実行環境（コンピュータ）に対してなんらかの 
使力き力、け（プリントせよ）を行っているのです。これは 
副作用 3 > と呼ばれます。これはデータではなく，環境に 
対するす旨示の出力なのです。副作用を考慮して図3を書 
き換えたものが図4です。 


1) 因果とは現在の不幸は前世の悪事の必然的結果であるということ。 

通常は悪い意味に使う。ここでは単に原因があるから結果があると 
いう意味。 

2) ドラクエIVにおけるスライムとキングスライムの閲係みたいなも 
の。じゃないかな。 

3) 操作の結果を変数に代入するのではなく，一度に複数の変数の値 
を変える操作も副作用といえる。多くのプログラミング言語では， 

計算式による演算は通常はデータ出力のみで副作用を伴わなし、操作 
であるが，サブルーチンなどの副プログラムに関しては，データ出 
力を伴う操作を「関数 j, 副作用のみの操作を「手続き」といって 
2つを区別する。 

プログラミンク言語。 

これまでの説明でプログラムというものの実体がわ 
かってきたのではないでしよう力、。つまり，変数（入力） 

を変数（出力）ゃ副作用に変換する操作の集まりがプロ 

図3変数の役割（ミクロな処理) 


— 操作 — 変数 


(出力) 


図4プログラム実行のミクロな処理 


変数 

(入力) 
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グラムです。ここではそのようなプログラムを記述する 
言語！：いう観点から見たときの C 言語の特徴について考 
えてみましよう。 

•プログラミング言語の構造 

図1に示す操作（プログラミング）を実現するための 
言語がプロダラミング言語です。そこには準備段階と実 
行段階があり，プログラミング言語もこの構造を反映し 
たものでなければなりません。準備とは定義に対応しま 
す。変数や関数，手続き 4 ^の定義がこれに相当します。 
実行とは定義した変数，関数，手続きを使用した操作で 
す。式の演算や関数呼び出しなどがこれに相当します。 
定義と操作，つまり準備と実行です。この2つを実現す 
る手段がどんなプログラミング言語にも必ず備えられて 
いるのです。 

しかし，実際のプログラミング言語には，さらにこの 
演算操作がどのような順序で実行されるべきか指定する 
機能が必要になります。条件分岐や繰り返しを指定する 
機能です。これらのことを考慮するとプログラミング言 
語は図5に示す構造を持っているといえるでしよう。し 
たがって，あるプログラミング言語を学習するときは， 

1) 変数や関数の定義の方法 

2) 式の書き方や関数の呼び出し方 

3) 制御構造 

がどうなっているかを知れば文法のほとんどを征服した 
ことになります。 

世の中に星の数ほどプログラミング言語はありますが， 
図5に示す構造を持たない言語はまずありません。ちよ 
っと変わり者の LISP や PROLOG という言語でさえこ 
の構造からはみ出すことはできないでいるのです。 

籲なぜ C 言語なのか 

すでに述べてきたようにプログラミング言語はどれも 
同じ構造を持っています。それならば，ある目的を達成 
するためにはどの言語を使用しても同じはずです。しか 
し，世の中では C 言語が使用されることが多いようです。 
これはどうしたことでしよう。 

例を挙げれば，たとえ基本的な構造が同じでも人気の 
ある車とそうでない車の差は歴然としています。車を購 
入する人はたいていなんらかのポリシー（かっこよさ， 
加速性,予算，燃費など）を持って，それにいちばんマッチ 
する車を選びます 5 しきっと C 言語はいまの時代の要求 
にいちばんマッチしている言語なのでしよう。 C 言語の 
利点については いろいろな 人が いろいろな ところで述べ 
ています。それらはだいたい似通ったものです力 f ，ここ 
図5プログラミング言語の構造 


プログラミング言語 


におもいっきり王観を交えてまとめてみましよう。 

1) 覚えることが少ない 

C 言語はほかの言語と比べると制限がないのではと思 
えるほど自由な形式でプログラムを書〈ことができます。 
複雑な処理はすべて関数に任せて自分では何もしないと 
いう安易な（素晴らしい）性格の言語であるため，プロ 
グラムの記述に関して覚えることが少ないのがいいです 
ね0 

2) 背景に崇高な思想がない 

多くのプログラミング言語はコンピュータの素人に事 
務計算や数値計算を行わせるようにしたもので，変なこ 
とをしてコンピュータを暴走させてしまわないように厳 
しく エラー チェックをしています。またこれらの言語は 
プログラムのなんたるかを教えるためにお行儀の いい （厳 
しい）プログラミング作法を要求してくるのです。 

しかし， C 言語は生い立ちからして， 0 S を記術する 
ために専門家が使うことを目的として作られたためエラ 
ー チェックをほとんどやってくれません。そこを逆手に 
取って技巧的なプログラミングも可能になるのです。プ 
ログラマが見逃してくれよと思うところはほとんど見逃 
してくれますし，プログラムを暴走させることもし放題 
です。 

3) 便利なデータ構造を備えて いる 

文法が単純な反面，データ構造は結構豊富です。特に 
ボインタと構造体はほかの言語と比べると扱い方が単純 
なうえに強力なデータ处理を可能にしています。一見グ 
ータラで何もできないように思わせておいて実はキラリ 
と光るものがある山岡士郎的言語なのです。 

4) 高級なアセンブリ言語として使用できる 

本来 C 言語はミニコンのアセンブリ言語を高級言語の 
ように使えるように拡張したものです。その文法にもア 
センプリ言語の概念が少なからず反映されています。と 
ころで，アセンブリ言語は CPU から見れば最強の言語 
です。それを高級言語のように使用できるのですからこ 
んな心地いいことはありません。ここでいちばんの利点 
は開発期間の短縮です。それなりの性能を持ったプログ 
ラムを早期に開発できるのですから，多くの職業プログ 
ラマが飛びついたのも当然です。 

5) アセンブリ言語への逃げ道を用意している 

いくらアセンブリ言語に近いといっても，所證はアセ 
ンブリ言語で（上手に）書いたプログラムにスピードも 
コードサイズも及びません。そこで， C 言語ではアセン 
ブリ言語のプログラムを容易に結合できるようになって 


プログラミング言語 =定義十操作 + 順序制御 
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います。 FORTRAN などでも裏技としてアセンブリ言 
語との混合を許す処理系がありますがこれは本道ではあ 
りません。しかし， C 言語ではアセンブリ言語との混合 
は日常茶飯事に行われているので，それをやっても卑怯 
だと非難されることはありません。 

争 C 言語は初心者に有用か 

これまでに示した特徴を見ると C 言語はかなりいい加 
減な言語であるといえます。記述形式が自由だ（何を 
やってもいい）という点は「型」から入ってくる初心者 
プログラマにとっては戸惑いの種でしかありませんし 6》 ， 
すぐさま暴走したのではデバッグが大変です。また ， C 
言語はアセンブリ言語を拡張したものですから，高級言 
語一本槍でアセンブリ言語の経験のない人には理解でき 
ない概念がいくつかあります。 

4〜5年前の某雑誌に載った C 言語の解説記事を読み 
返してみると 「 C 言語は lint ” なしでは使えたものでは 
ない j ということが至るところで述べられています。こ 
れはあまりにいい加減な（これまでの高級言語とは違う） 
言語がもてはやされていることに対する非難だったので 
はないでしよう力、個人的にはこの意見は C 言語の本質 
を見ていない的外れなものだと思います力それまでほ 
かの言語に習熟していた人たちの目にそう映ったのも無 
理もないことと思います。 

しかし，そういう専門家の危惧とは裏腹にそのいい加 
減である点を理由として，すなわち，いい加減であるが 
ゆえになんでもありなのを理由として， C 言語が流行して 
きたことは覚えておく必要があるでしよう。 

確かに C 言語の流行を支えた人は初心者ではありませ 
ん。 C 言語をアセンブラの代用品 8 > として使用する人が 
その便利さを実感することで自然と流布していったこと 
に間違いはありません。それならば，初心者は C 言語を 
使ってはいけないのでしようか。答えはもちろんノーで 
す。 

C 言語は既成の型にとらわれない自由な考え方でプロ 
グラミングするのに役立ちます。いくら暴差させたって 
いいじゃありませんか。きっとその経験が後で役立つと 
きも来るでしよう。あるいは， C 言語には文部省特選 (?） 
の構造化プログラミングを行うための仕組みも用意され 
ていますから， FORTRAN や PASCAL のようなお行 
儀のいい高級言語として C 言語を学び始めることも可能 
です。この場合，ただちに C 言語の持つ恩恵をすべて得 
られるわけではありませんが，徐々に C 言語の本質に迫 
っていけばいいでしよう。それでも，ほかの言語を学ぶ 
よりも+ a の利益があるに違いありません。 

結局，いまさら FORTRAN や PASCAL などを学ぶ 
くらいなら C 言語を高級言語のひとつとして学んだほう 
がいいということですね。それで，この連載では当面は 
初心者のための高級言語としての C 言語入門を目指して 
いきたいと思います。 


4) やばい，関数や手続きがどういうものか概念を説明してなかった。 

関数や手続きとはプログラム内に何度も共通に現れる操作に名前を 
つけて別の場所で定義し，その名前で参照できるようにしたもの。 

構造化ブログラミングの観点からは特に共通な操作でなくてもモジ 
ユール化のために関数や手続きが定義される。詳しくはおいおい説 
明する予定。 

5) 最近ではシルビアとレビンが街中（東京近辺）に溢れてるような 
気がする。 

6) ドラクエ III で順々に課せられる小さなクエストをクリアしながら 
船を手に入れるまではよかったが，それ以降はこれといった目的が 
与えられてないため戸惑ってしまう人が多いのと同じ。 

ところで，ソフトウェア会社では字下げの文字数，改行の仕方， 

名前のつけ方などの形式が厳密に規定されているので自由にプログ 
ラムを害くことはできない。こんなのはいやだ。 

7) lint はコンパイラのチェックしない，引数の個数や型の一致，値 
が代入されないままで使用されている変数など，文法エラーではな 
いが意味的におかしな部分（もちろん文法エラーも）を教えてくれ 
るツール。最近は lint 以上に口うるさいコンパイラが多くなった。 

8) 本誌1989年12月号の特集記事 （ P .31) での柷一平氏による，「地 
獄のような86系 CPU のアセンブリ言語の代用品として C 言語がク 
ローズアップされた」という説は結構本当かもしれない。 

C 言 f 吾のプログラム 

今回はイントロダクションということで， C 言語の解 
説を本格的に行うことはしません。それは来月から徐々 
にやっていきましよう。ここでは C 言語のプログラムが 
図5に示す構造を持っていることを確かめておきます。 

• C 言語のブログラムの構造 

図5に示すようにプログラム言語は「定義」，「操作」， 

「順序制御」の3つの部分から成り立っています。これ 
を C 言語の文法でいえば，次のように言い換えることが 
できます。 

定義—変数の定義，関数の定義 
操作—式，関数呼び出し 
順序制御—文 

まだ具体例がないので唐突かもしれませんが，これが C 
言語の本質なので覚えておけばのちのち役に立つと思い 
ます。また，関数が何度も顔を出してきますが， C 言語 
では関数が重要な役割を果たしている 9》 ことにもチヱッ 
クを入れておきましよう。ここでいう関数にはライブラ 
リ関数も含まれます。 C 言語では難しそうな処理はすべ 
てライブラリ関数で行うという傾向があります 3 ライブ 
ラリ関数とはあらかじめ定義されている（ユーザーは定 
義する必要のない）便利でよく使われる関数のことで， 
プログラム中で自由に呼び出して使うことができます。 

このように，「定義」，「操作」，「順序制御」の3つの 
内容（具体的には関数と変数と文と式）さえ理解すれば 
C 言語の文法はおしまいです。こう考えてくると，一見 
は難しそうな C 言語でも簡単に覚えられるような気がし 
ませんか。 

•実例に見るプログラムの構造 

それでは，実際の C 言語のプログラムによって，これ 
までに述べてきたプログラムの構造を持っているこ'とを 
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語 
^言 



別の関数呼び出し (abs ) の値*/ 
算を閏数の戻り値にして返す */ 
定義終わり */ 

: return 文で指定した値 ♦/ 


return ((( x + y )+ abs ( x - y ) )/ 2 ); 


printf("a=%d b=%d¥n", a, b);/* 
printf("a 本 b=%d¥n”, c )； /* 
printf("max2(a,b)=%d¥n", d);/* 


ユーザー定義間数 */ 
a , b の最大値 %/ 

本/ 


/* 

/* 


関数の定義 
戻り値：な 


終わり 


本/ 

本/ 


max 2( x , y ) 
int x , y ; 


/* 

/* 




始まり *〆 

(そのうち説明します） */ 


戈调興レ L »»»»■!、入9 


/本 

この例はブログラムの基本的な構造を示している 
(これはコメントです） 

本/ 

int a , b , c , d ； /* 変数の宣言（定義）本/ 

main ㈠ /* 間数の定義始まり*/ 
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見ていきましよう。リスト1が C 言語の典型的プロダラ 
ムです。プログラムの各部分が何を行っているかはコメ 
ントを付けておいたのでわかるでしよう。とはいえ ， C 
言語を知らない人にはまったくハナモゲラな計算式やプ 
ログラム上の表現があるかもしれませんね。要するに， 
プログラムでは変数 （ a ， b , c ， d ) と関数 （ main , max 2) 
が定義され，変数に入れられた値が定義された関数やラ 
イブラリ関数 ( scanf , printf ) や演算によって操作され 
たり副作用を生み出されていることを感じることができ 
ればいいと思います。これが形式的には図5に示す構造 
を持ち，内容的には図2から図4に示す概念を持ってい 
ることがわかると思います。 

•プログラムの実行は main を実行すること 

さて，リスト1のプログラムは変数と関数の定義を し 
て，さらにそれらを実行するような関数を定義したもの 
です。一応，図2から図5に示す形式をしています力す， 
一歩下がって見るとプログラム自身は変数と関数の定義 
にすぎません。それでは定義された関数（リスト1のプ 
ログラム全体）を実行するとはどういうことなのでしよ 
う。実はそれこそがプログラムを実行するということで， 
C コンパイ ラで コンパイルして できる実行形式のプログ 
ラムを実行するということなのです。 

C 言語のプログラムには main という関数が必ずひと 
つだけあります。プログラムの実行とはこの main とい 
う関数を実行することなのです。したがって，ブログラム 
の実行時の動作を追うためにはプログラムの中で main 
という関数が何をしているかを調べます。 

リスト1 において， main と いう 関数では scanf 関数 
U スト1 


を呼んで，乗算の計算をやって， max 2 関数を呼んで， 
最後に printf 関数を呼んでいますね。プログラムの実行 
ではこれが順に実行されるのです。 

リスト1 のプログラムをコンパイル 10 > して実行す る 
と scanf 関数によって入力待ちになります（プロンプト 
は出ない）から適当な2つの整数をスペースで区切って 
入力してください。式と max 2 閨数で計算された，2つ 
の整数の積と最大値が printf 関数によって画面にプリン 
卜されます。 


9) かつて某氏が c 言語を関数型言語であると本誌の特集記事で紹介 
したことがあった。これに対して別の某氏は c 言語は手続き型言語 
だと憤慨していた。 c 言語は関数型言語である lisp に非常に近いの 
で，あながち間違いではないと私は思うのだが。 

10) コンパイルの仕方はいまさら説明しなくてもいいかな。 c コン 
パイラを持っていて•コンパイルを一度もしたことのない人がいるの 
だろうか。これくらいはマニュアルを読みましよう。 

氺 

今回は C 言語の連載の予告編という意味合いを込めて， 
私が日頃感じていることを書き綴ってみました。プログ 
ラミング言語なんてどれも同じようなもので基本をマス 
ターすればあとはみな同じ，でも C 言語が少しだけ有利 
かなというのが結論です。今回は観念的に走り過ぎたき 
らいがありますが，来月からは明るくて楽しいまっとう 
な C 言語の連載にしたいと思っています。 

ところで，みなさんが C 言語に対して抱いている疑問 
があればどしどし編集部まで送ってください。珍問， 
難問，奇問なんでも結構です。特にみなさんがっまずき 
やすい問題に関してはできる限り答えていきたいと思っ 
ています。 
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画像に変化を与える処理 


今月はちよっとしだ画像処理に挑戦してみましよう。色の性質とデ 
一夕の関係を知れば，お馴染みの論理演算やビット操作によって， 
さまざまな画像処理を行ろサフルーチンが作れます。«用範囲も多 
彩ですからぜひともものにして<ださい。 


今回は先月の矩形領域塗り潰しの応用として，グ 
ラフイック画面の任意の矩形領域に含まれる各点の 
色をある規則によって置き換えるサブルーチンをい 
くつか作ってみる。色の反転（補色に置き換える）， 
色の量子化（階調を落とす〉，モノクロ化，色の平 
均化（ボカし），輪郭抽出といったあたりだ。 

|色とコ - K 

最初に X 68000 上での色の扱いについておさらい 
しておこう。カラーコードと パレット コードの意味 
は明確にしておきたい。 

カラーコードは色そのものにつけられた番号であ 
り，色とカラーコードは1対1に対応する。 X 68000 
のカラーコードは RGB " ごとの輝度各5ビット+ 
RGB 共通の輝度1ビットからなる計16ビットで表 
現される（図1)。 R ， G ， B それぞれにつき，その 


色成分をどのくらい含むかが〇〜31の32段階で表さ 
れ，組み合わせで 32 X 32 X 32 = 32768色，これに輝 
度ビットが0か1かが加わって65536色となる 2 )。 

ここでリスト1の GMACRO . H を見てもらおう。 
今月のプログラムで使うために用意したマクロ定義 
ファイルだ。この下のほう，57〜75行にカラーコー 
ドを RGB に分解するマクロ DERGBI ：， RGB の色 


1 ) RGB はいわずと知れた 
赤•緑*青の光の3原色だ。 

2) カラーコードの輝度ビッ 
卜を立てると， RGB それぞれ 
が 0.5 だけ明るくなる。 

3) RGB からカラーコード 
への変換は IOCS コールでもサ 
ポートされてはいるのだが， 
マクロのほう力、ラメータの 


成分からカラーコードを得るマクロ RGB が定義さ 渡し方の制限が緩いぶん.利 

れている 3 >。グラフィック処理ではよく出てくる操 用しやすい。 

作なので，図1と見比べて動作をしっかりつかんで 
おいてほしい。ビットシフト，ビットマスク，ビッ 
卜列のはめ込みといったビットレベルの操作のオン 

図 I 


bit 15 bit |〇 bit 5 bitO 


緑成分 （0 〜 31) 

赤成分 （0 〜 31) 

青成分 （0 〜 31) 



輝度ビット 

f n — 1 、 1 




■J スト 1 GMACRO.H 



1 

IMASK 

equ 

X0OO0O 00000 00000 1 

44 

MINMAX 

macro 

Y,X 

*x=min(x,y},y=max(x,y) 

2 

BMASK 

equ 

X00000 00000、 1111 0 

45 


local 

akip 



3 

RMASK 

equ 

XO0000 11111 00000 0 

46 


cmp. w 

Y,X 



4 

GMASK 

equ 

Xlllll_ 00000 _ 00000 ^0 

47 


bge 

skip 



5 

專 



48 


exg •1 

Y,X 



6 

RGBMAX 

equ 

31 

49 

akip ： 





7 

RGBGRAD 

equ 

RGBMAX+1 

50 


endm 




8 

t 



51 

$ 





9 

ABS 

macro 

X 拿 absU) 

52 

MEAN 

macro 

Y,X 

*x=<x+y>/2 

10 


local 

done 

53 


add. w 

Y,X 



11 


tat. w 

X 

54 


lar. w 

#1,X 



12 


bpl 

done 

55 


endm 




13 


neg • w 

X 

56 

拿 





14 

done : 



57 

DERGB 

macro 

COLiBiRiG 



15 


endm 


58 


Isr. w 

#1,COL 

尊 COL 

= OGGGGGRRRRRBBBBB 

16 

拿 



59 


move.w 

COL,B 

拿 B 

= OGGGGGRRRRRBBBBB 

17 

SGN 

macro 

X tagn(x) 

60 


lsr. w 

#5,COL 

•COL 

= 000000 GGGGORRRRR 

18 


local 

min»done 

61 


move•w 

COL.R 

t R 

= 000000 GGGGGRRRRR 

19 


tat. w 

X 

62 


lsr • w 

#5,COL 

零 COL 

= 00000000000 GGGOG 

20 


bmi 

min 

63 


move.w 

COL.G 

t G 

= 0000000000 0GGGGG 

21 


beq 

done 

64 


andi.w 

#RGBMAX,R 

拿 R 

= 0000000000 0RRRRR 

22 


move•w 

#l,X 

65 


andi.w 

fRGBMAX,B 

拿 B 

= 0000000000 0BBBBB 

23 


bra 

done 

66 


endm 




24 

min ： 

move •w 

#-1 f X 

67 

拿 





25 

done: 



68 

RGB 

macro 

B,R ， G,COL 



26 


endm 


69 


move • w 

G.COL 

拿 COL 

= 00000000000 GGGGG 

27 

拿 



70 


1b1• w 

#5,COL 

拿 COL 

= 000000 GGQGGOOOOO 

28 

MAX 

macro 

Y ,X *max(x 9 y) 

71 


or. w 

R,COL 

拿 COL 

= 000000 GGGGGRRRRR 

29 


local 

done 

72 


lal• w 

#5,COL 

本 COL 

r 0GGGGGRRRRR 00000 

30 


cmp. w 

Y,X 

73 


or. w 

B,COL 

tCOL 

= OGGGGGRRRRRBBBBB 

31 


bge 

done 

74 


add. w 

COL,COL 

拿 COL 

= GGGGGRRRRRBBBBBO 

32 


move•w 

Y f X 

75 


endm 




33 

done: 



76 

拿 





34 


endm 


77 

RGBtoY 

macro 

B,R,G,Y 



35 

拿 



78 


add. w 

G r G 

零 G = 

2G 

36 

MIN 

macro 

Y f X 拿 min(x 9 y) 

79 


add. w 

R.G 

拿 G = 

2G+R 

37 


local 

done 

80 


move.w 

G,Y 

ty = 

2G+R 

38 


cmp. w 

Y t X 

81 


add. w 

Y.Y 

tY = 

2<2G+R> 

39 


ble 

done 

82 


add. w 

G,Y 

ty r 

3(2G+R> 

40 


move.w 

Y,X 

83 


add • w 

B,Y 

尊 Y = 

6G+3R+B 

41 

done: 



84 


ext* 1 

Y 



42 


endm 


85 


divu.w 

#10,Y 

拿 Y = 

<6G+3R+B}/10 

43 

4 



86 


endm 
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4) 一般には CRTC のような 
(プロセッサから見ての）外部 
デバイスは I/O 空間に割り付 
けられるものだが，680㈤は 
モ トローラの 伝統で I/O 空間 
というものを持たず， I/O を 
メモリ に マッ ビングする“ メ 
モリマップド I/O ( memory m 
apped I/O)” が採用されている 
(英語の発音に従うなら メモ 
リマップトと表記すべきだが, 
ここでは"日本古来”の伝統 
によリメモリ マップ ドと濁つ 
た表記を採用した）。 


パレードだから，このあたりに不安のある人は注釈 
を参考にデータの変化を追ってみること。 

色につけられた絶対的な番号であるカラーコード 
に対して， ハ。レット コードのほうはいってみるなら 
画材の パレット （一枚板のじやなくて小学校の図工 
の時間に使ったような枠がたくさんあるヤツ）の枠 
についた番号であり，特定の パレット コードがどの 
色にあたるかは決まっていない。 パレッ トの設定 
(枠に置いた絵の具の色）によってどうにでも変わる。 
ただし，画面モードを IOCS などによって初期化し 
たときにはあたかも パレ ットコードの各ビットが， 

GGGGGRRRRRBBBBBI (65536 色モード時） 
GGRRRBBB (256 色モード時） 

GRBI (16 色モード時） 


のような意味を持つかのように初期化される。とく 
に65536色モードにおける初期状態ではパ.レットコ 
ー ド =カラー コードとなる c 

G - RAM に書き込むデータはパレットコードで 
あり，ディスプレイへの表示の際には CRTC ( CR 
T Controler :画面制御を行う LSI ) が G - RAM の 
内容を読み出したうえでパレットの設定を参照し， 
カラーコードに変換してくれている。こういう仕組 
みだから，パレットを変更すると瞬時に画面の色も 
変わるというわけだ。 

パレットの設定は CRTC の内部レジスタを書き 
換えることで行う〇 CRTC のハ。 レツ トレジスタはス 
ーパーバイザ空間の E 82000„番地以降256ワードに 


マッピング(割り付け）されており，68000からはこの 
メモリ領域を窓口としてハ。レットレジスタを読み書 
きするようになっている 4》 。要するに， E 8200 0 H 〜 E 8 
21 FF H のメモリ領域の適当なアドレスにカラーコー 
ドを書き込むことでパレットが設定できるわけだ。 
16色モードや256色モードでは E 82000 H 番地から 

の1ワードがパレッ トコード〇， E 82002 h 番地から 
がパレ ツ ト コード 1……というようにアドレスとパ 
レットコードは素直に対応している。 

リスト 2 GSAVEPA し S 


include 

include 


3 

% 




4 


.xdef 

gsavepalet 

5 


• xdef 

gloadpalet 

6 

t 




7 


.text 



8 


• even 



9 

拿 




10 

gsavepalet : 



11 

FNO : 

: 8 



12 


link 

a6,»0 


13 





14 


move.1 

* 256 * 2 ,- 

{sp) 

15 


pea.1 

GPALET 


16 


move.w 

FNOU6), 

-(sp) 

17 


DOS 

_WRITE 


18 





19 


unlk 

a6 


20 


rts 



21 

拿 




22 

gloadpalet : 



23 

FNO = 

: 8 



24 


link 

a6,#0 


25 





26 


move.1 

#256»2,- 

(sp) 

27 


pea •1 

GPALET 


28 


move.w 

FNO(a6), 

-(ap) 

29 


DOS 

_READ 


30 





31 


unlk 

a6 


32 


rts 



33 





34 


.end 




do9cal 1 »mac 
gconat•h 


ア ドレス 82000 H + パ レツトコード x 2 

だ。ところ力 ? ，65536色モードではパレットレジス 
夕の数が全然足りないので，かなり変則的な形でパ 
レットが実現されている0 65536色モードでパレッ 
卜を変更したいという場面はあまりないとは思うが, 
簡単にまとめておこう。 

4桁の16進数 mmnnH で表されるパレットコード 
には， 

H = E 82002«+ ( mm „& FE H ) X 2 +( mm H & 1) 

L = E 82000 H + ( nn H & FE H ) x 2+( nn H & l ) 

の 2 つのアドレスが対応し，アドレス H で指定され 
る1バイトにカラーコードの上位バイト，アドレス 
L にカラーコードの下位バイトが格納される。明ら 
かにパレットコード mmXX H で表される256色につ 
いてアドレス H は共通となり，パレットコード XX 
nn H とアドレス L についても同様の256対1の対応 
が見られる 0 このため，ハ 0 レットコード mmnn H の 
パレット設定を変更すると，ハ。レットコード mmX 
X H で表される256色と XXnn H で表される256色の計 
511色 （1 色はダブり）の設定も同時に変わってし 
まうことになる。この様子は， 
int x，y 

screen 1，3,1，1 
for y =0 to 255 
for x =0 to 255 

pset ( x ， y，（y shl 8) +x ) 
next 
next 

のような X - BASIC プログラムで画面に65536色を 
表示したうえで適当にパレットを変更してみるとわ 
かるだろう。 

本筋からは離れるのだが， パレ ットの話の最後に 
パレット のセーブ•ロードを行うサブルーチンを示 
しておく （リスト2)〇入出力先のファイルハンド 
ルをスタックに積んで呼び出す。見てのとおり ， DO 
S 3 —ル WRITE と READ で E 8200 0 H 番地以降の512 
バイトをセーブ • ロードしているだけだ。読み書き 
の過程ではスーパーバイザ空間をアクセスすること 
になるわけだが，このサブルーチンは ユーザーモー 
ドで呼び出してもちゃんと動く（問1:なぜか？）。 

では，ぼちぼちと本題に入ろう。力 ? ，その前に 
ひとつだけ断っておかなければなるまい。これから 
作るプログラムは基本的には65536色 モードに しか 
対応していない。また，パレットは初期状態のまま 
であることを前提としている。 G - RAM に書き込 
まれて いるパレ ッ トコード = カラーコード を仮定し 
ないと，処理がややこしく （ものによっては不可能 
に）なってしまうからだ。 

|色の反転と量子化 

まず，色の反転と量子化をまとめて片づけてしま 
おう。実はどちらも先月作ったプログラムを利用す 
ることで実現できる。 
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リスト 4 GMONO.S 



.include 

i gconst.h 



.include 

， gmacro.h 



.xdef 

gmonotone 



.xref 

gramadr 



.xref 

gfciip 



.xref 

grayscale 



.offset 

0 


X0 ： 

• ds. w 

1 


Y0 ： 

.ds • w 

1 


XI: 

• ds. w 

1 


Y 1 ： 

• ds • w 

1 



.text 

.even 



拿 

gmonotone : 



PARPTR 

= 8 




link 

a6 9 #0 



movem.1 

dO - d 7/ a 0- al ,-( ap ) 


move.1 

PARPTRU6) ,al 

* & 1=バラメータ受け渡し領域 


movem.w 

(al),d0-d3 

* d 0- d 3 に座標を取り出す 


bsr 

gfciip 

* クリッピングする 


bne 

done 

*Z=0 なら描匯の必要なし 


bsr 

gramadr 

*G-RAM 上のアドレスを得る 


sub.w 

d0,d2 

*d2= 横ドット数- 1 


sub. w 

dl,d3 

*d3= 縦ドット数- 1 


move.w 

# GNBYTE -2 ,dl 

*dl= ライン （ U1 のアドレスの差 


sub.w 

d2,dl 

本（右袖から下のラインの 


sub 

d2,dl 

*左袖まで） 


lea.l 

grayscale,al 


100 pi : 

move•w 

d 2, d 4 

*d4= 横ドット数- 1 

loop2 : 

move*w 

(aO),d0 

* カラーコー ドを取り出し 


DERGB 

d 0, d 5, d 6, d 7 

拿 RGB に分解する 


MAX 

d6,d5 

* R , G,B の进大谪を 


MAX 

d7 ,d5 

* d5 に求め 


add.w 

d 5, d 5 

*rgb(d5 ,d5 ,d5 ) の色で 


move.w 

0(al,d5),(a0) + 

* 点を打つ 


dbra 

d4, 10 op2 

*繰0 返す 


adda.w 

dl,a0 

* すぐ下のラインへ 


dbra 

d3, 100 pi 

» 繰り返す 

done : 

movem.1 

(sp)+,d0-d7/a0-a 

il 


unlk 

rts 

a6 



.end 


ットを使って 64 階調を出すこともできる力 ? ，ここで 
は輝度ビットを無視した 32 色のみを使うことにしよ 
う。アルゴリズムとしては，各点ごとに明るさ（仮 
に L とおく）を 32 階調で求め， R=G=B=L となるよ 
うな色に置き換えていけばよい。肝心の明るさを求 
める部分だが，とりあえずは RGB のうち最大のも 
のを使うこととしよう。プログラムはリスト 4 のよ 
うになった。 

下準備部分やメインループの組み方などの基本部 
分は前回のリストとほぼ同じだ0パラメータを取得 
し実画面の範囲でタリッビングしてから領域の左上 
隅の G-RAM アドレスを求め， y 座標と x 座標に関 
する2重ループの中で1ドットずつ処理していく。 
ただ，外側の y 座標に関するループはほんのわずか 
に最適化されている。見比べてみて，違いとその意 


1 


•include gconst•h 

17 

PARPTR =12 


2 

X 


18 

movem.1 

al,-(sp) 

3 


.xdef gnegate 

19 

link 

a6,#0 

4 


.xref gfili_xor 

20 



5 

X 


21 

move•1 

PARPTR(a6),a 

6 


.offset 0 

22 

move.w 

#$fffe,-(ap) 

7 

本 


23 

move.1 

4(al),-(sp) 

8 

X0 ： 

•ds.w 1 

24 

move.1 

(al),-(ap) 

9 

Y0 ： 

. d9 • w 1 

25 

move•1 

sp,-(sp) 

10 

XI ： 

. ds . w 1 

26 

bsr 

gfill_xor 

11 

Y1 ： 

•ds.K 1 

27 



12 

本 


28 

unlk 

a6 

13 


.text 

29 

movem•1 

(ap)+,al 

14 


.even 

30 

rts 


15 

本 


31 



16 

gnegate : 


32 

.end 



5) 光は混ぜ合わせること 
によって明るくなり，白に近 
づいていく。だから加法混色。 

6) 絵の具は混ぜ合わせる 
ことによって（吸収される光 
が多くなるため）暗くなり， 
黒に近づいていく。だから減 
法混色。減法混色系の3原色 
シアン.マゼンタ.黄色（青 
•赤 • 黄は不正確）は加法混 
色系の3原色である赤•青 • 
緑の補色となっている。 


リスト 3 GNEGATE. S 


正しい表現ではないのかもしれないが，ここでは 
色の反転=補色への置き換えと考える。補色とは補 
い合うことで無彩色となるような色で，加法混色 5 > 
における補色と減法混色 6〉 における補色があるが一 
般には前者のことを指す。白から引いた残りの色と 
いえばわかるだろう。カラーコードのレベルでは， 
補色を求める操作はカラーコードの各ビットを反転 
する処理に置き換えて考えることができる（問2: 
なぜか？）。 

任意の 16 ビットデータは FFFF„ と XOR をとる 
とビットが反転するから，先月作った XOR モード 
のボックスフイルルーチンで描画色として FFFF h 
を指定すれば色の反転が行えることになる。ハ。ラメ 
ータのつじつまを合わせて gfill_xor を呼び出すだ 
けのものだが，一応リスト 3 に矩形領域の色反転を 
行うサブルーチンを示しておく。 メインルーチンは 
用意していないから，前回や前々回のプログラムを 
適当に流用してもらいたい。 

続いては色の量子化， RGB 各 32 階調から 16 階調 
や8階調なんかに階調を落とす操作を考える。絵の 
質をなるべく損なわないようにして色数を減らすの 
ではなく，単純に微妙な色の変化を切り捨てる。当 
然，階調を落とすほど絵は粗くなっていく。場合に 
よっては画像圧縮の前処理に使えないこともないが， 
特殊効果だと思ってもらったほうがいい。色の量子 
化は カラーコードのレベルで 考えると， RGB それ 
ぞれの下位ビットをマスクする処理に相当する。 
ビットマスクといえば AND ， ということは前回の 
AND モードのボックスフイ ルルー チンが利用でき 
る。 RGB に分解してから下位ビットをマスクする 
までもなく， カラーコードと， 

111101111011 1100 b 

で AND をとれば各色 16 階調，以下， 

111001110011 1000 b 8 階調 

110001100011 0000 b 4階調 

100001000010 0000 b 2 階調 

となる。プログラム例は示す必要もないだろう。 

なお， AND モードのボックスフイ ルルー チンは 
ほかにも，描画色に， 

111111111111 1110 b 

を指定することで輝度ビットだけをマスクしたり （6 
5536色から32768色への変換）， 

000000000011 1110 b 
000001111100 0000 b 
111110000000 0000 b 

によってそれぞれ青，赤，緑成分だけを残したりと 
いった用途にも使える。 

|モノクロ32階調に 

今度は画像の モノクロ 化だ。 モノクロと いっても 
白黒の2値化ではなく，グレイスケール（黒〜灰色 
〜白に段階的に変化するような色の並び）に変換す 
ることを考える。 X 68000 では単色であれば輝度ビ 


1234567890123456789012345678901234567890123456789012345 

1111111111222222222233333333334444444444555555 
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7) ちなみにこのテーブル 
は X - BASIC で短いプログラム 
を害いて計算させ，ファイル 
に出力したものだ。32個程度 
のテーブルであれば手作業で 
作成できる範囲だが，プログ 
ラムにやらせたほうが間違い 
がない。 


味を把握してもらいたい。 

41行以下が1ドット分の色変換を行う部分だ。41 
〜42行で色コードを取り出し RGB に分解してから， 
マクロ MAX でまず青成分と赤成分の大きいほうを 
d 5 に求め （43 行)，続いて緑成分と d 5 の大きいほう 
を d 5 に残す （44 行)。結果的に RGB のうち最大の 
ものが d 5 に得られた。これから R = G = B 二 d 5 となる 
色を求めるわけだが，リスト4ではその手間を惜し 
んで，あらかじめ作成しておいた32色の色テープ 
ル 7〗 から適切な値をひいてくるという手を使ってい 
る （45 〜46行）。テーブル自体はほかにも使い道が 
ありそうだから別 ファイル （リスト 5) にしておいた0 

さて，リスト4ではとくに根拠もなく RGB のう 
ち最大のものをその点の明るさだとみなした。妥当 
な線だとも思える力す，実際にはなにかと不都合があ 
る。もっとも明るい赤と青で塗り分けられた部分は 
真っ白に変換されてしまうし，また，変換の前後で 
明るさのバランスが崩れ，ときには明暗が逆になっ 
たように見えることもある。切り捨てた情報量も大 
きい力?，これは人間の目（そして脳）が純粋な光の強 
弱だけで明るさを判断しているのではないため，と 
いうことらしい。画像をモノクロに変換するときに， 
この人間の視覚系の性質を考慮すればより自然な変 
換が行えるだろう。これには，カラーテレビ放送の 
仕組みが参考になる。詳しくは稿末に挙げた参考文 
献を見てもらうことにし，ここではプログラムを書 
くのに必要なだけの情報を示しておく。 

アメリカや日本などのテレビ放送では画像を YI 
Q の3信号に分解して送る方式を採用している。大 
雑把にいうと Y が輝度， I が人間の目にとって重要 
な（色の違いに敏感な）肌色を含むオレンジからシ 
アンにかけての色調， Q はそれ以外の色を表す。テ 
レビの受像機側ではこれを RGB に再構成して画面 
に映している。 3つの信号に分けるのなら最初から 


リスト 5 GRAYSCALE. S 


1 


.xdef 

grayscale 

2 

本 




3 


• data 


5 

本 




6 

grayscale : 



7 


• dc 

w 

$0000, $0842,$1084,$18c6 

8 


• dc 

w 

$2108,$294a,$318c l $39ce 
$4210, $4a52, $5294 ,$5ad6 

9 


.dc 

w 

10 


.dc 

w 

•6318,$6b5a,$739c,$7bde 

11 


• dc 

w 

$8420 ,98c62,«94a4,$9ce6 

12 


«dc 

w 

$a528,$ad6a,$b5ac, 拿 bdee 

13 


.dc 

w 

$o630,$ce72,$d6b4,$def6 

14 


• dc 

w 

$e738,$ef7a,$f7bc,$fffe 

15 





16 


.end 




U スト 6 GM 〇 NOY.S 


4 

19 

.xdef 

gmonotone_y : 

graonotone_y 


41 

loop2 : 

move.w 

(a0),d0 

» カラー コー ドを取り出 

42 


DBRGB 

d0,d5|d6id7 

*RGB に分解する 

43 


RGBtoY 

d5,d6,d7 ( d0 

»Y を d0 に求め 

44 


add. w 

d0,d0 

0(al t d0) t (a0)4 

本 rttb(d0,d0 ， d0 } の色で 

45 


move.w 

* 点を打つ 

46 


dbra 

d4, 10 op2 

0 返す 

47 


adda•w 

dl,a0 

♦すぐ下のラインへ 

•IB 

49 


dbra 

d3 1 100 pi 

»繰り返す 

50 

51 

52 

53 

54 

done : 

movem.1 

unlk 

rts 

• end 

(ap)+ f d0-d7/a0-j 

a6 

al 


RGB に分解しておけばいいように思える力 ? ，そう 
なっていないのには白黒テレビとの互換性を保つ必 
要があったこと（白黒放送で使われていた電波の帯 
域に Y 信号を乗せれば白黒テレビでもカラー放送の 
電波を受像できる）と，放送に使える電波の帯域に 
制限がある（人間の目にとって重要でない色は狭い 
帯域に押し込むことで帯域を節約できる）という2 
つの 理由による。 

ここで， Y はちゃんと人間の主観的な明るさの感覚 
を合わせて調整してあるというのがポイントだ。とい 
うことは，画像の各点の色を RGB から YIQ に変換 
し， Y の値に応じた灰色に置き換えるようにすれば， 
それらしいモノクロ画像が得られるだろう。件の文 
献を見れば， 


Y _ 


0.299 0.587 0.114 _ 


R " 

I 

= 

0.596 一0.274 一0.322 


G 

Q . 


■0.211 0.522 0.311. 


. B . 


という式まで載っている。いま必要なのは Y だけだ 
から， 

Y =0.299 R +0.587 G +0.114 B 
となる。 

この式をマシン語で計算するにあたっては小数が 
入って いるの がやっかいだ。しかし，どうせ Y は〇 
〜31の整数で求めるのであり，精度を追求すること 
にあまり意味はない。そこで係数を適当にまる办た 
うえで両辺を10倍し， 

10 Y =3 R +6 G+B 

として整数演算に帰着させる。右辺を計算した結果 
は Y を10倍したものだから，最後にこの値を10で割 
れば Y が得られる。 

リスト6に画像 モノ クロ化サブルーチンの新しい 
版を示す（リスト4からの変更部分のみ）。リスト 
4の版にも使い道はありそうだから，サブルーチン 
名は変えておいた。 Y の値を求めるにはリスト1で 
定義さ.れたマクロ RGBtoY を利用しているので， 
ソース上での修正点はごく僅かだ。マクロ RGBto 
Y の中では例によって乗算を加算に置き換えて計算 
することで遅い乗算命令を使わずにすまし，さらに 
は式を， 

10 Y =3 ( R +2 G)+B 

と変形して計算することで加算の回数も減らしてい 
る。 

|ソフトフ?!■一力 X 7 

次はボカしだ。概念的には色を周囲に少しずつに 
じませてやればよいわけだが，プログラムにするう 
えでは逆に周囲の点から少しずつ色をもらってくる 
と考えたほうがわかりやすい。ボカし具合は色を 
混ぜ合わせる比率と色をにじませる範囲で調節でき 
る。広い範囲ににじませる場合には，中心から遠い 
点からは色を少しだけもらい，近くの点からはたく 
さんもらうというように適当な重みをつけて平均化 
してやると綺麗にボケる。このとき，にじませる範 
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拿右 

move.w (a0),C(al) 
move.w (a2),U(at) 
move.w (a0),R(al) 
move•w (a0) f D(al) 
bar sub 

move.w d0 t (a0) 


movem.1(ap) + f d0-d7/a0-a2 

unlk a6 

rts 


sublp ： 


movero.1 
move.w 
DERGB 
lsl.w 
lsl.w 
lsl.w 


move•w 
DERGB 
add. w 
add .w 
add. w 
dbra 

lsr -w 
lar .w 
lsr .w 


• bss 
.even 


.ds • w 
.end 


dl-d4/al i-(sp) 


(al)+,d0 

* 中心の点 

d0,dl,d2,d3 

拿 RGB ごとに 

#2,dl 

* 4 倍 

#2,d2 

拿 

#2,d3 

拿 

#4-1,d0 

本周囲の 4 点の 

(al)+,d4 

< 色を 
本 RGB ごとに 

d4,d5,d6,d7 

d5,dl 

♦ 加える 

d6,d2 

拿 

d7,d3 
d0,sublp 

t 

#3,dl 

*.8 で 割る 

#3,d2 

本 

#3,d3 

1： 

dl,d2,d3,d0 

(ap)+,dl-d4/al 

GNPIXEL 

拿 カラーコード 


ドに再構成 


U スト 7 GSOFT, S 


loop3 : 


move. 
dbra 


move.w 
move.w 
move.w 
move•w 
bsr 

move.w 
move.w 

adda.w 
dbra 


move•w 
lea.1 
move.w 

move.w 
move.w 
move.w 
move•w 
bsr 

move.w 
move.w 
dbra 


d0,(a0 い 
d4 ， loop2 


*1 ド ， y h * き込む 
*xl-x0-l 回 « 〇返す 


(a0),C(al) 
(a2),U(al) 
(a0),R(al) 
DD(a0),D{al) 
sub 

(a0),(a2) + 
d0 ， <a0> + 


» 右の処理 


dl,a0 
d3, 100 pi 


(x r y) 

* (x,y-1) 

*U+l,y> の代わりに U ， y> 
*(x,y+l) 

* 色を混ぜ合わせる 
* 下のライン用に覚えておく 
* 1 ドット書き込む 

* すぐ下のラインへ 
*yi-y0-i 回»り返す 


d2,d4 
Ibuff,a2 
(a0),L(al) 

(a0),C(al) 
(a2),U(al) 
DR(a0),R(al> 
(a0),D(al) 
sub 

(a0),L(al) 
d0,(a0)+ 
d4, 10 op3 


» 最下ラインの処理 


»d4= 榻ドット数 -2 
*a2= 1 ラインのバッファ 
拿左雄のみ 

*(x-l,y) の代わりに （ x,y> 
«(x,y) 

*(x,y-l) 

Mx+1,y> 

*U ， y+l> の代わりに U ， y) 
♦色を混ぜ合わせる 
*(x-l,y) 

* 1 ドット害き込む 
*JCl-X0-l 回繰り返す 


1 


.include 

gconst• 

h 

73 

2 


•include graacro. 

h 

74 

3 

本 




75 

4 


.xdef 

gsoftfOCUB 


76 

5 


• xref 

gramadr 


77 

6 


.xref 

gfelip 


78 

7 

拿 




79 

8 

DR 

equ 

2 ♦右の点とのアドレスの基 

80 

9 

DD 

equ 

GNBYTE の点とのアドレスの差 

81 

10 

拿 




82 

11 


.offset 

0 


83 

12 

本 




84 

13 

X0 ： 

.ds. w 

1 


85 

14 

Y0: 

• ds • w 

1 


86 

15 

XI ： 

• da • w 

1 


87 

16 

Y1 : 

• da. w 

1 


88 

17 

t 




89 

18 


.offset 

0 


90 

19 

拿 




91 

20 

C ： 

• ds. w 

1 拿中心 


92 

21 

L ： 

.ds.w 

1 * 左 


93 

22 

U ： 

.ds • w 

1 拿上 


94 

23 

R ： 

• da • w 

1 * 右 


95 

24 

D ： 

.da. w 

1 * 下 


96 

25 

PBUFSIZ 




97 

26 

本 




98 

27 


.text 



99 

28 


.even 



100 

29 

拿 




10] 

30 

gaoftfocus : 



102 

31 

PARPTR : 

= 8 



103 

32 


link 

a6.#-PBUFSIZ 


104 

33 


movem.1 

d0-d7/a0-a2 ， - (ap) 

105 

34 





106 

35 


move•1 

PARPTR(a6),al 

*al = パラメータ受け渡し領域 

107 

36 


movem.w 

(al),d0-d3 

*d0-d3 に座標を取り出す 

108 

37 





109 

38 


bar 

gfelip 

* クリッピングする 

110 

39 


bne 

done 

拿 Z=0 なら描 H の必要なし 

111 

40 





112 

41 


bar 

gramadr 

*G-RAfi 上のアドレスを得る 

113 

42 





114 

43 


sub* w 

d0,d2 

*d2= 横ドット败 -1 

115 

44 


sub. w 

dl,d3 

*d3= 縦ドット数 -1 

116 

45 





117 

46 


move.w 

#GNBYTE-2,dl 

*dl = ライン間のアドレスの差 

118 

47 


aub. w 

d2,dl 

* (右唯から下のラインの 

119 

48 


sub* w 

d2,dl 

* 左雉まで） 

120 

49 





121 

50 


movea.1 

a0, al 

* 一#上のラインを 

122 

51 


lea.1 

Ibuff,a2 

* バヅファにコビーしておく 

123 

52 


move•w 

d2,d4 

傘 

124 

53 

loopO : 

move.w 

(al)+,(a2) + 

本 

125 

54 


dbra 

d4,loopO 

本 

126 

55 





127 

56 


subq•w 

#l,d2 

*d2= 横ドット数 - 1-1 

128 

57 


broi 

done 


129 

58 


aubq.w 

*1,d3 

*d3=«| ドット数 - 1-1 

130 

59 


bmi 

done 


131 

60 





132 

61 


lea.1 

-PBUFSIZ(a6),al 


133 

62 

100 pi : 

move.w 

d2,d4 

拿 d4=m ドット败 -1-1 

134 

63 


lea.1 

Ibuff,a2 

*a2= 1 ラインのバッファ 

135 

64 


move.w 

(a0),L(al) 

♦左雉のみ 

136 

65 




Mx-l,y) の代わりに <x ， y) 

137 

66 

10 op2 : 

move.w 

(a0),C(al) 

*(x,y) 

138 

67 


move.w 

(a2),U(al) 

*(x,y-l) 

139 

68 


move.w 

DR(a0),R(al) 

*(x+l,y) 

140 

69 


move.w 

DD(a0),D(al) 

*(x,y+l) 

141 

70 


bar 

aub 

* 色を混ぜ合わせる 

142 

71 


move.w 

(a0),(a2) + 

» 下のライン用に覚えておく 

143 

72 


move•w 

(a0),L(al) 

*(x-l,y) 

144 


囲は正方形にとるよりは円形にしたほうがより自然 
な結果が得られる。 

という話をしておきながら，リスト7に示すサブ 
ルーチンはかなりいいかげんな簡略版になってし 
まった。色をにじませる範囲は上下左右の1ドット， 
混合の比率は中心4 ••周囲1固定となっているし， 
ほかにもぽつぽつと手抜きがある。ひとつの例だと 
思ってもらえればありがたい。気乗りはしないが， 
一応簡単にプログラムの説明をしておく。 

先に114行以下のサブルーチンを見てもらおう。 
ここでは中心の色と周囲の色の RGB ごとの混ぜ合 
わせを行っている。ボカし処理の本体だ。サブルーチ 
ンが呼び出された時点で，いま注目している点とそ 
の周囲の点の色が， a 3 レジスタでボイントされるメ 
モリ領域に18〜25行のような順序 • 構造で格納され 
ている。中心の点の色を RGB に分解してから4倍し, 
これに周囲の色を RGB ごとに足し込んで，8で割れ 
ば色を4:1:1:1:1で混ぜ合わせたことになる。 


62行からメインループが始まる。色の変換自体は 
サブルーチンにまかせているので，メインループで 
は処理対象となる5ドットの色をバッファにセット 
してサブルーチンに渡す以上の仕事はしていない。 
例によって，処理は左上の点から右方向，そして下 
方向に進む。ここで，処理途中におけるある1点に 
注目しよう。すぐ左の点と真上の点はすでにボカし 
処理済みであり，この点の色を拾ってしまうと正し 
い色の平均化が行えないことがわかる。そこで，リ 
スト7では真上の1ライン分は142行で確保した 
バッファに保存しておき，左の点に関しては画面の 
書き換えを1拍遅らせる （72 〜73行）ことで対処し 

ている。 

また，リスト7では，指定された領域の一番上と 
一番下の1ライン，および各ラインの左端と右端を 
特別扱いし，本来であれば指定された矩形領域の1 
ドット外側の点の色を拾うべきところを1ドット内 
側の点の色で代用していたりする。これは指定の矩 


XX 

にに 

りり^ 

ゎ b せ込 

r^ 

>-l.y+l 混ッ 
理 lyly+1.y をド 
処 X X X xfel 

Q* * * * * * 

5 

下 
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* 中心の点 
拿 RGB ごとに 
* 4 倍 

拿 


*RGB いずれか 1 つでも 


move.w 

100 pi: move.w 

100 pZ: move.w 

lar. w 
and. w 
move.w 
dbra 
adda.w 
dbra 


4 

30 

114 

115 

116 

117 

118 

119 

120 
121 
122 

123 

124 

125 

126 

127 

128 

129 

130 


.xdef 
^outline : 
sub: 

raovem. 
move.w 
DERGB 
lal.w 
lal.w 
lsl• w 

moveq. 
8ubip: move.w 

DERGB 
sub. w 
sub* w 
sub. w 
dbra 

tst. w 


goutlxne 


dl-d4/al,-( 
(aU + ， d0 
d0 ， dl ， d2,d3 
#2，dl 
#2,d2 
#2,d3 

#4-l f d0 

<al>+ ， d4 

d4 t d5 f d6,d7 

d5,dl 

d6,d2 

d7 ， d3 

d0•sublp 

dl 


リスト 9 GHALFTONE. S 


done: movem.1(sp)+,d0-d5/a0-al 

unlk a6 
rte 

• end 


bgt white 

tat.w d2 

bgt white 

tst.w d3 

bgt white 

moveq.1 #0 f d0 

bra retn 

white : move•w #$ffff,d0 

retn : movem•1(sp) + ,dl-d4/al 

rts 

本 

.bss 
• even 

本 

lbuff ： .da-w GNPIXEL 
.end 


bsr 

gramadr 

sub. w 

d0 f d2 

sub. w 

dl f d3 

move.w 

#GNBYTE-2,dl 

sub. w 

d2 f dl 

sub. w 

d2 t dl 


平均との篚が 
1 以上なら白とする 


拿黑 


本白 


本左上の G-RAM 上のアドレスを树る 

拿 d2= 横ビクセル数 -1 
拿 d3= 縦ビクセル数 -1 

*dl = ライン間のアドレスの嫠 
< (右袖から下のラインの 
»左唯まで） 


131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 


1 


• include 

go 

2 


.include 


gm 

3 

拿 




4 


.xdef 

ghalftone 

5 


.xref 

gramadr 


6 

7 

t 

.xref 

gfelip 


8 


.offset 

0 


9 

本 




10 

X0 ： 

• ds. w 

1 


11 

Y0 ： 

.ds. w 

1 


12 

XI ： 

.ds .w 

1 


13 

Yl ： 

• ds • w 

1 


14 

* 




15 


.text 



16 


• even 



17 

t 




18 

ghalftone : 



19 

PARPTR 

= 8 



20 


link 

a6，*0 



movem. 1 d0-d5/a0-al ， - (sp) 


move• 1 
movem パ 


bar 

bmi 


PARPTR(a6) f 
(al),d0-d3 


gfclip 

done 


*al = バラメータ受け液し 
*d0-d3 に座棵を取り出す 


* クリッピングする 
*N=1 なら描 H の必要な I 


8) 実際にはグラフィック 
画面の座標や色成分は整数の 
飛び飛びの値しかとらないか 
ら，微分ではなく差分をとつ 
ている。 


9) 色の平均化はもっとも手 

軽なノイズ軽減手段だ。 

■ 

リスト日 GOUTLIN. S 


形領域が実画面の端に接しているときに変なアドレ 
スをアクセスしないようにするための処置だ。が， 
領域が実画面の端に触れていない場合でも同じ処理 
をするというインチキをやってしまった。このため， 
常に領域の外枠部分だけボケ具合がゆるい。隣接す 
る領域を別々にボカすようなことをしない限りは目 
立たないということで目をつぶってもらおう。 


輪郭抽出 


最後は輪郭抽出だ。色の変わり目（とプログラム 
で判断した点）を白，それ以外の点を黒で置き換え 
る。リスト8を見てもらおう0リスト7からの変更 
点のみを示してある。ここで使っている輪郭抽出の 
アルゴリズムは非常に簡単なもので，“上下左右4 
ドットの色の平均よりも明るい点を輪郭とみなす” 
というものだ。数学的には x 方向と y 方向に画像を 
微分する 8〉 ことだったりするのだが，そんなことは 
どうでもいいや。リスト8ではこの処理を RGB ご 
とに行い，いずれか1色でも条件を満たしていれば 
白，そうでなければ黒としている。また，周囲4ド 
ットの平均をとってから中心との差を出すのでは整 
数除算を行ったときに細部の情報が失われてしまう 
ので，中心の明るさを4倍したものから周囲4ドッ 
卜の明るさの単純和を引くようにしてある。 

もともとこのアルゴリズム自体が画像のノイズに 
弱い（むしろノイズを強めてしまう）ということも 
あり，取り込み画像などではそれほどはっきりとし 


た結果が得られるわけではない。“傾向として輪郭ら 
しきものが浮かび上がる”程度だ。あらかじめリス 
卜7などで画像をボカしておけば 9 > ある程度は改善 
されるとはいえ，元絵の傾向によってはプログラム 
の細部を調整してみるべきかもしれない。たとえば, 
RGB すべて（ないしは最低2色）について条件を 
満たした点のみを輪郭とみなすと力、，平均よりも一 
定以上明るくなければならないというように適当な 
しきい値を設けるなどの手段によってチヱックを厳 
しくすることができる。また，上下左右の4ドット 
だけではなく斜め方向も考慮するなど，もう少し広い 
範囲の平均をとるように変更を加えることも考えら 
れる。気がむいたら，いろいろ試してみてもらいたい。 


I 


ここで宿題 


最後にひさびさの課題を出してぉく。今月作った 
サブルーチンを参考に，指定された矩形領域に対し 
て以下のような処理を行うサブルーチンを作ってみ 
てもらいたい0珍しいことに解答（例）がリスト9 
以降に用意してある。 

1) RGB 各色成分を半分にする ghalftone 。 ••リ 
スト9 

2) リスト4を拡張して任意の色相（青系統とか 
セピア調とか）で単色化するような gmonotone _ 
hsv 。 色は HSV の H と S で色を指定するものとする 
( HSV から カラーコー ドへの変換には IOCS コール 
の HSVTORGB が'使える）。：リスト10 


る 

しせ 

1出りわむへ 
»- り割合込ン 
夕 he 取でをきィ 
ーノを2ま*ラ 
5デ. I ドをつ卜すのす 
, d クー体じッ返下返 
0|ス=#コ全つドりぐり 
111 マ d4 色 1» す# 
01 


0 

I +21 

10 ^ p P 
1 d 0 00 
1 4 fooaooo 
1 d— ^ d d^lal 
0 »0 1 »»» 1 » 
% 2 al 50413 
# ddddddd 


4 2 
のを Be : じ 
囲色 RG 滅 
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* すぐ下のラインへ 
* d 3 回 tt 〇返す 


d2 

d3 

(a0),d0 

d0,dl f d2,d3 

d5,dl 

d6,d2 

d7,d3 

#RGBMAX,dl 

#RGBMAX,d2 

#RGBMAX,d3 

dl,d2,d3,d0 

d0, U0 い 

dM , 10 op2 

dl 

d2 

d3 

dl,a0 
d3, 100 pi 


(sp)+,d0-d7/a0-al 
a6 




44 


swap.w 


.include gconst•h 

45 

loop2 ： 

、 swap.w 


• include gmacro•h 

46 

move•w 

拿 

47 


DERCB 


.xdef gaddcolor 

48 


add. w 


•xref gramadr 

49 


add. w 


•xref gfclip 

50 


add, w 

% 

51 


MIN 


.off set 0 

52 


MIN 

% 


53 


MIN 

X0 ： 

•ds•w 1 

54 


RGB 

Y0 ： 

•ds•w 1 

55 


move.w 

XI ： 

•ds•w 1 

56 


dbra 

Y1 ： 

•ds•w 1 

57 


swap.w 

COL ： 

•ds•w 1 

58 


swap.w 

1 


59 


swap.w 


.text 

60 


adda.w 


• even 

61 


dbra 

% 


62 



gaddcolor : 

63 

done: 

movem.J 

PARPTR 

= 8 

64 


unlk 


link a6 f *0 

65 


rts 


movem.1 d0-d7/a0 - al,-(sp) 

66 




67 


/• end 


move.l PARPTR(a6) ,al *al= パラメータ受け液し領域 
movem.w (al) f d0-d3 *d0-d3 に座標を取り出す 


3) リスト 6 を任意の色相に拡張した gmonotone 
_ hsy 。 ： 2) ができれば簡単だからリストはなし 

4) 領域全体に指定色を RGB ごとに加える gaddc 
01 or と色を減じる gsubcolor 。 ：リスト11,12 

5) 【自 rtl 研究】 4) で作ったサブルーチンを利川 
して疑似的に“減法混色によって色を加える”方法 
を考えてみよう（色を加えると暗くなるという減法 
混色の性質と，加法混色系の3原色と減法混色系の 
3原色が互いに補色の関係にあることを利用する）。 

6) 【自由研究】 G - RAM には手を加えずパレツ 
卜の設定のみを変更することで，色反転や量子化， 
モノクロ化を16色/256色モードで実現してみよう。 


7) 【自由研究】リスト8をベースに輪郭を強調す 
るプログラムを作ってみよう。 

ホ 

次回はグラフィックパターンの扱い，いわゆる G 
ET ， PUT とか絵の重ね合わせのあたりをつついて 
みる。で，その次の回は一旦グラフィックを離れて 
ソートとサーチの話，そのまた次の回ではグラフ 
ィックに舞い戻ってライン描画と任意多角形の塗り 
潰しが予定されている。そんなところでまた来月。 
参考文献 

DAVID F . ROGERS , 山口富士夫監修，セイコー電子工業 ㈱ 電 
子機器事業部訳，「実践コンピュータグラフィックス」，日刊 
工業新聞社 


リスト 10 GMONOHSV. S 


PARPTR 

TBLSIZ 


include 

include 

include 


locscall.mac 
gconst.h 
gmacro•h 


xdef gmonotone_hav 
xref gramadr 
xref gfclip 


. text 



51 


lea. 1 



52 

loopl : 

move • w 

.even 



53 

loop2: 

move • w 




54 


DERGB 

\e hav: 

: 8 



55 


MAX 



56 


MAX 

: RGBGRAD 本 2 


57 


add. w 

link 

a6,f-TBLSIZ 


58 


move.w 

movem.1 

d0-d7/a0-al,- 

(ap) 

59 


dbra 




60 


adda • w 

move.1 

PARPTR(a6),al 

»al = パラメータ 受け渡し領域 

61 


dbra 

movem.w 

(al) f d0-d3 

»d0-d3 に座標を取り出す 

62 



bar 



63 

done : 

movem.1 

gfclip 

»クリツビングする 

64 


unlk 

bne 

done 

»Z=0 な 6 描画の必要なし 

65 


rts 




66 



bsr 

gramadr 

» g-ram 上のアドレスを得る 

67 


.end 


10 op0: 


sub.w 

aub.w 

move.1 
lea,1 
lal.w 
raoveq.] 
IOCS 
move•w 
addq.b 
dbra 

move.w 
sub. w 
sub. w 


d0 f d2 

dl f d3 

IK.il )，dl 
-TBLSIZ(a6),al 
#8,dl 

#RGBGRAD-1 f d4 
^HSVTORGB 
d0,(al)+ 

#l,dl 
d4,loopO 

#GNBYTE-2 f dl 

d2，dl 

d2，dl 

-TBLSIZ(a6),al 

d2,d4 

(aO) ， d0 

d0 f d5 f d6,d7 

d6,d5 

d7,d5 

d5,d5 

0(al t d5),(a0) + 
d4,loop2 
dl f aO 
d31 100 pi 


*d2= 横ドット ft-1 
本 d3= 縦ドット «-1 


*hav(H f S f 0) 〜 hsv<H,S,3U の 
* •色テーブルを作っておく 


* dl = ライン間のアドレスの差 
* (右期から下のラインの 
* 左雄まで） 


* d 4=_ ドット败 -1 
* 色コードを取り出し 
*RGB に分解する 
* R , G,B の最大値を 

* d 5 に求め 
* hsv ( H , S , d 5) の色で 

* 点を打つ 
* 繰り返す 

* すぐ下のラインへ 
*« 0返す 


(sp) + ,d0-d7/a0-al 
a6 


リスト 11 GADDCOL 〇闩 .S 


Loopl : 


bsr 

gfclip 

* クリッピングする 


bmi 

done 

*N=1 なら描 H の必餐なし 

bsr 

gramadr 

拿左上の G-RAM 上のァ 

ドレスを得 

sub. w 

d0,d2 

本 d2 = 横 ビクセル败 -1 
*d3 = 縦 ビクセル败 -1 


sub. w 

dl,d3 


move•w 

#GNBYTE-2,dl 

*dl= ライン間のアド 

レスの 差 

aub. w 

d2,dl 

* (右雉から下のライ 

^ ンの 

aub« w 

d2,dl 

* 左雉まで〉 


move.w 

COL(al),d4 

* d 0= 加える色 


DERGB 

d4,d5,d6,d7 

拿 


move.w 

swap.w 

d2,d4 

dl 

拿 レジスタが足りないから 


リスト 12 GSU 巳 COLOR. S ( リスト 11 からの変更点のみ ) 


4 


.xdef 

gsubcolor 




19 

gsubcolor : 





46 

loop2 : 

move.w 

(aO),d0 

本 

色 

コードを取り出し 

47 


DERGB 

da.dl t d2,d3 

拿 


RGB ごとに 

48 


8UD. W 

d5 ,dl 

拿 


色成分を加える 

49 


sub. w 

d6,d2 

拿 



50 


aub. w 

d7,d3 

拿 



51 


MAX 

#0,dl 

拿ただし〇未潢になつ 

52 


MAX 

#0,d2 

拿 


〇に正する 

53 


MAX 

#0,d3 

t 



54 


RGB 

dl,d2,d3,d0 

拿 

力 

ラーコードを得る 

55 


move.w 

d0,(a0) + 

拿 

1 

ドッ ト書 込む 

56 


dbra 

d4 ( loop2 





2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 


ら 

た 

のろし つ る 
夕使出るな 得 
スも〇 え にるをむ 
ジド取 こ 加 上すド込 
レーをを 以正一 0 
タワド分 32 修コト 
一位 1 B 3 成 しに ーッ 
デ上 nRG 色 だ 31 ラド 
色 た 力1 

拿本拿本本本本本本本本本 
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X68000CARD_FNC 用カードゲーム 


ひとり占い TEN 


Iketani Masahiko 


池谷昌彦 


HEART の作者，池谷さんのカードゲーム第日弾です。このシ 
リーズでは初めてのひとり遊び，簡単なリストですから気軽に入 
力さてください。なお，このプログラムの実行には3月号に掲載， 
B 月号に収録された CARD . FNC が必要です。 





_ひとり占ぃ 

この ゲームは もともとトラ ンプの ひとり 
遊びとなっています。ですから対戦相手や 
スコア， 思考ルーチンなどはありません0 
たいていのひとり遊びと 同様， この ゲーム 
もカードをシャッフルした時点ですでに結 
果は確定しています。人間の作業はその結 
果を確認していくことだけなのです。偶然 
性だけで ゲームが 成立しているわけですが， 
逆にいえばその ゲームの 出来不出来によっ 
て占いのような意味で使うこともできるわ 
けです。 



ルール 解説 


まず，場には5枚のカードを横2列，そ 
の下に3枚，計13枚のカードを表向きに並 
ベます。このなかで，足して10になる2枚 
のカード，または同じスートの 10， J ， Q , K を 
まとめて場から取り除いていきます。なく 
なったところには手ネしからカードを加えて 


いきます。 

このようにして，すべてのカードを取り 
除くことができれば，どんな願いもかなう 
といいます。残った手札が10枚以内なら他 
人の援助や協力を得て願いごとがかなえら 


れるでしよう。あまり多く残ったときは， 
障害が多くなり油断すると思わぬ災難にあ 
います。 



操作方法 


プログラムを起動すると画面に場札を表 


示していきます。そのなかから，取り除け 
るものを選んでマウスタリックしてくださ 


い（左右どちらでもかまいません）。選ん 
だ2枚のカードがちゃんと取り除けるカー 
ドならそれらのカードが画面から消えます。 
10, J , Q , K のカードは4枚単位でしか取り 
除けません。 

場札の欠けた部分は「埋」のボタンをク 
リックすることで補充されます。 

どうしても取れなくなった場合は，「終」 
のボタンをタリックしてください。見落と 
しがない かどうかを コンピュータが チ エッ 
クしたうえで，残りのカード数を表示しま 
す。もう一度やる場合は 1 ノプレイの選択で 
「 Y 」 のボタンを，もうやめたいというと 
きは 「 N 」 のボタンをタリックします。 

ホ ** 


プログラムは なるべく簡単に，短く，要 
領よくと思って作ったのですが，実力不足 
で 10 K バイトを超えてしまいました 。 BA 
SIC の場合，行番号だけでも馬鹿にならな 


o とり占い 

TEN 

出したい力ードを 

マウスでクリック 


4 枚«定 

國 liiB 

anil 

w 國 in 

乎礼 

19 

mom 


いなあと，いまさらながら驚いています。 

なお， CARD . FNC の サンプル “99”の 
捨て札の表示法に感心しましたので，今回 
アイデアを借用させていただきました。 

プログラムで使われている関数を図1に 
まとめてみました。カードゲームを作りた 
いという方は参考にしてください。 

図1関数チャート 


■a i n 

-scrn() 

-prep () — r- bacd () 
L teed O 


-p 1 ay ( ) ― I — f i n () — p 
卜 ref () 卜 
L nora() L 


-jd() 
Lowar i (> 


■ada () 
uneru () 
seIect () 


-|~ da 8 u ( c ) 
Hcesu(c) 
^lane () 


10 /* 

20 /* TEN 

30 /* Programmed by M.I.,Jul.20, 1 90 
40 /t 

50 screen 1,1,1,1:console ,,0 
60 int flag=0 

70 dim int cc(51),ba(12),te(38),m(2) 

80 palet(1,0) 

90 /* main program 
100 while flag=0 
110 scrn" 

120 prep() 

130 play() 

140 jd() 

150 endwhile 
160 owari() 

170 end 

180 preparation of screen 

190 func scrn() 

200 int i 

210 vpage(0) 

220 apage(l) ： fill(0,0,511,511,0) 

230 apage(2):fill(0,0,511,511,0) 

240 fill(0,0,511, 144, 10) ： fill(0,145,511,511,8) 

250 box(0,0,511,511,15) : box(1,1,510,510,15) 


U ス中 TEN.BAS 

260 
270 
280 
290 
300 
310 
320 
330 
340 
350 endfunc 
360 /* preparation 
370 func prep() 

380 int i.j,a ， b,k 

390 /* music data set 
400 m_init-() 

410 for i=1 to 8 : m_alloc(i,2000):m_asaign(i,i)：next 
420 ra_trk(1, M q2«23v13o3t200e64") 

4 30 m_trk(2, ,, q8ei5vl3o3tl00c4 M ) 

440 m_trk(3,"q6«56vl4o5tl 00116 ae") 

450 m_trk(4,"q8«57vl3o3tl00c8 M ) 

460 m_trk(5,"q8@57vl3o3tl00e8") 

470 m_trk(6, M q4@57vl3o3tl00g8") 

480 m_trk(7, ,, q8e57vl3o4tl00c8") 

490 m_trk(8,"q8@52vl5o4t80 c2"} 

500 /t deal 


line(2, 144,509,144, 15line(160,2,160,143,15> 

line(320,2,320,143,15):1ine(336 ， 144•336,509,15) 

line<337,328, 509,328, 15) 

symbol <40， 24 , " ひとり占い ’’ ， 1 ， 1•1 ， 15 ， 0 > 

symbol(10, 58," T E N",2,2,2,1,0) 

symbol(8,56," T E N",2,2,2,15,0) 

symbol < 408 ,160 ，"手 札 ， _,1,1,1•15,0 ) 

symbol(4 08,34 4, ， • 捨て札， . ， 1,1•1, 15 ， 0} 

vpage( 6 ) 
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510 


randomize ( val(mid$ (time$ ,4,2) -frights (times ,2))) 

1590 

func owari() 

520 


for i=0 to 51 ： cc(i)=i+l : next 

1600 

vpage(2) ： apage(1} 

530 


m (0) =： X 3: m (1)s 39: m (2> s0 

1610 

£111(0,0,511,511,2) 

540 


for i=0 to 99 

1620 

symbol (272, 400," お疲れ様でした •• ， 1,1,2 ， 15,0) 

550 


a=int(rnd(> *52}:b=int(rnd()*52) 

1630 

endfunc 

560 


k=cc(a):cc(a)=cc(b) : cc(b い k 

1640 

/* 

570 


next 

1650 

func select() 

580 


for i=0 to12 ： ba(i)=cc(i):next 

1660 

int i,x,y,bl r br 

590 


for i=13 to 51:te(i-13)=cc(i):next 

1670 

symbol < 1 76,48 ， " 出したいカードを ” ， 1 ， 1 ， 1 ， 15 ， 0 > 

600 


for i=0 to 51 ： cc(i)=0：next 

1680 

symbol^ 176,80, ••マウスで クリック" • 1,1,1 • 15,0 > 

610 


apage(1) 

1690 

mouse( 1 ) 

620 


bacd() : tecd() 

1700 

msarea( 17,184,327,487) 

630 


circle(296,440,16,4, ， ,350): paint(296 f 432 f 6) 

1710 

aetmspos( 168 , 336 ) 

640 


symbol < 288,4 32 ," 埋 •• •1,1•1 ， 15,0 > 

1720 

repeat 

650 


circle(40, 440.16,4 , f ,350): paint(40,4 32,4 > 

1730 

msstat(x,y t bi,br) 

660 


symbol( 33,432 ， •• 終 " ， 1 ， 1,1,15,0 > 

1740 

until bl=-1 or br=-l 

670 

endfunc 

1750 

mspos< x,y) 

680 


play 

1760 

mouse(0) 

690 

func play() 

1770 

erupms() 

700 


int ss,q,g=0 

1780 

if y<279 and (x> 16 and x<328) then { 

710 


while 

1790 

i=(x-16)¥64:box(15 + i 本 64•183,63 + i 本 64,280,5> 

720 


if m(0)+m(1)>0 then q=select() else q=20 

1800 

} else if (y>288 and y<384> and (x>16 and x<328) then { 

730 


switch q 

1810 

i=(x-16)¥64+5 ： box( 15+( 1-5)*64,287,63+(1-6)*64 ,384, 5) 

740 


case 20 : as=fin():break 



750 


case 15:ref():break 

1820 

} else if y>392 and (x>80 and x<256) then { 

760 


default : norm(q) 

1830 

i=(x-80)¥64+10:box( 79+( i-10)*64,391 t 127+U-10)*64,48 

770 


endswitch 

8,5) 


780 


if as=1 then g=l 

1840 

J else if (y>428 and y<456) and (x>280 and x<312) then 

790 


endwnile 

( 


800 

endfunc 

1850 

i = 15 

810 

/* 


1860 

} else if け >428 and y く 456) and (x>24 and x<56) then i = 

820 

func norm(a) 

20 else-select 〇 

830 


int b,c,4 ， al,bl ， cl ， dl,a2 ， b2 ， c2 ， d2 

1870 

return(i) 

840 


al=(ba(a)-l)mod 13 ： a2=(ba(a)-1)¥13 

1880 

endfunc 

850 


if al<9 then { 

1890 

/本 

860 


b=select() 

1900 

func kesutc) 

870 


if a< >b and b<13 then bl=(ba(b)-1)mod 13 

1910 

int x,y 

880 


if alfbl=8 then { 

1920 

if c く 10 then x=(c mod 本 64 + 15 else x=(c mod 5) 本 64 + 79 

890 


dasu(a):ro_play(4) : dasu(b) : m_play(5) : return<} 

1930 

y=(c ¥ 5) 本 104+183 

900 


} else { 

1940 

box(x,y,x+48,y+97,0) 

910 


keau(a) : kesu(b) : dame() : return()} 

1950 

endfunc 

920 


} else if al>8 then \ 

1960 

/t 

930 


symbol(136,160,° 4 校指定 " ， 1 ， 1 ， 1，15 

1970 

func dasu(c) 

940 


b=aelect() 

1980 

int x,y,s,t 

950 


if aOb and b< 13 then b 1=(ba( b)-1)mod 13 : b2= ( ba( b)- 

1990 

if c<10 then x=(c mod 5 ) <64 + 15 elae x=(c mod 5} 本 64 + 79 

1)¥13 



2000 

y=(c ¥ 5> 本 104 +183 

960 


if bl>8 and b2=a2 then { 

2010 

fillU ， y,x + 50,y+98,0> 

970 


c=select() 

2020 

m(0)=m(0)-l:if m(0)<0 then m(0}=0 

980 


if c く >b and c<13 then cl=(bale )-1)mod 13 ： c2=(ba( 

2030 

m(2)=m(2)+1 

c)-l)¥13 


2040 

s=int(rnd()*96)+352 : t=int(rnd()*24)+376 

990 


} else { 

2050 

c_put(s # t f ba(c)) : box<s-l f t-1,s + 47 f t+96,8) 

1000 


kesu(a):keau(b):dame() 

2060 

ba(c)=0:wait(10} 

1010 


fillU 36 ， 160 ， 200 ， 176,0) •• return ㈠ } 

2070 

endfunc 

1020 


if c1>8 and c2=a2 then { 

2080 


1030 


d=Belect() 

2090 

func umeru() 

1040 


if dOc and d く 13 then dl= ： (ba(d)-l)mod 13 : d2= ( ba( 

2100 

int i,x,y 

d)-l)¥13 


2110 

for i:0 to12 

1050 


)else { 

2120 

if ba(i)= 0 then { 

1060 


kesu(a) : keau(b) : kesu(c) : dame() 

2130 

if i<10 then x=(i mod 5> 本 644 *16 else x=(i mod 5} 本 6 

1070 


fill(136,160,200, 176 ， 0}: return(}} 

4 + 80 


1080 


if dl>8 and d2=a2 then { 

2140 

y=(i ¥ 5)*104+184 

1090 


dasu(a) : m—play< 4) : dasu(b) : m—play(5 } 

2150 

if ra(1)=0 then fill(360,182,408 f 288,0) : break 

1100 


dasu(c) : m play(6) : dasu(d)：ro play(7 ) 

2160 

c 一 put<x ， y,te(m(1)-1)):m 一 play(3} 

1110 


fill(136, 160,200 ， 176 ， 0 > 

2170 

ba(i)=te(m(1)-1) 

1120 


} else { 

2180 

fill(m( U * 2 + 360,182, in (1)*2 + 408,288,0) 

1130 


keau(a) : kesu(b) : kesu(c) : kesu(d) : dame() 

2190 

c put(m(1)*2+358,192,0) 

1140 


fill{136,160,200,1 76 ， 0 H 

2200 

mT0)=m(0)+l 

1150 


) 

2210 

m(1)=m(1)-1:if m(1)<0 then m(1)=0 

1160 

endfunc 

2220 

) 

1170 

/* 


2230 

next 

1180 

func fin( ) 

2240 

fill<416, 304,432 ,320 ， 0> 

1190 


int i,j,e,k = 0 ， rol:0.m2= ： 0,m3=0,m4 = 0，n = 0 

2250 

symbol(416,304,atr$(m( 1}},1,1 ， 1,15,0) 

1200 


if m{0><12 and m(1 ) >0 then e=0:mada( ) : return(e) 

2260 

endfunc 

1210 


for i=0 to11 : for j=ifl to12 

2270 

/本 

1220 


if ba(i ) =0 or ba(j ) =0 then continue 

2280 

func dame () 

1230 


if (ba(i)-l) rood 13+(ba(j)-l) mod 13=8 then k=l 

2290 

symbol U 80,48， M 出せません * '1,1,2,5,0> 

1240 


next : next 

2300 

m_play ( 2 ) : wait<50 > : erupms () 

1250 


for i=0 to12 

2310 

endfunc 

1260 


if ba(i ) >=10 and ba ⑴ <=13 then ml=ral+l 

2320 

/本 

1270 


if ba(i ) >=23 and ba( i ) <=26 then m2=m2+l 

2330 

func mada( ) 

1280 


if ba(i ) >=36 and ba ⑴ <=39 then m3=m3+l 

2340 

symbol(1 68,48 ，"終 つてません"， 1,1,2, 5,0} 

1290 


if ba( i ) >=49 and ba( i ) < = 52 then m4=m4*f 1 

2350 

m—play ( 2 }: wait ( 50 ) : erupms () 

1300 


next 

2360 

endfunc 

1310 


if ml=4 or m2=4 or m3=4 or m4=4 then n=l 

2370 

/* ba card 

1320 


if k+n>=l then e=0 : mada () : return ( e) 

2380 

func bacd( ) 

1330 


if k+n=0 then e=l : return(e) 

2390 

int i 

1340 

endfunc 

2400 

for i=0 to 4 

1360 

/* 


2410 

c put(i*64+16 f 184 # ba(i) ) ：m play ⑴ 

1360 

func ref () 

2420 

c—put<i*64+16,288,ba<i+5” ： m—play ⑴ 

1370 


if m(0)<12 and m(1 ) >0 then umeru( ) • 

2430 

next 

1380 

endfunc 

2440 

for i=0 to 2 

1390 

/本 

judge 

2450 

c 一 put<i*64 + 80,392,ba<i + 10}> ： m_play(1 ) 

1400 

func jd( ) 

2460 

next 

1410 


int x,y,bl,br,ten 

2470 

endfunc 

1420 


fill<321, 2,509 ， 143 ， 12) 

2480 

/* 

1430 


ten=m(0)+m(1 ) ：m play ( 8 ) 

2490 

func tecd( ) 

1440 


if ten=0 then symbol <325， 48 ，" おめでとう ！ " ， 2,2 ， 1 ， 15,0) 

2500 

int i 



else { 

2510 

for i=0 to m(1)-1 

1450 


symbol< 3 44,48 ， str$<ten> + ” 枚 残りました ， 1•1•1,15,0 

2520 

c—put け * 2 + 362, 192,0} 

)) 



2530 

1ine(i*2+362,192,i*2+362,288,8}:m_play(l) 

1460 


symbol (336,96/* もう 1 度 ？"，1 ， 1 , 1 ， 15 ， 0 > 

2540 

next 

1470 


fill(432, 96,463,112,15>: symbol(444,96, M Y n f 1,1,1,1,0) 

2550 

fill<416,304,432,320 ， 0> 

1480 


fill(465 f 96 t 496,112 ,15):symbol(476,96 ， "N M • 1 , 1 , 1,1,0> 

2560 

symbol (416, 304 # str$(m(1)> 山 1 ， 1,15,0> 

1490 


mouse(1) 

2570 

endfunc 

1500 


msarea( 433,96 ,495,111) 

2580 

func wait(t) 

1510 


repeat 

2590 

int i 

1520 


msstat(x ， y,bl,br) 

2600 

for i=0 to t*100:next 

1530 


until bl=_l or br=-1 

2610 

endfunc 

1540 


mspos(x,y} 

2620 

/本 

1550 


mouse(0) 

2630 

func erupms() 

1560 


if x>465 then flag=1 

2640 

fill(161,3, 319,143,0) 

1570 

endfunc 

2650 

endfunc 

1580 

/* 

owari() 




ひとり占い TEN 



住所録あれこれ 


Ogikubo Kei 炎火ぐ 


住所録からいこ5 

実をいうと，私のハードディスクはたい 
へん無 ik な状況になっている。いろんなソ 
フト用のフォーマットで同じ（ような）内 
容のデータベースがいくつもあるのだ。 

CYBERNOTE PRO -68 K 用住所録 ， C 
ARD PRO -68 K 用住所録， Kamikaze の 
データべースフオー マット の住所録 ， Kam 
ikaze の表計算シートに書かれた住所録 ， S 
tationery PRO -68 K の住所録，そして， 
X 68000 じゃないけど電子手帳に入ってい 
る住所録。いまは電子手帳中心にしている 
から， CYBERNOTE のデータベースに 
入っているのが最新バージョンである。 

最初に作られたのが， Kamikaze 用デー 
タベースだ。きっかけは，電話番号簿をリ 
フィルに 印刷して， システム 手帳に挾みた 
い！だった。手書きだ!:削除•挿入•変 
更が面倒で， システム 手帳が厚 く なってし 
まうからね。 

で， Kamikaze のデータベースに打ち込 
んで，表計算シートに名前と電話番号をコ 
ピーして，試行錯誤しながらリ フィルに 印 
刷したのだ。おかげで快適なシステム手帳 
ライフを送らせていただいた。手書きの汚 
い文字より読みゃすい24ドット文字という 
のはありがたいものである。 

その後 ， Stationery PRO -68 K のレビユ 
一を書くために電子手帳に手を出したのが 
間違いだった。 

まず， Kamikaze から CSV 形式 （Kamik 
aze では標準テキスト形式と呼んでいる） 
で項目の順番を合わせてセーブし，それを 
S tationery 用アドレスファイルとして指 
定し （ Stationery は CSV 形式をそのまま使 
う），電子手帳にダウンロード。当時は 2 M 
バイトのメモリがあればなんか広大な空間 
を味わえるような幸せな時代だったので 
(たった1年前！）， Stationery が300 K バ 
イトほど占有したとて許せた。そんでもっ 
て，カレンダーを見たり気紛れで電話した 


りするのに重宝した。 

ところが 、， CYBERNOTE PRO -68 K 
のレビューをすることになって ， CYBER 
NOTE のコンバート機能で CSV 形式を CY 
BERNOTE のデータベース形式にコンバ 
—卜。ここで Stationery は使われなくな 
る。 

CYBERNOTE のほうがマウスベース 
で気軽に使えたし，電子手帳とのインタ 
フェイスがしっかりしてたから。だが問題 
点は，立ち上がりに時間がかかることと， 
いちいち使用するフアイルを指定せねばな 
らないこ！:だった。あっ，と思ったときに 
すぐ立ち上がる機動力と，チャイルドプロ 
セスでも使えるコンパクトさが現代に生き 
る個人 データベースの ポイントなのだ。 

そんでもって，どうせなら，ちゃんと項 
目分けをして本当にほしいデータを集めた 
データベースを作ろう，と ， CARD PRO 
-68 K に手を出したはいいが……。 

住所録は何で作るのがいいか 

私は上の経験を通じてさまざまなことを 
学んだ。「人生に必要な知恵はすべて幼稚 
園の砂場で学んだ」人がいるらしいくらい 
だから，私がここで某かを学んだとしても 
バチは当たらないだろう。いつでもどこで 
も学ぶのが大人の基本である。 

で，結論をいおう。住所録に使うソフト 
は，ワープロだってエディタだって，なん 
だって，それでいいのだ。 

この悟りは重要かもしれない。「住所録 
は データベース だから， データベース ソフ 
卜を使おう」などという言葉尻に踊らされ 
ていると，電通にコロリとだまされて，馬 
鹿な出費を重ねる善良な市民になるのだか 
ら。要はなんだっていいのである。数十件 
程度なら標準ワープロのほうが安くすんで 

(安いどころか無料！）手軽だ。 

しかし，どの方式にも長所短所がある。 
それを追い かけつつ，データベースの 本質 
に迫りたい（これは いつもの 大風呂敷)。 


住所録といってもバカにしてはいけません0 
パーソナル ユーザーに とってのデータべ 一 
スのエッセンスはここにあります。今回は 
いろいろなタイプのソフトを使ってデータ 
を使いやすいかたちで利用するためのボイ 
ントを探ってみましよう。 


十人十色な用途 

パソコンで住所録を管理するとき，なに 
が優れているか，というのを考えてみる。 
簡単だね。変更が楽。追加•削除も楽。印 
刷すれば手書きの暗号文字より綺麗だし， 
楽。データが増えても検索できる。 

しかし，大いなる欠点もある。データを 
手で打ち込まなければならない，こと。手 
で打ち込む労力に対する見返りがほしい。 

1) システム 手帳のリ フィルに 印刷する。 
これはとても重宝する。なぜなら，手書き 
だと分類しようと思うと空白だらけのリ 
フィルに なって手帳がすぐ厚くなるし，な 
にも考えないで書き込むと検索が異様に面 
倒だ。必要な人だけ必要な情報だけ印刷で 
きれば システム 手帳が分厚くならないのだ0 
昨今，会社が引っ越したとか，転勤したと 
かで，年に何人かは連絡先が変わる。そん 
なときなにかと便利である。 

2) 電子手帳で使う。いうまでもなく，電 
子手帳の周辺機器としてパソコンはとても 
優秀である。 

3) 人間，年を取るといろんな知り合いが 
できるので，分類したい。高校時代の同級 
生と会社の同僚とわけのわかんない知り合 
いと Oh ! X 編集部の電話番号なんかがごっ 
ちゃになっていると使いづらいし，50音順 
なんかでは解決がつかない。そんなとき， 
分類コードをつけて分類するとものすごく 
便利である。 

大学時代の知り合いの女の子で独り暮ら 
し，という条件で検索して，そのなかから 
遊んでくれる相手を捜す，なんてのは冗談 
だが，年賀状を誰に出そう力、，とか，引っ 
越し案内を誰に出そう力、，と力％結婚式の 
招待状を誰に出そうか，というとき，いち 
いち名簿や古いアドレス帳を持ち出すのは 
とても面倒だ。で，とにもかくにも知り合 
いが全部放り込んであるデータべースから 
抽出するのだ。 

4) 各種虛礼の際，いちいち手で住所を書 
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くのがうっと一しかったりすると，バソコ 
ン （& プリンタ〉に任せることができる。 

5) お仕事なんかだと，相手先のいろんな 
情報はまとめておきたい。 

6) パソコンは手帳と違って，なくしたり， 
どこかへ紛れ込んだりしない。フロッピー 
をなくすと困るが，まあ，それは例外だ。 

7) 自分の友達の数を確認したり，“君の 
ためなら死ねる”リストを作ったりといろ 
いろ遊んで，アドレス帳おたくを味わう。 

8) その他，あまたのビジネス誌やバソコ 
ン入門をひょ一ぼうするガイド本が語る綺 
麗ごとの数々。 

さあ，これを全部満たそうと思うと，大 
変だ。電子手帳の使えるソフトは任意の分 
類ができないぞ〇リフィル印刷をしたいだ 
けでデータベースソフトを買うのはばかば 
かしいぞ。というわけで次をどうぞ。 

1:付属ワープロで作る 

なんといっても，ただである。さらに， 
郵線や修飾が豊富なので，リフィルに印刷 
すると綺麗だ。データベースソフトのよう 
に項目名やその長さなんていう面倒な設定 
(データベースの設計）がいらない。 

と，いうわけで，数十件程度のデータな 
らワープロで十分である。項目の長さを決 
めなくてもいい（長い会社名のやつは2行 
にするとかができる）。人の扱うデータは 
たいてい非定型だからだ。 

たとえば，第1章を元データにし，第2 
章をリフィル印刷用にする 0 それで，1章 
から印字したいデータだけをコピー&ペー 
ストして使う。 

難をいえば，ソートがない。データが増 
えると管理が面倒，という欠点がある。デ 
ータの桁数を変えるといったことはあまり 
考えたくない。しかし，ワープロで十分だ 
というケースは多いのではないか。 

2 : Hypeword を使う 

付属ワープロよりも， Hyperword は階 
層構造で抜きん出ている。50音ならば，先 
頭シートに“あ’’から“ん”とアルフアベ 
ットなんかを入れて，それをクリックして 
開く子シートにそれぞれ名前や電話番号が 
書いてある，てな寸法だ。検索に便利だね。 
そんでもって，さらに子シートを開いて， 
手紙の管理，なんていうアワワなことにも 
使えたりする。 

秀逸なのが， Hyper word のタブ機能〇ワ 
ー プロみたいにタブを スペースに 変換せず， 


タブコードで持っている。タブ位置を設定 
し直すと，文書全部のタブを新しく設定し 
た位置に直してくれるのだ。 

だから，表を作るとき，あとから項目位 
置を直すのに非常に便利。付属ワープロよ 
り優秀な点のひとつだろう。 

問題点は2つ。立ち上がりに時間がかか 
ることと， Hyperword はその性格上独自 
のフォーマットでデータを持っているため 
に世界が閉じていること。クローズドワー 
ルド！ H y per wo r d で作った複雑な階層 
構造を持ったデータをほかのソフトにコン 
バートしようと思うととても面倒だ。 

3：エディタを使ラ 

エディタを使うメリ.ットは，1にも2に 
も軽い（プログラムサイズが小さい！）こと 
である0すぐ立ち上がる0チャイルドプロ 
セスからでも立ち上がる。 

項目間はタブコードでも突っ込んでおけ 
ばいい。揃っていればなんとかなる。デー 
夕の柚出をしたかったら， FIND コマンド 
があるではないか（ちょっと面倒だけど）。 
味気なくてもよければ，エディタだって十 
分データベースに使えたりするのである。 

パソコン通信マニアなら，エディタを使 
って，よく メールを送る人間のホスト名と 
ハンドルネーム， ID や自己紹介などを入 
れたテキストファイルを作っておく。通信 
ソフトからチャイルドプロセスでエディタ 
を立ち上げてメール先確認をしたり，チ 
ャット相手を確認したりに役立つだろう。 

ちょっと必要なときには欠かせない。 

* 

以上の3つは，もともとテキストを書く 
ための道具である。よって，1レコードが 
長くなった （ 1人のデータにいろんな情報 
を突っ込みたい）ときに不便だ。名前と住 
所と電話番号 （2 つ3つはほしい）くらい 
ならいいが，加えて出身校やどこで知り会 
ったかという分類や，最近連絡を取ったの 
はいつかなど付随する情報をたくさんつけ 
たい場合に困る0さらに，タックシール印 
刷などいかにもパソコンらしいというか大 
人じやん （？） 的な仕事をさせようと思った 
とき，テキスト系ツールは致命的である。 

4 : Kamikaze を使う 

住所録程度のデータベースなら，単なる 
表にすぎない。 Kamikaze のように“表形 
式のデータを処理するソフト”（あえて表 
計算とはいわないよ）はとても便利である。 


Kamikaze をデータベースとして使う方 
法は2つある。ひとつはワークシートをそ 
のまま表の形で使うこと。もうひとつは独 
自のデータベース機能を使うことである0 
表計算でデータベースするときのメリッ 
卜はいろいろある力 ? ， 

a ) 項目の長さがいつでもマウスでびよ 
〜んと変更できる。 

b ) 項目の追加，削除が簡単にできる。 

c ) ソートが簡単。 

というところがあげられよう。 

ただ，表の上にでででっとデータベース 
を作ると，検索なんかが面倒になる。メニ 
ューバーから検索を選択して実行しよう。 

私はデータベース機能を使っていた。ま 
ず，表にでででれ一っと必要な住所録を書 
き込み，連続登録で一気にデータベースへ 
と書き込んだ。目的はリフィルへの印字だ 
ったので，目的に応じて検索してはワーク 
シートへとペーストし，整形して印字する0 
もちろん，リフィル印字用のワークシート 
は作っておくのだ。 

Kamikaze のデータベースの欠点として， 
追加やデータの変更，検索条件の入力とい 
う3つの面倒があげられる。検索くらいも 
っと対話的にしてほしいものである。 

ワープロ系ツールで不可能なことが Ka 
mikaze では可能になる 0 “分類”である。 

たとえば，男か女かのセル （SEX セル） 
を作り，データ全体を範囲指定して ， SE 
X セルをキーにソートすると，ほうら，男 
と女が綺麗に分離できた。 

こんなことがなんの役に立つかというと， 
会社別に分類したり，出身校別に分離した 
り，そのほかいろいろできると便利なこと 
があるのだ。 

ついでに，いやらしいことだが，年賀状 
を出したか来たかを入れておくと ，毎年毎 
年の虚礼データが出来上がる。 

ホ 

続いて，データベース専用ソフトを使う 
場合を見てみよう。大人風にいうと ， DB 
MS ，データベースマネジメントシステ 
ム，つていうやつだ0 

データベース ソフトはどんなときに使う 
と便利か。という問題がある。実のところ， 
個人の個人による個人のためのデータべ一 
スに専用ソフトは必要か，ということに私 
は疑問を抱いているのだ。 

データベース 専用 ソフ トがほかより優れ 
ているのは，私が見る限り，次の点によっ 
てである。 

a ) 画面設計 

b ) 凝った印刷 
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c ) 確実なデータ管理 

d ) 多彩なデータ検索 

a ) だが，データベースソフトのみが， 

1件につき1画面という構成でデータを管 
理できる。住所録や電話帳程度なら1画面 
に1件しか見られないというのはうっとう 
しいだけだが，1件につき大量のデータを 
放り込みたい場合に自由な画面設計という 
のは有用だ。また，住所録の場合でも，名 
前と住所だけとか，名前と電話番号だけと 
いった必要な項目のみの抽出ができるとい 
ったメリットは欠かせない。 

b ) へい 〈と，もう，データベース万歳 
の世界で ， CARD PRO の場合，リフィル 
印刷用フォーム集が出ていたりする。 

c ) っていうと，“不用意なデータ書き換 
えや削除”が起きにくいということだ。 

d ) なんてのはもういわずもがなで，デ 
ータベースソフトなんて使おうという人は， 
データを蓄えておくことと同時に，上手に 
引き出せることが目的なのだ。いかに早く 
検索，抽出するかが勝負だ。たいていの場 
合，高速検索するためのキー項目と，そ一 
でない項目がある。ちょっと面倒でも and 
とか or を駆使してやれば，何千件もある 
なかから必要なものを引っ張り出してきて 
くれるわけ。「お， 0 B 会の幹事になっちまっ 
たぜい」てなとき，条件にはまる人だけを 
抽出して住所と名前をハガキ印刷，てなこ 
とができるのはデータベースソフトだけだ。 

なんといってもデータベースはデータが 
大量になったとき，どう管理するか，いか 
に素早く検索 • 抽出するかが勝負なの。 

面倒なのがデータの入力。1件ごとにデ 
ータをセーブするので，遅い。それはなぜ 
かというと，データベースだからだ。デー 
夕の管理を安全 • 確実にやろうと思うと， 
その都度書き込むに限る。 

そんでもって， X 68000 の場合，汎用デ 
ータベースの CARD PRO のほか，特定用 
途用データベースが2本あるわけだ0その 
2本が ' Stationery と CYBERNOTE た、、。 
具体的にいこう。 

| 5 : Stationery つてか 

私が思うに，いままで家庭内対象のツー 
ルが発達しなかったのは，立ち上がりに時 
間がかかるからである。さて，誰々さんち 
に暑中見舞い書かなきやだわ，ってなとき， 
よっこいしよっとパソコンの電源を入れ， 
ソフトを立ち上げ，ファイルを選択して， 
検索する，ってな面倒なことを誰がするだ 
ろうか。私はしない。 


世の中には手間をかける価値のある仕事 
とそうでない仕事があって，何千件のなか 
から都内に住むお得意さんを検索したいと 
きに手間をかけるのはかまわないが， 
ちょっと友達の電話番号を知りたいときに 
何分もかけて検索したい人はいないのだ。 

んでもって，ど一すれば速いかと考える 
と，メモリ上に常駐すればいいわけだ。シ 
ュタっと呼び出せるわけだ。たとえ 300 K 
バイトほどメモリが減ろうとも，メモリな 
んて金で買える程度のものではないか。 

つ一わけで，付加価値として電子手帳と 
のリンクを用意して Stationery は出てき 
たのである。 

しかし，中途半端な感は免れない。電子 
手帳のサブセットみたいな機能なのだから。 
さらに， X 68000 のスペックを考えると無 
謀に近い試みだったことがわかる。テキス 
卜画面を侍避させてから Stationery は顔 
を出すのだが，待避っても X 68000 のテキ 
スト画面は 512 K バイトもあるのだ。うち， 
使われていないと思われる （1024 X 1024 — 
764 X 512) ドット分を抜いたとしても約38 
0 K バイト，0,1プレーンのみとしても190 
K バイト分待避しなければならないわけで, 
メモリを食うわけである。 

こいつの生き残る道は2つだ。機能の充 
実か機能の分散か。充実させるなら，項目 
を増やすなり電卓をつけるなりいろいろす 
る必要がある。分散は，機能を全部バラバ 
ラにして，必要なものだけ常駐させるよう 
にする。 

私の望みは，機能を分散させて， SX-WI 
NDOW 対応にすること。これはいいでっせ。 
SX - WINDOW だったら，住所録ウインド 
ウを出しといて，いつでもぺ口っと必要な 
データをカット&ペーストできるのだから。 

というわけで ， Stationery PRO SX を 
待望しつつ次である。 

B：CYBERNQTE PRO - 昍 K 雄う 

CYBERNOTE PRO -68 K は，住所録 
とスケジューリング用ソフトである。中身 
は CARD PRO -68 K だが，ユーザーイン 
タフェイスを変えてあるため，まったく異 
なったソフトの印象だ。 

データべースソフトの設計の面倒臭さを 
肩代わりしてくれる代わりに自分で設計で 
きない硬さを背負っている。 

たとえば，“勤務先”を入れるところが 
ないとか，“ューザー項目”力 ? ないなど。 

立ち上がるのに時間がかかるため，とっ 
さに使いたいときにイライラする。世界時 


計は使わない人は使わないのだから，外せ 
るようにしてほしいものである。 

笑えるのが顔写真コーナーだ （ NEC の 
電子手帳 ET のモンタージュ機能も同じ）。 
しかし，あそこにちょっとした絵を描ける 
グラフィックツールがついていたらそんな 
に間抜けではなくなる。小さな地図なんか 
を入れることができるからだ。名刺管理と 
かいうほど仕事で使うのなら，簡単な地図 
が必要なことはいろいろある。リフィルに 
印刷して持ち歩くとき，便利だ。 

CYBERNOTE で充実しているのはデ 
ータコ ンバート機能と家計簿だろう。そん 
でもって，電子手帳を使いたいならやはり 
この手のソフトが1本必要だ。どうせなら， 
CYBERNOTE で使っている電子手帳用 
デバイスドライバは公開してシステムディ 
スタにでもつけてくれると，ありがたい人 
は多かろう。 

7 : CARD PR ◦を使ろ 

住所録とひと口にいう力 5 '，必要な情報と 
いうのは人それぞれによって違う。対象に 
よっても違う。 

私は薄情で怠慢だから，住所なんてたい 
てい使わない。年賀状だってできたら廃止 
したいくらいだ。しかし，電話番号はたく 
さん必要だ。 

あるギヨーカイ人の友達を捕まえようと 
思ったら，自宅にかけて，勤務先にかけて， 
(時には帰省先にかけて），そいつの彼女 
のアパートにかけて，それでもいなかった 
ら2号さんのとこにかけて，と，多いとき 
で5力所にかける必要があるのだ。 

ほうら，電話番号はたくさん必要でしょ。 
通信機器に囲まれた現代人は1人当たりい 
くつ電話番号があっても不思議はない。な 
のに，住所録ソフトやら市販のアドレス帳 
なんてのは電話がひとつ FAX がひとつっ 
てな石器時代構成になっていて感覚を疑う。 

閑話休題。データベースのデータという 
のはなかなか思いどぉりに並んではくれな 
い 0 ジャンル別にファイルを分けるのもい 
いけれど，それだと時として不便だ。私は 
派手に一元管理がしたい。 

そんなとき，データベースソフトが必要 
になる 。 CARD PRO はそういったものだ。 
会社で使うような場合は置いてぉいて，個 
人で使うにしても，大人だから，いろいろ 
と余計な知り合いとかも増えるわけだ。 

私が好んでいるのは，個人か法人かの分 
類項目。だって，人名の間に“ Oh ! X 編集 
部’’なんてあると，変。それでもって，男 
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か女かとか，互いの知り合った基盤とか 
(高校時代の同級生とか，会社の同僚とか）， 
そんな項目があると便利だ。検索も速い。 

CARD PRO はマウスを使って参照画面 
のレイアウトができたり印刷画面のレイア 
ウトができたりと，住所 1 録ぉたくには欠か 
せない機能を満載している。 

ただ，項目の設計が面倒だ。某国民機や 
世界でいちばん売れているマシンになると， 
項目の長さを指定する必要がない（不定長 
項目！ ） ものや，一覧表画面でデータ入力で 
きるものもある 。 CARD PRO た^けでなく， 
そういった新しいタイプの柔軟データべ一 
スも欲しいところである。 

挫折しないための住所録 

人間，年を取ると閑に任せてデータをド 
タドタと打ち込んでいったりする。しかし， 
そうなるまで年を取るのはなかなか億劫で 
ある。 

そこで，私はステップバイステップ方式 
を提唱したいと思う。すでに1000件以上デ 
ータの詰まった CARD PRO なんかを使っ 
ている人は読み飛ばしていいよ，と。 

エディタ&ワープロ —Kamikaze (ある 
いは Stationery か CYBERNOTE ) —CA 
RD PRO 。 

ステップ1 

エディタで住所録を作る。とりあえず， 
まだ見ぬ明日を考えて，項目ごとの区切り 
を統一させるのが賢明だ。使い込んでいく 
うちに現状の環境に満足できなくなったと 
き，変なデータ管理をしていると，変換プ 
ログラムを自分で書いたり，面倒な手作業 
を必要としたり，最悪の場合，再度打ち込 
み直すことになりかねない。で，どういう 
ものが考えられるかというと， 

1) タブ 

2) カンマ やら◎など，データ中になくて 
紛らわしくない文字 

1) & 2) の方法がいちばんぉいしい。 

だが，これだと，タブ— スペース 変換プ 
ログラムが必要となる。タブを使うメリッ 
卜は，桁合わせが楽なことと日本語入カモ 
ー ドで も シ ユタっ と カーソルを 飛ばせるこ 
とに尽きる。大人は楽をしたがるものであ 
る。 

で， X 68000 ユーザーはみんな，タブ— 
スペース変換プログラムを持っている。な 
んのことはない，付属ワープロのことだ。 
あのワープロは勝手にタブ — スペース変換 


をしてくれるのだ（良くも悪くも）。 

例を図1に示す。区切りには“/”を 
使った。なんとなく，それらしいから。 

ここで普通の大人は思うわけだ。エディ 
夕じゃあ，印刷に困るじゃん。んでもって， 
印刷プロセッサとしてワープロが働くので 
ある。エディタ&ワープロというのはコス 
卜の点で秀逸だ（ただだもん）。 

まず，元の住所録をコピーして，ワーク 
ファイルを 作る。 そいつをエディタに 呼び 
出し，置換機能を利用して/をスペースに 
変える。そんでもって，印刷に必要な項目 
以外は削除する。 

桁合わせしてある限り同じ作業の繰り返 
しになるので， ED.X のキーボードマクロ 
を使うと簡単だ。 

図1の例から出身地を消してみる。なん 
でこんな迷惑な場所に出身地があったかと 
いうと，ここで消してしまうためだったり 
するのだ。う一む，作為的。 

まず，データの先頭の行の頭に カーソル 
を置いて，それからた； 

1) ESC — @でマクロ登録モードに入る。 

2) CTRL+F で，1語右へ移動して出身 
地の項目へカーソルを飛ばす0 

3) CTRL+G で，/を削除する。 

4) CTRL+T で，1語削除する。 

5) CTRL+X で， 1 行下へカーソルを移 
動し， 

6) CTRL+Q で次の行の頭へ行く。 

ここで， UNDO キーを押せば，よきに 

はからっててれてれと全部消してくれるは 
ず，である。終わったら， ESC キーでマ 
クロ 実行モードから抜けるべし。 

しかし世の中ままならぬ。うまくいかな 
いケースなんて山ほどあるのだ。 

たとえば，エディタにとっての1語とい 
うのが何かを知っておく必要がある。普通 
に考えて，名字と名前と出身地で3語のよ 
うに見えるが'，そこはそれ，見えないとこ 
ろに秘密があるのである。名字と名前の間 
には“全角のスペース”が，名前と出身地 
の間には“半角のスペース”（あるいは夕 
ブコード）が埋まっているのだ。半角のス 
ペースやタブコード，カンマ，ピリオド， 
ハイフンなどなどアメリカンな感覚でセパ 
レータなものが1ワードの区切りなのであ 
っ て，ジャパニーズな全角文字はその限り 
ではないのである。 ED.X は昔ながらのイ 
ングリッシュな仕様なのであった。 

そんなこんなで，必要な項目だけにシヱ 
イプアップしたデータを，ワープロのテキ 
スト入力で言壳み込む。あとはワープロさんに 
お任せで，齚線弓 I くなりなんなりすればいい。 


ステップ2 

どうしてエディタを使ったかというと， 
少ないデータなら，すぐに呼び出せたほう 
が便利だからである。項目数が少ないなら， 
エディタのほうが追加 • 更新が楽だからで 
ある。しかし，データ数が増えたりすると， 
手作りの味にも限界が見えて〈る。 

私は個人的な好みから，ここで Kamik 
aze に移る。 

図1のエディタで作ったデータを ， Kam 
ikaze で扱える CSV 形式にコンバートして 
やるわけだな。 

図1では/を項目の区切りとして採用し 
た。それを，「”」で括って，「，」で分 
ける形式にするわけである。 

まず，行頭と行末は強制的に”であるか 
ら，上の要領でマクロを作り，"を挿入し 
てしまおう。 

続いて，置換する。「/」を「“，”」に 
置換してやればうまくいくだろうというの 
は鶏頭でもわかることだ。 

エディタの置換機能で，全置換する。と 
いうわけで， CSV 形式ファイルの出来上 
がりである。項目間がタブで区切ってあれ 
ば，置換機能でタブを“”（ヌル）に置換 
する。“前方置換旧文字列”をタブにし 
( HT と表示される），“前方置換新文字列” 
のところでたた^ターンを押せばいいのだ。 
めでたしめでたし（図3)。 

これを適当な名前でセーブして ， Kamik 
aze で呼び出す 0 

Kamikaze の表計算シートを開いて，フ 
ァイルを読み込む 0 Kamikaze はどんな 
ファイルか勝手に判断して読み込んでくれ 
るので，そのまま読み込みをすればいい。 
たいていうまくいく （図4)。 

ステップ3 

なにも Kamikaze に読み込む必要はな 
い。目6勺によって CYBERNOTE でも CA 
RD PRO でもいぃ〇 

で ， CARD PRO に読み込むことを考え 
てみよう，と。これには CARD PRO を立 

ち上げて“ファイル”のメニューから“コ 
ンバート”を選ぶ。そんでもって，形式を 
選ぶ。転送元ファイルと転送先ファイル 

(こっちはデータべース名）を指定する。 

この形式だが，まあ， CSV か区切りな 
し ASCII になるだろう。 CSV の場合はス 
テップ2と同じようなものなのでよい。区 
切りなし ASCII の話をする。 
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CARD PRO でいう区切りなし ASCII 
というのは先月説明したとおりなので，図 
1から置換機能で“/”を取り，余計な行 
を消して，タブをスペースに置き換えたも 
のを使う。タブ — スペースはファイルをワ 
ープロでファイル入力して，ファイル出力 
する tf けて'ある。 

この コンバート をする際には2つの手作 
業が必要になる。ひとつは ，‘ ‘CARD PR 
0で区切りなし ASCII ファイルを読むとき 
は，各 レコード （この場合は1行1 レコー 
ド）の先頭に4文字の半角 スペースが 必要 
なのだ!”ということ。初めから CARD P 
RO を念頭においているなら4文字開けて 
おくのもいいが，そうでないなら，エディ 


夕の マクロな どを使って，なるべく楽をし 
て4文字分の空白を作っておこう。 

2つ目は，数えることである。区切りが 
ないということは，項目間の区切りはユー 
ザーの頭の中にだけ存在するというわけで， 
最初の項目が何桁で（もちろん半角で計算 
ね），2番目がイ可桁でっていうのをメモし 
ておかねばならない。 コンバート 時に項目 
はいくつでそれぞれの桁数を入力してやる 
必要があるからだ。なお，このとき，タブ 
コードが混じっていると CARD PRO が桁 
数計算を間違えてくれたりするので気をつ 
けるように。 

無事終了すると（結構早い），ついさっ 
きまでエディタで作っていたテキストフア 


イルがちゃんとしたデータベースになって 
いたりしてなかなカソ、。ソ コンの 醍醐味を味 
わわせてくれる（図5)。項目の桁数を数 
え間違えるとなかなか笑える結果になるの 
で，うま〈いかないときはまず自分を疑っ 
てみるのが得策だ。 

* 

PC -9801 上で動くアプリケーションとの 
データ互換性はどうなってるんだ！とい 
う人も多いと思うので，そんな話題もおい 
おい取り上げていくかもしれない。 

い一かげんに始めたわりには期侍する人 
が多くてビビっている荻窪“の一てんき” 
圭は， Kamikaze 入門なるものを考えてい 
るのであった。では来月。 


図1 


TAB と“/”で区別した電話番号薄の ED.X 
•一…，は TAB を 
(|)は CR / LF を 

[ EOF ] はファイルの終わりを表示させてある。 
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図4 

図3を Kamikaze に読み込んだもの。項目長（セル幅）の調節はしていない。 






図2 

図 I から ED . X のキーボードマクロを 使って， 出身地を消したもの(データのみ)。 


代々木圭 

/03-263-wt 

/ 

/浪人 /03 -963-***» 

/ 

新宿圭 

/03-239-w* 

/ 

/なし / 

/ 

大久保圭 

/83-328-**** 

/03-339 •傘 

/Y の家/ 

ノ 

東中 W 圭 

/03-352-*_* 

/M-638-* 斡拿 

/公務員/ 

/ 

中野圭 
高円寺圭 

/03-368 •♦神* 

/03-***-0101 

/〇并/ 

f 

/M-373-* 幹* 

/ 

/なし/ 


阿佐谷圭 

/03-392 •♦♦林 

/A3-793 -^ 

/M 銀行/ 

/ 

获窪圭 

/03-395 - 

/ 

/なし /03-5-188-1309 

/Oh!X«* 部 

西圭 

/03-3B5-W* 

/ 

/なし/ 

/ 

吉择寺圭 

/8422-55- n ^ 
/04 22〇林輯 

/03-266-W* 

/C 広告 ' 63 - 125 -**** 

/女の部® 

三！！圭 

/ 

••学生 f 

/ 


図5 

CARD PRO ~68 K で読み込んだものを一覧表表示してみた。項目名はまだつけていない。 
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図丨を CSV 形式に変換したもの。作業は丨分とかからず，簡単に終了。 


"代々木圭 ， v ，_ ft 取県". " M -263 ,"浪人”, 

"析宿圭' "東京都' "03-239 -***V •••なし".""."" 

"大久保圭•••"千葉の家",”","" 

••東中 W 圭","埼玉県", "93-352-****"."03-638-****” , " 公務貝”,’…,"" 

"中》圭”,，.東京部** . 1”净井”.."...". 

••高円寺圭".”宮城! T ,"03-373-* 林*”,…•，••なじ’,"","" 

"阿佐圭••，"愛知 WVM -392 -林林",” 03-793-**** VM 銀行”. 

"荻薄 圭 V 愛知県",••••"なし"." 03-5488 H 309_’," Oh ! XW 第部•’ 

”西荻？!圭”東京都". ••03-3®-****",”". “なし”,” * V m 

"Sm 逢",”財?期"."0422-55~_"..，03-268-«»”,"〇広吿”,"》3-725-*»* > ..”女の部屋" 
**-.11 圭".”兵庫 ••字生”,"”,"" 


特別付録データの移動•関連図 
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いよいよ第 2 部に入 
t 、 A / D コンバータを取り上げま 
作ですが，これをひとつ作っておくと 
が広がりますよ。 


第1部の基本インタフェイス回路はいか 
がでしたか？ 初めての教材ということで， 
回路の単純さと工作のしやすさに重点を置 
いたため，回路自体は実用性のないものに 
なってしまいました。しかし，外部機器の 
コントロールは それほど難しくないという 
ことがわかってもらえたことと思います。 

さて，第2部は，回路が簡単なうえに， 
実用性もあり，さらにさまざまな応用も利 
くという極めつけの回路にチャレンジして 
みることにします。 



A / □コン八一夕とは何か 


A / D コンバータとは，文字どおり，ア 
ナログ量 （ A ) をデジタル量 （ D ) に変換 
(コンバート）するものです。そもそも， 
アナログ量とデジタル量の違いは， 
アナログ=連続的に変化する量 
デジタル=離散的(階段状）に変化する量 
と定義されていることが多いようです。コ 
ンピュータで扱う量は，すべてデジタル量 
なのですが，自然界に起こっていることは 


図1 A / D 変換システム 


ほぼすベてアナログ量といってよいでしよ 
う。人間の五官が感じる量も，光の明暗， 
音の強弱，温度の高低など，連続的に変化 
しているアナログ量ばかりです。 

もちろん，これら自然の量について人間 
が感じるときには，たとえば夏は暑いが冬 
は寒いなどと，だいたいのことをいえばす 
んでしまいます。ところが，正確に測定し 
記録するときは，夏の平均気温は 30° C で高 
いが，冬は 10° C で低いというように数字で 
表す必要がありますね。この数字で表すと 
いうのが問題で，たとえば 30° C というのが 
30.2° C なのか 30.3° C なのか，さらには 30. 2 
6° C なのか30.2 7° C なのか細かいことをいい 
だすとキリがありません。 

これらを有限の時間で処理するには，ど 
こかの桁で打ち切る必要があります。いわ 
んや，コンピュータに処理させる際にはだ 
いたいいくらではまった〈許されず（近年 
技術の進んできたファジィコンピュータは 
この欠点も克服しています），すべてキリ 
のいいデジタル量で表現しなければなりま 
せん。 


音センサ 





温度センサ 

ハ ))） B 



デジタル 




データ ライン 



20でアナログ量(音，光，温度) 



パソコン 


一方，身近な家庭にぉいて，機械が人間 
の感覚の代わりに自然界の量を計測するシ 
ステムが普及しています。たとえば，エア 
コンが現在の室温を検知して自動的に温度 
を調節するシステムでは，まさに人間の代 
わりに暑い寒いを コンピュータカす 「感じて」 
いるわけです。この温度調節のシステムの 
ほかにも，テレビのリモコンでは光を感じ 
ることによってスイッチの ON / OFF をコ 
ントロールしたり，火災報知器では煙やガ 
スを感じることによって警報を鳴らしたり， 
自然界のアナログ量を計測するシステムが 
非常に多く使われています。 

こうしたシステムの内部では，アナログ 
量はすべてデジタル量に変換されてコンピ 
ュータが処理しています。また，皆さんに 
はもっとも身近と思われるコンパクトディ 
スク ( CD ) でも音というアナログ量をデ 
ジタルデータに変換したのちに，ディスク 
に1または0のデジタルデータの列を刻み 
込んでいるのです。さらには， X 68000 に 
も載っている音声サンプリング回路も代表 
的な A / D 変換回路の例です。 

このような A / D 変換を 行うシステムに 
ぉいては，まず システムに 入力されるアナ 
ログ量がなんらかの形で電圧に変換されま 
す（この仕組みは第3部に予定しているセ 
ンサ回路のところで，非常に詳しく解説す 
るつもりです）。そして， A / D コンバータ 
は入力されたアナログ電圧を8 (〜 16) ビッ 
卜のデジタルデータとして出力するのです。 
したがって，本当の意味での A / D 変換回路 
は，自然のアナログ量を電圧に変えるセン 
サ部とそのアナログ電圧をデジタルデータ 
に変換するコンバータ部の2つから成って 
います。そして，データを変換したのちにそ 
のデータをパソコンに受け渡しするという 
意味では， A / D コンバータもインタフェイ 
スのひとつと考えてもよいでしょう。 

今回は入力電圧をデジタルデータに変換 
する部分に絞って説明していくことにしま 
す0 
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A / D コン八一^繼と仕組み 


A / D コンバータには， 

1) 逐次比較型 

2) 積分型 


3) 並列比較型 


4) V—F コンバータ 


など，用途によっていろいろな方式があり 
ます力 5 ',どの方式でも基準電圧 Vre / を設定 
し，その基準電圧と測定すべき入力電圧と 
を比較しながら，デジタルデータに変換し 
ます。ここでは，もっともよく使われる逐 
次比較型について具体的に説明しましよう。 
今回の回路に使うのもこの方式です。 

ここに8ビット出力，基準電圧 Vr びの A 
/ D コンバータがあるとします。逐次比較型 
は，8ビットのデジタルデータを記憶して 
おく「逐次比較レジスタ」，そのデジタル 
データを実際の電圧値に変える 「 D / A コン 
バータ」， D / A コンバータからの電圧を外 
部入力電圧と比較する「コンパレータ」と 
から成っています（図2)。 


このとき， D / A コンバータは8ビットの 
逐次比較レジスタの値によって256段階の 
電圧を出力します。具体的にいうと，逐次 
比較レジスタの上から第 n ビット（最上位 
ビットを第1ビット，最下位ビットを第8 
ビットとします）に1が'立っているとき， 
基準電圧 V re パこ対し， V re //2” を足し込 
んでいきます。たとえば，逐次比較レジス 
夕が10101101のときは， Vre/X (1/2 + 1/8 

+1/32 +1/64 + 1/256) = V re /X 173/256 が 
D / A コンバータの出力です。 

すなわち，逐次比較レジスタの値を2進 
数としたとき(10101101, = 173), その値 
に V r け/256を掛けたものが電圧値になっ 
ているわけです0したがって，逐次比較レ 
ジスタによって ，V re //256 の分解能で〇〜 
V re / の電圧値を256段階で表すことができ 
るわけです0これが，デジタルデータでア 
ナログ電圧を表現する仕組みです。 

では，変換の仕組みに説明を移しましょ 
う0まず，最初に逐次比較レジスタをリセ 
ットして0にします。変換開始とともに， 
逐次比較レジスタの最上位ビットを1にし 
ます。ここで， D/A コンバータの 出力は 
V re / /2 になっています 0 コンパレータで 
入力電圧と比較し，入力電圧のほうが大き 


ければそのままビットに1を立てます。次 


に第2ビットに1を立て， D/A コンパ、 ータ 
の出力 Vre / X ( l /2+ l /4) と入力電圧との 
大小を比較します。こうして，各ビットご 
とに「逐次比較」していって，入力電圧に 


もっとも近い値を示すデジタルデータを見 
つけます（図3参照)。 

実際に回路に使う A / D コンバータは，上 
で述べた機能が1個の 1 C の中に入って製 
品化されていますから，ユーザーは 1 C を買 
つてくるだけで手軽に使うことができます。 


また， A / D コンバータは使い道が広く，た 
いへん普及しているので，専用 1 C も非常に 


安価に入手できます。 



パソコンとのインタフェイス 


ほとんどすべての A / D コンバータ用 1 C 
はコンピュータと接続することを前提に作 


られているため， コン ピュータの I / O ポー 
卜にそのままつなぐことのできるものばか 



ポートの入力は4ビットしかありません。 


りです。図4は非常によく使われる8ビッ 
卜 A / D コンバータの ADC 0801 シリーズの 
端子を示したものです。見てのとおり，デ 
ジタルデータの出力は DBo 〜 DB 7 までの8 
ビットバスラインに直接出てきますので， 
これをそのまま I / O ポートのバスラインに 
つなげばよいのです。 

ところが，私たちのこの連載ではパソコ 
ンとのインタフェイスはジョイステイック 
ポートに限ることにしています。前回まで 
の記事でわかるとおり，ジョイスティック 


したがって，普通の 1 C はそのままつなげな 
いことになります。多くの工作記事では「入 
門編」と称しながら，ここでいきなりジョ 
イスティックポートを捨てて，拡張ボード 
に作り変えるという锭破りの技に出るとこ 
ろでしよう。しかしご安心ください。ちよっ 
とした工夫で， 8ビット A / D コンバータ 
をジョイスティックポートにつなぐことが 
できるのです。 

その工夫はシリアルインタフェイスにあ 
ります0シリアルインタフェイスは1本の 


図 2 逐次比較型 A/D コンバータのブロック図 図 3 遂次変換の手順 



図 4 ADC0801 シリーズのピン配置図 


CS [T 
RD [F 

wr |y 

CLOCK IN 14 
INTR 15" 

^// v (+) 区 
V , N (-) [I 

A GND [F 
Vret /2 |T 
D GND 匝 


ADC080I 

ADC0802 

ADC0803 

ADC0804 

ADC0805 


20] VcAor Vret ) 
H CLOCK R 
H DBo (LSB) 

hidb , 

Hdb 2 

THdb 3 

I 3 DB 4 

IlDBs 

]j|DB 6 

m]db 7 (msb) 


5V フルスケール （V re/ = 5V ) で 4 ビット 
のデジタルデータに交換するとき， 

Vが分解能になる。 


◎例として 4V を入力してみる 

① 

オールリセット 

0000 

② 

第1ビットを丨にする 

1000 


入力 4V と I000 fl x -^ = 

-^•v を比較し, 


4 -だから 

1000のまま 

③ 

第2ビットを1にする 

1100 


入力 4V と丨1 00 b x -p-^ 

jv を比較し, 


4 > •だから 

1100のまま 

④ 

第3ビットを丨にする 

1110 


入力 4V と mo fl xj：= 

を比較し， 


4 d だから 

1100に戻す 

⑤ 

第4ビットを1にする 

110! 


入力 4V と 1 IOIi?X -j^-= 

を比較し， 


4 •だから 

1100に戻す 


⑥最終的に 「II001 がデジタルデータとなる 


(注） IIOObX —= fv=3. 75V となり, 

入力の 4V を正確に再現していない。 
これが A/D 変換による「誤差」の現れ 
である。しかし， 

14-3.751=0. 25< ( = 0.3125) 

で分解能以下の誤差になつている。 
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信号線（実際は GND ラインと合わせて2 
本）だけで8ビットデータを順次送る方式 
で，8本の信号線で8ビットまとめてデー 
夕を送るパラレルインタフェイスと比べ， 
信号線が少なくてすみます（図5)。反面， 

1回のデータ転送にかかる時間はパラレル 
インタフェイスよりも多くなります。身近 
なシリアルインタフェイスとして RS -232 
C や MIDI などがあるのはご存じでしよう。 

この方法を使えば，信号線の本数に制限 
のあるジョイスティックポートでも8ビッ 
トデータの転送が可能となるのです。この 
シリアルインタフヱイスは今後の記事でも 
使おうと思っていますので，ここで，シリ 
アルインタフェイスの仕組みをごく簡単に 
解説しておきます。 

シリアルインタフェイスでもっとも問題 
になるのは，何ビット目のデータが いつ 来 
るかのタイミングをとらなければならない 
ことです。まず最初に考えられるのはあら 
かじめ決められた時間間隔で規則正しくデ 
ータを送り，受ける側も同じ時間間隔で区 
切ってデータを取り込むという方法です。 
この決められた時間間隔のことをボーレー 
卜といいます。 

このとき， 8ビットデータの初めと終わ 
りを知らせるために，スタートビットとス 
トップビットとを付けています。この時間 
間隔を決めるクロックを送受信側別々に持 
てば，送信側はデータを一方的に送り続け， 
受信側はひたすら受け続けることになりま 
す。ただし，この方法では1回でもタイミ 
ングが狂うとそれ以降のビットがすべてず 
れてしまい，データが無意味なものに なっ 
てしまう恐れがあります。そこで，信号線 
をもう1本増やして送信側か受信側かのど 
ちらかからクロックを送り，送受信で完全 
に同期をとってデータを転送すれば，信頼 
性が向上します。 


以上がシリアルインタフェイスのデータ 
転送の一般論ですが，具体的なデータ転送 
のやり方は今回の回路を実際に見ながら説 
明していこうと思います。 



A / □コンバータ回路の実際 


図6が今回の回路です。前置きが長かつ 
たわりには，騙されているのかと思うくら 
い簡単な回路でしょう。それは，超高性能 
な A / D コンバータ専用 1 C の ADC 0832 を 


選んだおかげです。 

今回の回路は主要な部品がこの 1 C しか 
ないので，回路の説明というよりは，この 
1 C の機能の説明ということになります。 
この 1 C だけで，これまで述べた逐次比較 


型 A / D コンバータ+シリアルインタフエ 
イスの機能を2系統持っています。しかも 
足は8本だけで，工作は極めて簡単です。 
まず各ピンの役割をざっと説明しておき 


ましょラ。 

8番の+ 5 V と4番の GND は問題なし。 
2番と3番がアナログ電圧の入力端子で， 
どちらもまったく同じ機能で，それぞれ0 
〜+5 V の入力が許されています。また万 
一この範囲を瞬間的に才ーバーしたときの 
ための簡単な保護回路も内蔵されています。 
そして，この2つ （ CHO ， CH 1) のどち 
らの入力を A / D 変換するかはパソコン側 
から制御できるようになっています。 

1番ピンは(チップセレクト）といっ 
て，この端子を L にしたとき，この 1 C が 
機能します。通常は H にしておいて， A/D 
変換を始めるときに L にしてやると 1 C が 
A / D 変換をスタートします0パソコン側 
からコントロールしてやることによって， 
変換されたデジタルデータの最初のビット 
がどこから始まるかをパソコンが知ること 


ができるのです。 

7番ピンが，先ほど説明したようにシリ 
アルインタフェイスのためのクロックを I 


C に入力する端子です。実は，このクロッ 
クは一定間隔でなくてもよいのです（来月 
詳しく説明します）。 

5番ピンの DI (データイン）はこの 1 C 
の使用モードを設定するためのデータをパ 


ソコンから 送ってやる端子で， この データ 
もやはりクロックにしたがってシリアル転 
送します。 この 端子の使い方も来月詳しく 
説明します。 

最後の6番ピンの DO (データアウト） 

は文字どおり， A / D 変換されたデジタルデ 
ータがシリアルで出てくる端子です0 

といったところで，これらの端子を直接 
ジョイスティックポートにつなげば終わり 
という，とんでもなく簡単な工作になりま 
す。 

この ADC 0832 を使うと，基本的にはこ 
れ以上部品は必要ありません。実は，もう 
少し外付け部品を加えて入力の電圧範囲を 
自由に設定できたりするような回路も一応 
試作してみました。しかし，入門編という 
ことなので最小限の回路で最大限楽しめる 
ようにと，思い切っておまけの部分を切り 
捨てたしだいです。 

木 

今月は A / D コンバータの一般論に重点 
を置いて説明しました。回路自体はなにも 
考えることがないくらい単純ですが，それ 
だけに今回用いた専用 IC ( ADC 0832) の 
使い方（プログラミング）をしっかりマス 
ターしておかなくてはなりません。次回は 
工作編ですが，工作自体は極めて簡単なた 
め，工作手順については簡単に説明をすま 
せ， ADC 0832 の使い方をじっくり研究す 
ることにします。 X - BASIC によるドライ 
バプログラムも載せる予定です。それでは， 
お楽しみに。 

図 B 回路図 



図5シリアルインタフェイスのデータ転送 
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先月号の予告どおり「好きやねん CG 大阪合宿」というイベント 
の紹介と，先頃発売されましたビデオボードの本当に簡単な改造方 
法をレポー トします。 2スロツ トを 占有す る ことで悪名高いビデオ 
ボードは，本当はスロットに差す必要がなかったんです！？ 


もうすぐ「花博 j も終わるようですが，今は「花 
博」のついでに当 プロ ジヱク トルームに 遊びに来る方が 
たくさんいました。一般ューザーだけではなく，某大手 
メーカー や ソフトハウスの 方もいらっしゃいました。な 
んの用があるんだろうと思いつつも相手をしていると， 
“あっそろそろ新幹線の時間ですので”といって帰って 
しまう（新大阪駅にわりと近い）。ここは新幹線の待合 
室ではありませんよ。 

しかし，げに恐ろしきは女子高生なり。千葉県の T さ 
ん。この方は以前にもいらしたことがあるとはいうもの 
の，うちのクラブ（大阪大学コンピュータクラブ）の夏 
合宿に，いつの間にか参加していました。それから名古 
屋の Y さん，アポイントなしに寝込みを襲うのはやめて 
ください。朝8時に起きているスタッフなんていません。 
皆さんも遊びに来るときは，事前に日時などご連絡くだ 
さい。 

,赌ゃねん CG 大阪舖 

このイベントは，全国のアマチュア CGA 団体の交流 
を目的としたもので，大阪で活動している3団体 （ D 6 
GA , GR , RANDOM ) で共同主彳崔しました。 8月4, 
5日，大阪工業大学記念館にて，全国から招侍された各 
団体の代表の方と主催者側のスタッフが一緒になって， 
CGA の技術交流ゃ討論会などが中心となっています。 

なんかこう書くと，ものすごく立派なイベントだった 
ような誤解を受けますが，それは来年からということで， 
今回は来年のための下準備といった程度のものです。会 
場と宿泊施設さえ用意すれば，あとは同じ穴のムジナが 
集まっているのだから，それなりに楽しめるだろうとい 
ういいかげんなイ ベン トでした。 

参加者は招待客が約20名，スタッフが約20名です。私 
にとっては初めてお会いする方はほとんどなく，招待客 
なのかスタッフなの 力％ よくわからない方も多くいらっ 
しゃいました 。 CGA コンテストの 受賞者である「超強 
力宇宙人」の森山さん， 「 MEMORY 」 の伊藤さん ， 「Ha 
ppy Birthday 」 の鳥取大学電子計算機研究会の門脇さ 
ん，また同 コンテストの オープニングアニメで一躍有名 
になったチーム TOSAKA の野中さんははるばる九州か 


らいらっしゃいました。 

まず，この手のイベントは主催者側の挨拶から始まり 
ます。 GR の森山さん， D 6 GA を代表して私 ， RANDO 
M を代表して小味さんです。 GR の森山さんは，本誌の 
6月号でレンダリングソフト 「 ANGEL 」 を発表され 
たので皆さんもご存じでしよう 。 GR (グラフイックス 
研究会）は，大阪工業大学のサークルで，今回のイベン 
卜の中心となって準備してくださいました 。 RANDO 
M は大阪府立大学のコンピュータクラ ブて 、，小味さんは 
昨年の CGA コンテストでも 「Let me Dance ! j で奨励 
賞を受賞しています。さて，この3人の挨拶ですが，ご 
多分にもれず，この手の挨拶には内容がないと相場が決 
まっておりますので，割愛させていただきます。 

形式的な自己紹介のあと，実際にマシンを触りながら 
の勉強会です。まずは， D 5 GA からオリジナルウイン 
ドウシステム “ Ko - WINDOW ” が発表されました〇こ 
れは ， prodige (大阪大学コンピュータクラブ）の小林 
君が昨年から趣味でひそかに構築していたもので，一口 
で言うと D 6 GA 版の SX - WINDOW です。どちらが優 
れているかなんてことは私にはよくわかりませんが，た 
だひとつはっきり優れていると言えるのは，仕様が公開 
されていて，わからないことがあれば，開発者本人に聞 
けるという点です。ということで，今 D 6 GA ではこの 
“ Ko - WINDOW ” 上のプログラムを開発するのが流行っ 
ています。 

さらに ， KMC (京大マイコンクラブ）の石井さんや 
柘植さんから最近 KMC で開発された（ている）プログ 
ラムが発表されました。なかでも目を引いたのが ， TO 
WNS 版や PC -9801 版のアニメーションプログラムです。 
TOWNS 版は X 68000 版より高速ですし， PC -9801 版は 
色数が足りないのを，タイリングやモノクロ16諧調で表 
示することでカバーしていました。さらに， X 68000 版 
の 512 X 512 のアニメーションがついに発表され，一同を 
驚かせました。しかし，これらのプログラムはまだ問題 
点があり，一般に配布されるようになるのは，まだだい 
ぶ先になりそうです。 

GR からは， “ ANGEL ” の最新バージョンと ， DoG 
A • CGA システムとのデータコンバータ（形状データ） 
が発表されました。これで， CAD で作ったデータを “ A 
NGEL ” で作画することができます。 

作品のほうでは， D 6 G A で制作された実験的な映像 
が上映されたり， CG 連合の古い作品が公開されました。 
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また， D 6 GA の砂川君が数力月をかけてデザインした 
Z ガ〇ダムの変形シーンや，面数の多さでは日本一のチ 
ーム丁 OSAKA のグリフオ〇などが職人の意地を見せて 
くれました。私は，形状データは少ない面数でいかに表 
現するかが大切だと思っていますが，野中さんは“而数 
こそ命！’’と言いきっていました（グリフオ〇のデータ 
は 800 K バイトあります）。 

なんかこう書くと，とっても有意義なイベントだった 
みたいです力 ? ，実際はマシンを囲んで雑談しているだけ 
で，内容もなくだらけたものになっていました。詳しい 
ことは割愛させていただきます。 

夜に入って，いよいよ宴会が始まります。ここら辺で 
ちょっとずつ盛り上がってくる……と思いきや酒や肴も 
予算の都合で足りず，各自が雑談しているだけという昼 
間の延長のようになってしまいました。もちろん，詳し 
いことは割愛させていただきます。 

さて，10時を過ぎると1日目の予定は終了し，会場も 
閉められ，各自の部屋に戻って就寝の時間です。このま 
までは明日も思いやられるなあ，と暗い気持ちで皆さん 
眠りにつき……なんてことはありません。 

さあ！ いよいよメインイベントです。今までのはた 
だの形式，お互いの顔と名前を覚える籐式にすぎません。 
名づけて“今夜も朝までパワフル CGA 討論会！”。 

^ 朝まで言^!^^ 

この討論会のすべてはカセットテープに録音されてい 
ます。あとでワープロで打ち直すと，雑談や聞き取れな 
いところを省略しても80ページという膨大な量になりま 
した。 CGA システムの問題点，アマチュアのネットワー 
クのあり方，実にさまざまな論議が非常に活発に行われ 
ました（おかげさまで2日目の午前中は，皆さん寝ぼけ 
て何もできないありさまです）。もちろん，そのすベて 
を掲載するわけにはいきませんが，ほんのさわりだけで 
も紹介しましょう。 

ホ 

——アマチュアの横のつながりをどうしていくかという 
問題について，ご意見や現在の活動の問題点などありま 


したら。 

► 「こういう合宿を年1回やってください（笑)」 

► 「それはありますよね。現時点では， CG に興味をも 
っているすべての一般の人が実際に CG A 制作をする段 
階ではなく， D 5 GA に CGA システムを申し込むような 
積極的な，マニアックな人たちが先行して活動する時期 
だと思う」 

► 「問題は作品で，作品を通じてのコミュニケーション 
がいちばん大切じやないですか。そして，私たちは上映 
会とか，発表する場を提供していかなくては」 

——そういうことで， CGA コンテストを始めたんです 
けど(笑)。 

►「 SF 大会でもやりますんでよろしく （笑)」 

► 「上映会とかコンテストはたくさんあったほうがよい 
です。そのわりに作品がないのは問題ですけどね」 

► 「自主制作映画界ってのが衰退気味というのがあるで 
しよ。実写とかアニメを含めたもっと大きい世界で」 
——もしそうだとしたら，これだけ映像が普及している 
世の中でなぜ映像を作ることが衰退しているんだろう。 
► 「それは簡単な話で，作る必要がないからです」 

► 「いや，それを言うんなら，バンドだって，バイクだ 
って， X 68000 だって必要ない（笑)。必要がないのに流 
行っていることなんか山ほどある。趣味なんてそんなも 
のだ」 

► 「今の学校教育では，自己表現する必要性がない。そ 
の欲求すら失いつつある人のほうが多い」 

► 「もしそうなら，とても悲しいが，すべての人がそう 
だとは思わない」 

► 「機材の問題が大きいのじやないかな。音楽は口だけ 
でもできるけ€，映像は機材とかいるし，作る段階まで 
いく人間が少ないでしよう」 

—確かに初心者がとっつきにくいという問題は大きい 
と思う。では，そのとっつきにくさが，みんなの努力に 
よって改善されていけば，どんどん映像を作る人たち力す 
増えてくるでしようか？もしそうなら，私達は悩む必 
要もなく， CGA システムのバージョンアップなど，今 
までの活動を続けていけば いい。 

► 「それでいいと思いますよ。今はたまたま 8 mm が衰退 


CGA コンテスト事務局より 


さて，いよいよ第3回アマチュア CGA コンテ 
ストの募集が始まります。 D6GA プロジェクト 
ルーム 内に コンテス ト事務局も設置されました。 
今回は，賞の形態や審査員を一新し，より本格 
的な コンテストを 目指して，ちゃくちゃくと準 
備が進められています。応募要項など詳しいこ 
とは来月号にて発表されますが，とにかく今年 
の12月31日が締め切りであることは間違いあり 
ません。 皆さんも ラストスパートを お願いいた 
します。 


"朝まで討論会”でもあったように，アマチ 
ユア CGA の普及には質のよい，たくさんの CGA 
作品が不可欠であり，皆さんにとっても作品の 
制作と発表は個人 レベルの 活動の成果であり， 
当プロジェクトへの参加の道といえるでしょう。 
当チームが主催する コンテスト である以上，当 
チームから作品を出品するわけにはいきません。 
この コンテストの 成功は，読者の皆さんにかか 
つているのです。 

このコンテストは，入賞することより入選す 


ることに意義があります。それは，このコンテ 
ストの主旨が，より多くの方々の作品の発表の 
場であるからです。とても賞なんてとれそうに 
ないなんて言わないで，積極的に応募してくだ 
さい。また，“今年は間に合いそうもないから来 
年には"などといっていては，いつまでたって 
も決して完成しません。今からでも，ひとつの 
作品を完成することは十分可能です。努力と根 
性でぜひがんばってください。たくさんのご応 
募をお待ちしております。 
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しちゃって作る手段がなくなっているから，落ち込んで 
いるのであって，手段ができれば復活するでしょ」 

► 「ぼくはあまりそうだとは思わない。作る手段として 
はビデオカメラがちゃんとある。 8 mm よりビデオのほう 
が楽でしょ。すぐその場で見られるんだから」 

——ビデオカメラがこれだけ売れているのに，自主映像 
制作は復活の兆しがない？ 

► 「映写施設の問題でしょ。いちばん最初は，8 mm でも 
ビデオでも適当に撮ったものを自宅に持ち帰って，友人 
2， 3人で笑いながら見る。そして，これは受けるぞと 
思ったら，もっとアイデアを温めて，大がかりに制作して， 
上映会というメディアに参加していく。みんなそうやっ 
て自主制作の世界に入ってきた。しかし，ビデオの場合, 
一度にたくさんの人が作品を見ることができない」 

► 「その問題は大きいと思う。 CGA にしろ，各個人の 
活動の基本は，作品を作り，見せ合うということだから。 
見せ合う場がなければ，作品制作意欲も出ない」 

► 「また，多くの観客に切磋琢磨される機会がなければ， 
質のよい作品は生まれない」 

► 「コンテストや，上映会に参加することで，お互いに 
触発されますからね」 

—でも，最近液晶プロジェクタが出てきましたよね？ 
あれなら上映会に手ごろなんじゃないですか。 

► 「50万円ですよね。あんなの持っている人がいます 
か？」 

► 「70インチで10万円ぐらいの力 ? ，こないだ出たよ」 

► 「そりゃ凄い。解像度はいいんですか？」 

► 「8_より悪いことはないと思いますよ（笑)」 

► 「画質とかは根本的な問題ではないと思う。それに， 
価格や画質の問題はこれからどんどん改善されるでしょ 
ラ」 

► 「それなら，自主映像制作の未来は明るい」 

► 「しかし，ビデオは父親が子供を写す道具というイメ 
ージ，つまりかっこ悪いというイメー ジが定着しちゃっ 
て，若い世代が使いたがらないという話を聞くが」 


► 「それはかっこいい作品を見せることで，感化すれば 

いい」 

——とすると，あとは教育の問題と機材，とっつきやす 
さの問題だけですね。でも，教育の問題は我々が解決す 
べきことではないでしょう。 

► 「そう， CGA 特有の問題を検討すればいい。でも， 
機材とかとっつきやすさとかも， プロジェクタと 同様ど 
んどんよくなるに決まってますよ j 
► 「ただ，ちょっと心配なのは，使いにくいとはいえ， 
CGA システムは X 68000 ユーザー にかなり広まっていて, 
バージョンアップサービスを 希望する，つまりそれなり 
に使っている人がたくさんいるのに，作品が集まってい 
ないという点です」 

►「 CGA システムを一生懸命開発して，苦労して配布 
したのは，作品を作ってもらうためで，本棚に飾っても 
らうためじゃない」 

► 「でも実際問題として， CGA 作品をひとりで作ると 
いうのはとても難しいと思う。やっぱり仲間がほしくな 
る」 

► 「そうかな。作品っていうのは，基本的にひとりで作 
るもんだと思うけど」 

► 「そうじゃなくて，作品制作はひとりで行うんだけど， 
チームの 中のひとりだから作れる。周りに同じことを し 
ている人がいなくて，周りに見てくれる人がいなければ， 
作品はできないってことです」 

► 「うん，それはある。チームの中にいることで，触発 
されるものがあるもんね」 

►「僕の周りにはひとりもいませんけど，ひとりで作っ 
てますよ」 

► 「でも， I さんの場合，何度も D 6 GA に遊びに来て， 
制作途中の作品なんかを見せているでしょ。それに CG 
A コンテストに も参加している。決して離れ小島という 
状態じゃない」 

► 「離れ小島になっちゃっている人って多いと思う。そ 
ういう人がひとりで D 6 GA と コネクション を 持つ こ 


読者通達事項 


■第1回 CGA システム討論会のお知らせ 

CGA システムのこれからの バージ ヨ ンアップ 
のためにも，広く 一 般の ユーザー の皆さんの意 
見をお伺いしたいと考えています。そこで，大 
阪近辺の ユーザー の皆さん，当 チームの スタ ッ 
フといっしよに CGA システムの問題点について 
夜を徹して語り合ってみませんか？（本当に夜 
中に開催するとは限りません） 

第I回は CAD を中心に，まったく新しいモデ 
リング法からちょっとした改良点など，新しい 
CAD の仕様害を公開しながら，和気あいあいと 
語り合いたいと思います。 

月日は丨丨月中旬を考えています。特にアイデ 
アがなくても， CAD を頻繁に使用している方な 
ら結構ですので，参加ご希望の方は当ブロジェ 
クトルームの“第丨回討論会事務局”までおハ 


ガキにてご連絡ください。のちほどこちらから 
ご連絡いたします。 

〒533大阪市東淀川区淡路 5-17-2 篤コー 
ポ102号 

D6GA プロジヱクトルーム 

■ CGA システムマニュアル配布のお知らせ 

CGA システムが パージヨンアップす るにつれ 
て，だんだんマニュアルの内容が食い違うよう 
になってきました。そこで，現在のマニュアル 
の残りを処分したいと思っています。 チー ムや 
クラブで CGA システムを使っているが，マニュ 
アルの数が足りなくて困っているというような 
方がいらっしゃいましたら，ハガキにてご連絡 
ください。実費でマニュアルのみの配布を行い 
ます。数に限りがありますので，申し込みは早 
いもの勝ちです。 


■サイクロン CG 大会のお知らせ 

先月号のペンギン情報コーナーにて掲載され 
ておりましたように，9月24日午後丨時半より， 
渋谷道玄坂のフォーラム8にて，アンス•コン 
サルタンツ主催「第2回サイクロン CG 大会」 

が開催されます。名誉なことに， D6GA を代表 
してかまたも審査員をさせていただいています。 
また，当日会場では「好きやねん CG 大阪合 
宿」で話題を呼んだ Z ガ〇ダムの変形シーンや， 
チーム TOSAKA のグリフォ〇なども公開する予 
定です c 皆さんもぜひ，いらしてください。 

■先月号の間違いのお知らせ 

本誌9月号の本連載のモデラー高津の LOGIN 
の コーナー 内の “FFE " はすべ て “FF •’の 間違 
いです。この場をお借りしてお詫びいたします。 
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とができると思いますか？ 私は難しいと思いますよ」 
——そのひとつの道として， CGA コンテストへの参加 
がある。ここに集まった人の多くもコンテストの参加が 
きっかけになってますから。しかしそれは作品ができな 
ければ参加できないので，鶏か卵かということになって 
しまいますが。 

► 「現時点では，悪い環境下に耐えて各自の奮起に頼ら 
ないといけない面があるのはしかたがないでしよう」 

► 「各自ができる範囲で努力するというのが D 6 GA の 
基本方針だし」 

►「 Oh ! X で各地のチーム紹介をやったでしよ。ああい 
うのも，どんどん続けてほしい」 

► 「私のチームも掲載しましたが，ほとんど連絡がなか 
った」 

——あの掲載で人数が集まったという例も聞いています 
が，もちろん，成功といえるレベルじやない。でも，私 
はあまり悲観していない。こういうことは，地道に続け 
ていけばいいと思っています。あれは1回目ですから， 

とりあえず始めたということでお許しください。 

► 「公開されている連絡先が D 6 GA だけなら，1局に 
集中するのは当たり前。あの掲載によって，少しずつで 
も，各サークルに連絡が入っているのなら，成功じやな 
いですか」 

► 「私のチームはいまでも受け付けているから，どんど 
ん連絡入れてほしい」 

ホ 

……という具合に，話は各自の体力が続〈限り果てし 
なく行われました。たいへん貴重なご意見も多く，なか 
なか有意義なイベントであったと思います。来年はさら 
に参加者を増やして行いたいのですが，金沢である SF 
大会で行おうという案もあり，まだ未定です。皆さんも 
機会がありましたら，積極的なご参加をお願いします。 

^ビデォボードの善し悪し 

シャープから7月に発売されたビデオボードを見て， 

まるで CGA システムの ための ボー ドの よ うだと思われ 
た方も多いでしよう。私も以前から鳥居部長と会うたび 
に， S 端子のビデオ出力を本体に付けてくださいとお願 
いしていました。しかし，新機種の本体に付けるとなる 
と，以前の ユーザーが 対応できないので， ボー ドとして 
商品化するとのお話をいただきましたのはずいぶんと昔 
のことです。本連載において，一度もイ メー ジ ユニット 
を使った録画方法を取り上げなかったのは，その辺の事 
情がありました。 

しかしですね，確かに私はボードでもいいと言いまし 
たが，まさか2スロット占有するなんてことは聞いてお 
りません。 EXPERT など大部分の機種が2スロットし 
かない以上，増設メモリや数値演算プロセッサなど CG 
A に必須のアイテムが搭載できなくなってしまうではあ 
りませんか！ 

“好きやねん CG 大阪合宿”でも，このビデオボー 
ドは展示され，画質のよさは非常に好評でした。イメー 
ジユニットと上匕較して，その差はひと目見てわかるほど 


で，特に赤い色がにじまず，ゴーストが発生しなくなっ 
たのがうれしい点です。もちろん，ディスプレイと同等 
というわけにはいかず，ドットがしっかり四角形のまま 
録画できるというほどではありませんが，そのくらいの 
劣化は， CG 独自のあのギザギザ感をカバーするのに適 
当で，アンチエリアスをかけた動画を録画した場合にち 
ょうどよい具合になります。また，イメージユニットの 
ように外部にビデオ信号を発生する装置 （ VTR など） 

を接続する必要もなく ， CG A のビデオ落としの作業が 
ずっと手軽にできます。 

しかし，“大阪合宿’’に集まった方々も，2 スロット 
使うというデメリットがあまりにも大きく，購入は見合 
わせたいとの感想がほとんどでした。せっかくのこの画 
質がもったいない！なんとかよい方法がないものかと 
ビデオボードをよく見てみると，実によい方法が浮かん 
できました。ちょっとした改造で， スロットに 差す必要 
のない，名づけて“ビデオ ユニット” ができるのです。 

ということで，本連載始まって以来のハードウヱア講 
座です。とはいっても，非常に簡単なものですので，ぜ 
ひ皆さんす兆戦して，よい画質の CGA を楽しんでくださ 
い。なお，この改造によってビデオボードが故障などし 
た場合， D 5 GA も， Oh ! X も，シャープも責任をとって 
くれませんのでご注意ください。 

by モデラー高津 

ビデオユニツトの製作製作費約3, 000円 

難易度 ☆ 

• 制作方針 

ビデオボードを見ればすぐにわかりますが，スロット 
についている端子はほとんどありません。調べてみると， 
つながっているのはグランド (0 V ) と +5 V と +12 V の 
3本だけでした。つまり，ビデオボードは電源をとるた 
めだけにスロットを2つも占有しているのです。そこで 
電源を別なところからとり，ボードを手作りのケースに 
入れてしまえば，あっというまにスロットをひとつも使 
わないビデオユニットができてしまうのです。 

別な電源として， +5 V と +12 V が出て いる X 68000 本 
体の端子を捜してみると，ちょうどカラーイメージユニ 
ット用のイメージ入カコネクタがあります。ビデオボー 
ドを使用して いる ときにはカラーイメージユニットは使 
用しないでしようから，電源はここからとれば問題あり 
ません。 
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ケースの加工は，ビデオボードにスロットカバーがつ 
きますので，それに合う長方形の穴と固定用の穴を4つ 
あけ，ボード固定用の穴を3つあけるだけです。 

ハードの改造は初めて，という方もいらっしゃるで 
しようから，ビデオボード自体の改造は行いません。み 
のむしクリップと 1 C クリップを使ってビデオボードに 
接続します。要するに，改造といっても，電源ケーブル 
とビデオボードを入れる箱を作るだけなのです。 

•部品 

ビデオボードさえ入手できれば，あとは入手が難しい 
部品は特にありません。東京•秋葉原ゃ大阪•日本橋に 
限らず，地方のパーツシヨップでも手に入ると思います 
(別コラム参照） 0 25ピン Dsub コネクタ （ X 68000 本体の 
背面のイメージ入力端子につながるもの）はメスです。 
ケースは，ビデオボードが入ればそれで問題はありませ 
ん。2芯シールド線は見た目を気にしなければどんな 
コードでも結構です。 


• 部品一覧 


アルミケース(例タカチ YM -200) 

150 X 200 X 40 

1個 

1050円 

25ピン Dsub コネクタ（メス） 


1個 

500円 

// カバー 


1個 

395円 

みのむしクリ ップ(づ〇 


1個 

20円 

1 C クリップ 


2個 

120円 

2芯シールド線 


1 m 

100円 

スペーサー 

4 mm 

3個 

30円 

ネ ジ 

4 3 X 1 Omm 

7個 

50円 


•工具 

図1回路図というには簡単すぎる回路図 


X68000 イメージ入カコネクタ ビデオボードスロット端子 
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図2 電源ケーブルの実体配線図 



半田ゴテ，半田， ニッハ。， ラジオペンチ，ドライバ、 一， 
ハンドドリルはまず必要です0ケース加工にはハンドニ 
ブラーがあったほう力す便利ですけど，ドリルで穴をあけ 
てからやすりで削ってもよいでしよう。ドリルもないと 
いう方は，ネジではなくボンドでくっつけるなりしてく 
ださい。 

•製作 

まず電源ケーブルを作ります。2芯シールド線は 50 cm 
もあれば十分でしよう〇 2芯シールド線の一方の端は， 

25ピン Dsub コネクタの14番ピンに黒色（もしくは青や 
赤）の芯線を，15番ピンに網線（網状になっている導線 
を引っ張って，こよりのように線状にしたもの）を，16 
番ピンに白色の芯線を半田付けします。ピンの番号は， 
コネクタをのぞいてみるとちゃんと書いてあります力?， 
左下の端が14番，そこから右に15，16番と続いています。 

2芯シールド線のもう一方の端は，白•黒の芯線には 
1 C クリップを，網線にはみのむしクリップをつけます 
(注意：カラーページの写真では，3つとも 1 C クリップ 
になっています）。 1 C クリップへの半田付けは，まず， 
ボタン状になっている部分を強引に引っ張ってはずし， 

芯線をボタンの穴に通し，中の金属板に接続します。そ 
して再びボタンを強引にはめ込んでください。みのむし 
クリップは，ゴムのカバーを引っ張ってはがし，その力 
バーに網線を通してクリップに接続し，またカバーをか 
ぶせます。半田付けはこれだけです。 

テスターがある方は， X 68000 本体の電源を切ってか 
ら電源ケーブルだけを接続し，電源を入れてみて，電圧 
がみのむしクリップに対して（ベースにして），白色の 
芯線は 12 V ， 黒色の芯線は 5 V であることを確認してく 
ださい。電源が入らないときは，ショートしている可能 
性があります。確認してください。 

大丈夫だったら電源ケーブルをビデオボードに接続し 
ます。接続は図を参照して行ってください。みのむしク 
リップはビデオボードのスロット部（差し込み口）をこ 
ちらに向けて，右端の1番ピンをはさみます。黒の芯線 
につなげた 1 C タリップは左端の5〇番ピンにつながって 
いるコイル L 1 (基板に小さく L 1 と書かれた 100 K の黄色 
い部品）の2本の足のうち，スロット側の足に引っかけ 
ます。白の芯線の 1 C クリップは，スロット部の真ん中 
辺のピン （22 番ピン）につながっているコイル L 2 ( 基 
板に L 2 と書かれた 100 K の黄色い部品）の2本足のスロ 

図 3 電源ケーブルとビデオボードの接続部 



みのむしクリッブ 
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ット側に L 1 と同様に引っかけます。 

以上で配線は終了しました。簡単なので，10分もあれ 
ばできると思います。ここで，一度 X 68000 本体に接続 
して動作を確認しましょう。電源を切った状態で，取扱 
説明書にしたがって，各種ケーブルを接続します。本体 
の電源を入れてみて， 1 C が熱を持っていないことを確 
認しましょう。もしおかしかったら，ただちに電源を切 
って，配線が間違えてないか確認してください。問題が 
なかったら，なにかアニメーションを表示させ （15 kHz 
モードにすることをお忘れなく。 SRANIM の場合 / L 才 
プションを付けてください。 HANIM の場合，実行後 L 
キーを押してください）画面を TV に表示して，ビデオ 
信号が出ていることを確認します。 

これで完成です。ケースを加工するのが面倒な方はこ 
のままむき出しで使用したり，紙の箱に入れても結構で 
すが，/イズを減らすためにも見た目のよいアルミケー 
スに 入れましよう。幸いにもビデオボードにはスロット 
カバーがついていますので，簡単にきれいなケースを作 
ることができます0アルミケースの後面にはスロットカ 
バーがつくように 155 X 40 mm の長方形の穴をあけます。 
ハンドニ ブラーがあれば簡単ですが，アルミなので， ニッ 
パでできるでしょう。その穴の両隣にスロットカバーの 
ねじ穴に合うように直径3.2_の穴を4つあけます。ケ 
ースの底にはビデオボードの3 つの 穴にあうように穴を 
開けます。これでケースの加工は終わりです。 

ケースの底に4 mm の スぺ ー サ ーをはさんでビデオポー 
ドを固定し，後面に スロッ トカバーをつければ完成です。 
なにしろアルミのケースですので，ボードを直接置くと 
ショートしてしまいます。必ず，ボードの裏がアルミに 
接しないように注意してください。不安でしたら，厚紙 
か何かをビデオボードの大きさに切って，ケースの内側 
に貼ってください。また，アルミケースはグランドにち 
ょうどよいので，みのむしクリップで摘んだところとア 
ルミケースを，適当につなげてやることをお勧めします。 

電源ケーブルも スロッ トカバーから出します。電源ケ 
ーブルを X 68000 本体のイメージ入カコネクタに接続す 
る以外は，使い方はビデオボードとまったく同じです。 

(注）コネクタの抜き差しは電源を切っているときにし 
ましょう。電源を入れたままコネクタを差すと，いきな 
り電源が落ちる場合があります。その場合は慌てずに一 
度電源を切れば大丈夫です。 



/終ゎり I こ 

連載をせっかく隔月化にしてもらったのに，間に緊急 
レポートを入れていたんでは意味がないような気がしま 
す。 

ところで，この原稿のために友人（高校の同級生）の 
結婚式に行けなくなりました。池田君，あゆみさんご結 
婚おめでとうございます。学生結婚ということで，いろ 
いろ苦労もあるでしよう力 5 '，どうせ結婚なんて，愛と思 
い込みと勢いがないとできないものでしようから，私は 
賛成です。いつまでも愛を貫いてください。 

さて，来月号は MAX 田口君による「宇宙要塞 CAD 
の逆襲」です。私は季節外れの旅行でしばら〈不在にな 
りますので，すべて田口君に任せています。多少不安で 
すが，お楽しみに。 


ビデオユニット改造パック通信販売のお知らせ 


ハードの改造など初めてという方は，部品を揃えるのにもいろいろ不安があ 
るでしよう。25ピン Dsub コネクタといってもどんなものかわからないし，ちよ 
うどよい大きさのアルミパックが見つからないかもしれません。 

そこで，前記部品一覧の値段を調べるついでに，通信販売をしてくれるお店 
を見つけておきましたので，自分で部品を揃える自信がない方はご利用くださ 
い。右記の住所に現金書留で申し込んでください。なお，この通信販売は D6GA 
は関与しませんので，お問い合わせは直接お店のほうへお願いします。 


申し込み先〒556大阪市浪速区日本橋 5-7-19 共立電子産業（株） 
TEL 06(644)4446 

申し込み方 「Oh!X ビデオポード改造パック」と記入のうえ，前記の 
部品一覧を添える。 

値段 近畿地方の方 3,000円（消費税，郵送料込み） 

その他の地域の方3,500円（同上：地域による郵送料の差 
額分は切手として返送されます） 
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ゲーム s ゲーム 


Komura Satoshi 


古村聡 


さあ，いよいよ夏休みだ。えっ，もう終わったの。なんだ，せっか<ゲームを2 
本も用意してあげだのに， XI 用のパズルゲーム「ばらんしい」と X 68000 用ゲー 
ムの「それ行け！ □ケツト」を。なんだ，終わったのか。でも，やってね。 


はろ 一。 ついにモデムを買って通信を始 
めてしまった（で）です。通信はいいぞお， 
楽しいぞお。いや 一， こんなに面白いもの 
だとは思わなかったな 一。 ぐふぐふ。 

実をいうと私の周りにはすでに通信をや 
っている人はかなり多く，私は仲間内では 
かなり出遅れたほうだったりするので，ほ 
かの人にあれな一に？ これってな一に？ 

と聞きまくっている毎日なのです。 

で，そんなある日のこと，私に通信のこ 
とを教えてくれる M 氏がこんなことを言っ 
てました。 

「 PDS のレスって全然ないんだよね」 
この M 氏，その名のとおりバリバリの某 
舶来機 M のユーザーで，プログラムなんか 
もガシガシ強力なものを組む人だったりす 
るのですが，彼の組んだあるプログラムを 
某大手ネットに PDS としてアップしたと 


ころ，某雑誌（なんか今回は某が多いな）に 
「マック ユーザー 必須の PDS ソフト」とい 
うことで雑誌に紹介されてしまったのです。 

それからというもの毎日毎日その PDS 
はネットからいろいろな人にダウンロード 
(つまり電話回線を通して自分のパソコン 
のデイスタ上にプログラムをコピーするこ 
と）され，ついにはその回数は1週間で100 
以上にもなったんだそうです。それだけダ 
ウンがあれば当然，よかったよ 一， とかち 
よっとここは直したほうがいいんじゃない 
とか，レスポンスがいろいろ来るだろうと 
思いきや，実はたったの1通しか来なかっ 
たんだそうで， M 氏はとてもがっかりして 
いました。 

雑誌で PDS のことがよく 「ただで使え 
る便利なソフト」という感じで紹介される 
ためなのか，ただでもらえるソフトはもら 



ばらんしい 

っちゃえ，もらったらそのまんま，もらっ 
ちゃえばこっちのもの:^というような人が 
多いみたいなんですね。初心者がこんなこ 
とをいう筋合いではないかもしれませんが 
はっきりいって，私は悲しいです。 

プログラムっていうのは人が苦労して作 
るものだし，ましてや PDS に至ってはほ 
とんどボランティア。作る人も使った感想 


1はちんしい 


1 *-BALANCY- Version 1 . 18 *90/6/24 

2 * (0 1990 Sakamoto Yasushi 

10 WIDTH 40 ： CLS4 : INIT ： CSIZE3 : "FADE" 

20 LINE(0,0)-(319,199),PSET,1,BF 

30 DEFINT A-Z：DIM B ( 9,9 ) , BS ( 9,9 ) , C $ { -!) 

40 F=4 ： F0RI=1T04:C8(I)=CHR$(27+1) : NEXT:CS(0)=" 

50 » 

60 FORI = 0TOF+ 1 : FORJ=0TGF+ 1 : BS ( I , J ) =0 : NEXT : N ! EXT 
70 FORI=0TO3 ： FORJ=OTOF"2/4-l : K=I»F'2/4+J 
80 BS(K¥F+1,K MOD F+l)=1+1 : MEXTrSEXT 
90 F0RI=1T0F ： F0RJ=1T0F 

100 SWAP BS( I , J) ,BS( INTI RND* F+l > ,INTI RND* F+l)) : N'EXT : N : EX"T 
110 FORI = 0TOF+1 ：FORJ = 0TOF+1 ： B( I , J ) =BS ( I , J ) : NJEXTr.MEXT 
120 CLS ： LOCATE 18-F,8-F ： PRIMT#0" M ； STRINGS ( F, “ 

130 LOCATE 18-F, F+l 0 ： PRINT#0" い .； STRINGS ( F ，リ " 

140 FORI=lTOF ： LOCATE18-F,8-F+2*I ： PRINT#0 , ' • ;SPC(F> ; M : NEXT 
150 し INE{0,20 >-(39,23 >,”■” ， BF:LOCATE0,20 ： PRINT"*" 

160 R=F"2 ： L0CATE2,21 ： PRINT#0L；S ING"-BALANCV-BKEST ss " , R ； 

170 F0RQ=1T0F : FORP=1TOF : '* PRT" ： NEXT ： NEXT ：" F-IK "： X=1 : Y =】 

180 LOCATE34,21 : PRINT#0USING"##",R；：IF R=0 GOSUB"???":GOTO60 

190 CREV1 ： P=X ： Q=Y ： M PRT":CREV：PAUSE 1 

200 S = ASC( IKKEY$(0) ) : IF S = 27 THEN "MENU.. 

210 S = S-48: IF S>9 THEN S=S-96 : "CHANGE GOTO] 80 

220 M=(S = 6)*(X< F)-(S = 4)*(X>1) ： N=(S = 2)*(V< F)-iS = 8)»(Y>1) 

230 IF M+N = C THEN 200 ELSE P=X ： Q=Y ： X = X + M ： Y=Y + N ： **PHT'* ： GOTOl90 
240 1 2 

250 LABEL"PRT” ：し OCATE18-F+P*2,8-F+Q*2 ： PRINT*0C$(B(P,Q)) : RETURN 
260 LABEL"CHANGE" 

270 M=(S=4)*(X<F)~(S=5)»(X>1) ： N=(S=2)*(Y<F)-(S=3)*(Y>1) 

280 IF M+N=0 OR B(X,Y)=0 OR B(X+M,Y+N)=0 THEN 310 

290 SWAP B{X, Y) , B (X+M, Y"+N ) : P=X ： Q=Y ： "PRT" : PsX+M ： Q=Y+K ： "PRT" 

300 U=X:V=Y:"CHK” ： U=X+M:V=Y+N: ..CHK" 

310 RETURN 


320 LABEL"CHK" ： C=B(U,V) : PP=(C=2)-(C=1) : QQ=(C=3)-(C=4) 

330 IF C=1 AND B(U+1,V) = 2 GOSl ； B"ERS" 

340 IF C=2 AND B(U-1,V)=l G0SUB"ERS" 

350 IF C=3 AND B(U,V-l)=4 GOSUB"ERS" 

360 IF C = 4 AND B(U,V+1)=3 GOSUB..ERS" 

370 RETURN 

380 LABEL"ERS" ： FORI=7TO0STEP-1 : COLORI 

390 P=U ： Q=V ： "PRT" ： P=U+PP ： Q=V+QQ ： '* PRT "： NEXT ： COLOR 7 

400 B(U,V)=0 ： B(U+PP,V+QQ)=0:R=R-2：RETURN 

410 LABEL"MENU" ： "FADE":LINE(0,0)-(39,19)," ",BF 

420 L0CATE14 ,4:PRINT#0. ，一 MEMU-. ，： LOCATE6,8:PRINT#0"* TRY AGAIN" 

430 LOCATE12,12 ： PRINT#0"MODE CHANGE" : Q=0 ： M F-IN" 

440 WHILE STRIG(0)=0 ： S=STICK(O) ： Q=Q-(S=8)*(Q>0)+(S=2)»{Q<1) 

450 PRINT#0" ": L0CATE6,Q*4 + 8:PRINTJt0"#” : LOCATE6,Q*4 + 8 ： PAUSE1 
460 WEND ： IF Q=0 GOSUB..FADE” ： G0T0110 
470 WHILE STRIG ⑻： WEND:REPEAT 

480 S=STICK(0) : F=F-(S=4)*{F>4)*2+(S=6>*(F<8)*2 

490 LOCATE22,12 ： PRINT#0USING , *#^# ",F,F ： PAUSE1：UNTIL STRIG(O) 

500 "FADE" ： GOTO60 

510 LABEL"FADE M ： FORI=0TO7:PALET 1,1：PALET 0,I ： NEXT：RETURN 

520 LABEL..F-IN" :FORI = 7TO0STEP-1:PALET 0,1: PALET 1,I : NEXT .-RETURN 

530 LABEL"???" ： PAUSE10 ： "FADE" : P$= " ' -- 參 =~ ■■■し 

540 CREV1 : CLS：RESTORE 610 ： FORI=0TO10：READ DS ： FORJ=lTO LEN(D$) 

550 C=ASC(MID$(D$,J,1))：IF C<65 THEN PRINT#0SPC(C-48) ； : GOTO580 

560 IF 084 THEN CREV 

570 PRINT#0MID$(P$,C-6<1,1} : : CREV1 

5,80 NEXT : PRINT#© ： NEXT : PRINT#0" CONGRATULATIONS : " ； ： CREV 
590 FORI=6TO0STEP-1 : PALET 1,1：NEXT 

600 WHILE STRIG(0)=0 ： WEND : FORI=1T07 : PALET 1,I ： NEXT ： CLS:RETURN 
610 » 

620 DATA 7AC2CB,6CIC2CIC,4KKRJRKKRJRKK,4VLT2MU2TLU,6CDJEDJEC 
630 DATA 6CCHCCHCr,5DPFJGFJG0E,5C2NNNN2C,5C8C,5FJJSJJSJJG,8FJJG 
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が聞きたくて作った人も少なくないはずで 
すし，人にプログラムの評価をしてもらっ 
てうれしくない人はいないですよね。 

「タダで配ってんだからいいじゃん」な 
どといわずに，ダウンロードしたらちゃん 
とレスを返してあげましよう，という（で） 
の意見でありました。じやんじやん。 



白と黒は4倍角勿し3し! 


さてと，余談はこれぐらいにして今月の 
1本目いきましょう。今月の1本目の作品 
は X 1用のまたまたパズル ゲームで 「ばら 
んしい」です。 

ばらんしい for XI シリーズ 

( CZ -8 FB 01) 


ね。2重丸あげよう。ぽん。 

さて，作者の坂本さんは受験生というこ 
とでこのゲームを最後に XI を封印してし 
まうんだそうです。そうかそうか，もうそ 
んな季節がやってきたか。懷かしいなあ。 
しかし，受験生のみんながいなくなってし 
まうと私もさびしいな，う一ん。ねえねえ， 
坂本さんもさ，いいじやん受験なんて堅い 
こといわずにさ，ね，ね（な一に力 ? ，「ね， 
ね」なんだか……)〇 

まあ，冗談はともかくとして受験生の皆 
さん，がんばってくださいね。ご武運をお 
祈りしております。 



飛ん T け，飛んてけ，青い空へ 



それ行け！ ロケット 


ったゲームの場合，その当たり判定を容易 
にするために 16 X 16 の枠に目一杯パターン 
を描くというのは実は鉄則だったりするの 
ですよね（しまった，ハンズにでも書いと 
きやよかった……)〇その点，ダミーのス 
プライトをヒットチェックに使うというの 


秋田県坂本康 

またしても，恐怖の4倍角男•坂本さん 
(ごめんなさい）による XI 用のパズルゲ 
ームです。 

画面上に矢印が並んでいますね。この矢 
印を——のように向かい合わせると互いに 
打ち消し合って消えていきますので，そう 
やって画面上の矢印をすべて消していって 
ください。あ， 


や， 


では消えませんので注意注意（それじゃあ 
パズルに ならんもんね ）0 そんで， カーソル 
の移動方法ですが結構面倒臭いのでよく聞 
くように。うんとですねえ，まず，2, 4， 
6, 8 の キーで カーソルが 下左右上に動き， 
GRAPH キーと2, 4, 6, 8キーを押すと， 
その方向の矢印と カーソルの ある矢印と が 
入れ替わります。あと ESC キーでメニュー 
画面。メニュー画面では2，8で TRYA 
GAIN と MODE CHANGE の選択， M 0 
DE CHANGE では4， 6で選択，スペー 
スキーで決定です。 

今度のパズルも死ぬほど手強いですね。 
先のことを考えてながらやっていると，頭 
がだんだんこんがらがってしまいます。し 
かし、面クリアしたときがなかなか「ぐふ 
ぐふ」であったりするので皆さんがんばっ 
てクリアしましよう！ ぐふぐふ（あんま 
りいっちやうとバレそうだなあ）。しかし， 
キャラクタ画面でよくここまで描きました 


さて，お次は今月の2本目（最近は月2 
本が完全に定着したな）は X 68000 用のゲ 
ームで「それ行け！ ロケット」です。 

それ行け！ ロケット for X 68000 

( X-BASIC 要 sp _ chk ()) 
神奈川県野田敏之 

そんで,操作法& ルールに なるわけです 
力 ? ，要するに障害物を避けてロケットを U 


はなかなかのアイデア赏ものです。 

sp _ chk () の場合，対象になるスプライ 
卜がひとつだろうといくつになろうとそん 
なに変わらないので （ BASIC の文法チェ 
ックに一番時間がかかつていてそれに比べ 
ると実はスブライトのチェックなんて比較 
にならないくらい速い時間なのだ）これで 
も 0 K でしょう 0 


F 0 にぶっつけちゃえば万事 0 K なわけで 
す。ジョイスティックで台車を左右に動か 
して A ボタンでロケットを上向きに加速し 
ていき，離すと重力に引っ張られて落ちて 
いっちゃう。ま，早い話がロケットには上 
に慣性が，下には重力がかかってしまうん 
だなこれが，もう。 

おっとっと。一度台車を離れるとロケッ 
卜は左右に移動できなくなるので注意する 
ように。もうひとつ，燃料は少ないから無 
駄使いしないように。ほんじゃあ，がんば 
って UF 0 を撃退してちょ，てなもんです。 

ほっほお。がんばりましたね。当たり判 
定に sp _ chk () が，そしてスプライトのデ 
ータには圧縮ルーチンが使われているんで 
すね。大変よくできました。まる。 

それでですね，投稿原稿によれば，「ロケ 
ットと UF 0 のヒットチェックに sp _ phk () 
を使っていますが，実際のヒットチヱック 
は UF 0 のキヤラではなくその後ろにある 
ダミーのスプライトに対して行っています。 
これによって視覚的に納得のいくヒットチ 
ェックになったと思います」だそうです。 

う一ん，そうですねえ。 sp _ chk () の仕 
様を見ればわかるように，スプライトを使 


ちよつとお手軽な圧縮勿話 

ところで，ここで使われているデータ圧 
縮は，俗にいうランレングス法ってやつな 
のですね。ご存じない方にこの解説をして 
ぉくと，早い話，同じデータがいくつ続い 
ているかを調べてデータを縮めていく方法 
なんですね。たとえば， 

05,05,05,00,01，01，01，01 
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という データが あった としますね。 こいつ 
を，1個目がデータの中身，2個目がその繰 
り返し回数……として， 

05,03,00,01，01，04 

と書いてやるんです。ほら，ここでデータ 
が2個減ったでしよ。これをデータの個数 
分繰り返してやれば結構データが減るんじ 
やないかな，って寸法です。 

懐かしいなあ。実は私もマシン語で初め 
てプログラムを 組んだときは， こいつで 絵 
の データを圧縮したんですよね。ただ， こ 
のプログラムの 場合，あんまりデータ カす 縮 
んでませんね。データを縮めるのに命を賭 
けちやうんであれば ここは 一発，スプライ 
リスト2それ行け丨ロケット 


卜を単色にして一気にデータを1/8にして 
しまうとか, 

(たとえば， 

0,3,0,3,3,3,3,3 

これを3を1に見たてた2進数にする。 
0，1, 0，1，1，1，1，1 
それを16進数化して， 

5 f 

と書くようにするとか…… ) 

さらに上のノ、。ターンとの XOR をとって0 
を縮めるとか……。面倒臭いか。 

なんだかんだいっても，このランレング 
スっていうのは圧縮，展開のプログラムが 
簡単に組めるし（つまりデータの展開にそ 


100 /本 それ行け！ ロケット FOR X68O00 X-BAS 1C (要 sd chk( 
)) 1990 年 7 月 6 日（金 } 

110 ，* PROGRAMMED BY TOSHIYUKI •.みずのなかのわあくうせいまあ 
でえ 一 .. NODA 

120 /* 初期設定 1 

130 screen 1,1,1,1 :conso 丄 e ,,0 

140 int mo , x , y , a , b , st , ux , hx , sx , sy , 1 , j , k ,1,1 〇 =498: float ry : char 
f n,en,ro,po,te,c(25 b) 

150 str D(5)[250],E 

160 sp_init() : sp_on() : sp_disp(1) 

170 sprite_pattern{) 

180 / 本タイ - トル 
190 while 1 

200 locate 23 ， 11: print " それ行け！ ロケット 

210 locate 25,20: print "1990 material" : sp_off() : ro=0 

220 while strig(1)=0 

230 endwhile 

240 repeat 

250 els:fn = 0 ： ry=0 : a=0 ： ro=ro+l ： en=lOl:mo=l：x = 2OO 
260locate 23,15:print ..ROUND " ； ro 

270 vpage{0) : sp_off() : scrinit(ro*5+10) : els:en_print() : vpage(3) 
: sp_on() 

280 /* 台車 & U F O 移動 
290 while a=0 

300 a=daisya() : ufo() : scrolL() 

310 endwhile 

320 /*a ケット変数設定 

330 x=x+8 : y=476 : a=0 

340 /* ロケット & U F 〇移動 

350 while a=0 

360 ufo( ) : a=rocket ( ) : b=hit.chk () 

370 if b then a=28 
380 scroll{) 

390 endwhile 

400 if a=28 then {sp_move ( 0 , \*, y, 5 ) : sp_move (1,x , y+16,5 ) 

410 locate 21,15:print "GAME OVER") else { 

420 sp_move{5,u\,16,5) ： sp_move(6,ux+16,16, 5)} 

430 for i=0 to 2 : apage(i):wipe() ： next：els 

440 color 3:until a=28 

450 endwhile 

460 /* 台車移勘 

470 func daisyat) 

480 sp_movesp_set(4,x+ 32,50 9,&H4103) 

490 sp_move(O,x+8,476,0) : sp_move(l,x+8,492,l) 

500 st = stick(1)：\ = x+2*(st = 4 and x>0) -2 *(st = 6 and x<476) 

510 return(strig(1)=1) 

520 endfunc 

530 /* ロケット移動 

540 func rocket() 

550 if y>476 then return (28) 

560 st = strig(1) ： st=-st*(st<2 and en< > 0) 

570 ry=ry+0 本 <st=l)-0.5?f*<st=0l:fn = -(st=l) 

580 y=y+ry:ry=_ry 本 （ y>-l} : y=-y*(y>0) 

590 spmove(0,x,y,0) : sp_move(1,x,y+16,1+fn) 

600 en=en-fn 

610 if en then en_print( ) else locate 25 ,13 ： co lor 6 : print ..燃 
料切れ ！" 

620 return(sp_chk(0,7,7)) 

630 endfunc 

640 "燃料表示 . 

650 func en_print() 

660 locate $6,0: print •. 燃料： .. ； en-1 

670 endfunc 

680 /* 当た 》) 判定 

690 func hitchkJ) 

700 hit=0 
710 apage(0) 

720 if x + 511-sx> 511 then hx = \-s\ else h\ = >: + 511-sx 
730 hi t = hi t+poi nt ( 8+h.\, y ) 

740 hit=hit+point(4+hx, y+ 16) 

750 hit=hit+point(12+hx,y+16j 
760 apage(1> 


770 if \ + sy> 511 then h\ = .\+sy-5 l 1 else hx = \ + sy 
780 hit=hit+point(h\+8,v) 

790 hit=hit+point(hx+1,y+16) 

800 hit=hit+point(hx+1^,y+16) 

810 return(hit) 

820 U F O 移動 
830 func ufo() 

840 sp_move ( 5 , us ,16,4 ) ： sp_set ( 6 , u.\ + 32,32 , &H 1101 ) 

850 sp_move(7,ux+8,8,fi) 

860 ux=ux-3*mo 

870 if ux<4 then mo=-l else if u\> 171 then mo=1 

880 endfunc 

890 /* 陣害物セット 

900 func scrinitt k ； char) 

910 for i=0 to1 
920 for j=0 to k 
930 apage(i) 

940 symbol(rnd()»700,(rnd()* 400)," ■",1,1,1,M,0) 

950 next : next 
960 endfunc 

970 パ障害物スクロール 
980 func scroll() 

990 home(0,511-sx,0) : sx=sx+l 
1000 home(1,sy,0):sy=sy+1 
1010 if sx=512 then sx=0 
1020 if sy=512 then sy=0 
1030 endfunc 

1040 / 本キャラクタ • セツト 
1050 func sprite_pattern() 

1060 D(0)="XO733X0E33X0DX34XOBX36XO9X38XO8X38XO8X38XO8X38XO8X38 
X08X38X08X38X08X38X08X38X08X38X 
1070 D(0)= D(0) + M 08X38X08X38X04 

1080 D(1)="X04X38X08X38X08X38XO8X38X07X3AXO6X3AX05X3CX04X3C000X 
3E00X3EX0FX0FX0FX0FX0FXOFX 04000 

1090 D(2)="X04X38X08X38X08X38X08X38X07X3AX06X3AX05X3CX04X3C000X 
3E00X3EX 0554544555 X08C 40444 D5X0 
1100 D(2)=D(2)+"8D55DD554XO8CC5544D4XO9DCCDD4X0B44C4X0400 
1110 D(3)=*'X0FXOFX0FXOFX0FX0FX0FX0FX0FX09X8F8X04X9C 000988 8X0B9X 
85X0A9X850088O88X04988800088088 
1120 D(3)=D(3)+"X05X94X94X94 

1130 D(4)="X0FX0FX0FX0FXOEX56X08X58XO7X59X065554454454X06555445 
4454X05X544454454XO5X5BX04X5CO0 
1140 D(4)=D(4)+ M 0X5DX05X4400X44X0744X0444X0F000 

1150 D(5)="50050C 00040504 CO50C050-10400500544XO540445C40C 04505 CO 
5D04OC 45 504 4 D 5054 00 ‘15000504 O0DD 
1160 D(5)=D(5)+"O0DO5O5D 00044 

1170 D(5)=D(5)+" 005455004 DO0C050DDD5DDD0DODO054D0D 040005 D05DC54 
DD040D4X04D0OCODO40DD0055DOO0C4 

1 180 D(5)=D(5)+"DD40D5XD 5500045 0C05DD5D 5000504500 0C045D0 05550 OX 
44044044 C000CC 004000 C 000554 CC 
1190 for 1=0 to 5 
1200 kaitou() 

1210 next : endfunc 
1220 ハかいとう 
1230 func kaitoui) 

1240 po=l ： i=0 

1250 while i<>256:locate 23,11 : print lo: 1 〇 =1 〇 -1 
1260 if mid(po)<> M X M then c(i)=va1('&h"+mid(po)) ： i=i +1 : po=po+l 
else { 

1270 te = val{ M &h"+nii«i(po+l)) : j = val( ,, &h"+raid( po+2 )) 

1280 for k=l to j 

1290 c(i)=te:i=i+l 

1300 next 

1>310 po=po+3} 

1320 endwhile 

1330 sp_def(I,c,1):sp_move(0,0,0,1) 

1340 endfunc 

1350 ハみつどだら _ 

1360 func str mid(po ； char) 

1370 return(mid$(D(1),po,1)) 

1380 endfunc 
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んなに時間がかからない），改良もしやすい 
んで，結構お手軽ないい圧縮の方法なんだ 
よな，と私は密かに思ってしまいます（上 
級者の人には笑われるだろうけど）。が，も 
っと縮めた一いとおっしゃる方には，さら 
なる圧縮の方法もあるわけですが，それは 


皆さん各自で調べていただきましよう。た 
ぶん参考文献も結構あるだろうし ， Oh ! X 
のバ ツクナ ンバー にもあるんじやないかな 
と思います。がんばってね。 

う一む，ほとんど圧縮の話ばかりになっ 
てしまった。 


さて，とりあえず今月はこんなもんです 
かね。投稿者の皆さんががんばっているの 
で私はうれしい。これからもどんどん送っ 
てくださいね。では，そんなこんなでまた 
来月。 

さあ，また泥沼チャットでもやるか！ 


(で)のば一てい八ンズ^ -(番外編) 


おなかがへったよお 

ぴ一ひゃら，ぴ一ひゃら，……。はい，皆さ 
んこんばんは。ぱ一ていハンズの時間がやって 
まいりました。 

さて，先月をもちまして無事，第丨部が完了 
したば一ていハンズ，今月は質問のハガキでも 
来たら，なんか質問箱でもやろうかな……と思 
って丨回空けておいたんですけど（決して第2 
部のネタがなくて安易にそうしたわけではない, 
ないってば)。なんだなんだ，待てど暮らせど 
来やしないハガキなんか。 

まあ，このぱ一ていハンズ，元々がたいして 
内容がなかった（うっ）うえに， 6力月もかけ 
てちんたらちんたら書いたから，ひょっとして 

もう読まれてないのかなあ . なんて心配もし 

てしまうのですね。これが。まあ，いいや。質 
問がないんだったら適当に無駄話でもしましょ 
う（いいかげんだなあ）。 

やっぱりパソコンの話なのね 

最近， PDS とか同人ソフトとかが流行ですよ 
ね。最近，通信始めたおかげで思うのですが， 

ま，アクセスしてるネットにかなり偏りがある 
んで私の感想もちょっと偏っているかもしれな 

いけど . ， X 68000 の PDS ってすごく豊富なん 

ですね。びっくりしてしまいました。私自身は 
あまり難しいことはわからんので （GNU C とか 
Jgawk ぐらいしかわからんの），ゲーム関係の話 
になってしまいますが，これがすごいっ！ 

昨日， NIFTY から Oh ! HAJIKI というゲームをダ 
ウンロードしたんですが、こいつがすごいった 
らすごいっ！ BGM バリバリのサンプリング音 
ガシガシでもう市販ゲームとしても売れるんじ 
ゃない？ というぐらいの出来なんです。 

それに先週ダウンしたので，すごかったのが 
(ゲームじゃないんだけどね ） POLI 3 ! 3 D グ 
ラフイックが飛んで飛んで回って回るプログラ 
ムです。 

いやあ， X 68000 ユーザーってすごい。ユー 
ザーの盛り上がりがすごいし （ PDS だけじゃな 
くて普通の害き込みもすごい量！ 3日読まな 


いとあとで読むのが大変)，プログラムもガシガ 
シ出てくる。これで出荷台数が PC -980 I の1/10 
っていうのはいったいどういうこと!？と思っ 
てしまいます （ PC -980 I はもっとすごいのかな）。 

もう私はこうなったら宣言してしまいます。 

X 68000 は文化なのじやあ m 

プログラムの組めるそこの君！ 君こそ文化 
の担い手なのだ！ さあ，がんばって X 68000 
を盛り上げてくれたまえ。 

|んでもって八ンズの宣伝ね 

さて，問題はプログラムが組めなくてギャラ 
リーしている君だったりするのだな。これこれ 
逃げるんじゃないって。 

うん，確かに最近，ブログラムしない人って 
増えてるみたいなんですよね。アンケートハガ 
キにも一番良かった記事： S 0 FT 0 UCH (ソフト 
のレビューのぺージ）っていうのが結構ありま 
すからね。それはそれでいいんですけど。 

でも，私はそういう人にいってあげたいのだ。 

プログラムってのも面白いんですよお I 

たぶんですね，そういう人って，“ひとっぐら 
い自分で作ってみたいんだけど，なにをどうし 
ていいのかわかんない"んだと思うんだな。き 
っと“自分にはゲームなんて作れっこない"と 
思ってるんだな。 

そんなことないんです。よくいわれるセリフ 
だけど“誰だって最初は初心者だった”んだか 
ら。かくいう私だっていまでこそパソコン雑誌 
でいろいろ偉そうに書いてますけど（まあ，私 
程度の力の者がいっても説得力ないのはわかっ 
てますけど），私もね，最初はゲームオンリー 
の人だったんです，実は。 

あれはいまを遡ること x 年前。当時，純真な 
紅顔の美少年だった私（自分で書いても恥ずか 
しいな，これ）は自宅でゲームしたいがために 
買ってしまったんです，パソコン。もちろん親 
には「コンピュータが勉強したいから！」とか 
なんとかいってだまくらかしてたけど，と一ぜ 
んゲームがしたいからに決まってんじゃん，と 
いう純真な少年でした。 

いや，燃えましたねえ。ゲーム。特に，なん 
といっても燃えたのはあのマツビー。ああ，あ 


の愛らしい マツ ピーやら ニヤームコ やらの キヤ 
ラクタたち，そしてトランポリンを使う斬新な 
アイデア！ 指と指の間が皮がムケて血が出る 
までやったおかげで マツ ピーだったら誰の挑戦 
でも受ける！というところまでやり込んだも 
のです。 

そこで，古村少年，ムクムクと頭の中で「こ 
ういう ゲームが 作ってみたい！」という誰もが 
—度は抱く野望をやっぱり抱いてしまったので 
すねえ，これが。 

が，私ははっきりいってマ ツビー ばっかりや 
っていて BASIC すらよく知らなかったんですよ， 
そのとき。プログラムを組んでゲームを作れる 
ことは知ってたんですが，遊んでばっかりで 
BASIC の文法なんてほとんど知らなかったんで 
すよね。知っているのは RUN とか LIST とかのコ 
マンドぐらいでステートメントは全然わからん， 
という困った奴であったのです，実に。 

で，とりあえず，參考書を買ってきたんです 
が，よくわかりませんでした。そこで， そのへ 
んのサンプルプログラムをわけもわからず打ち 
込んでみたんですね。いや，動きましたよ。画 
面の真ん中で X が右に左に。感動しましたよ。 
そんで，そこから少しずついろんなものを本で 
読んだり，人に教えてもらったりでいろいろ憶 
えていって，いま私は Oh ! X 編集室でご飯を食 
ベさせてもらってたりする，ということになる 
わけです，はい。 

はっきりいって，プログラムなんて要領です。 
最初のとっかかりさえなんとかなれば，あとは 
勢いで結構いっちゃうものなんですよ。だから， 
食わず嫌いしないでとりあえずは BASIC でもか 
じってほしいな 一， と思う私なのでした。 

幸い清水さんが先月から新連載，泉さんの X 
- BASIC が来月から新展開，そして不肖わたく 
し（で）のば一てぃ ハンズ も来月から第2部に 
入り，入門用記事揃い踏みですんで， 

みんなで文化しようせ I 

と叫んでしまう私なのでありました。 

いやあ，久しぶりに好きに文章を書いて，ひ 
とりで満足している私なのでした。う一ん，気 
持ちいいなあ。 

では、また来月 Oh!X でお会いしましょうね。 
よいしよお！（と X 68000 を抱えて去る） 


(で） の シヨー トプロぱ一てい 77 
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シナリオ作成の支援 

短期集中連載ということで，ボケコンを使ってテーブルトー 
ク RPG を楽しむためのプログラムを紹介してきました。最 
Matsui Shin 終回は， AD&D および D&D 用の細々としたツールを発表し， 

松井信 あわせてシナリオの作り方にも触れておきましよう0 



先月の CST は試していただけましたで 
しょうか。今月は先月載せきれなかったツ 
ール類を紹介しておきます0 

|シナリオ支援 ツール 

•リスト1 r thac 0.2 ##j 

モンスターやキャラクタの THACO を計 
算します0実は前回の CST のサブルーチ 
ンを抜き出したものです力 5 '， RAM ファイ 
ルに入れておきキーー発で出るようにする 
と，わざわざ表を引かないですむので便利 
です。なお， AD&D (2 nd edition ) 用な 
ので， D & D の人は前回の変更部分を參考 
に自分で書き直してください。使い方は， 
モンスターの HD をそのまま入力する（た 
とえば，トロールなら「6+6」 ） か，たと 
えばレベル7ファイターなら 「 F 7」 と入 
力すれば， THAC 0 が表示されます。 
•リスト2 「 dice .3 ##j 

これも前回のプログラムのサブルーチン 
で，一種の電子サイコロです。たくさんの 
サイコロや24面などの変則サイコロを振る 


ときに重宝します。 ndm + p を n * m + p と 
して入力すれば（たとえば， 16 d 6 + 16 なら， 
16*6 + 16) 乱数で結果が出ます。これも R 

AM フアイルに入れておき，キ-発で出 

るようにすると便利です。 


これらのプログラムは， 
ゲーム中はもちろんのこ 


100 CLS 
110 PRINT 


はほぼ暗記しており，必要なのは表の部分 
だけなのです。というわけでこのプログラ 
ムを作りました0こういったときにポケコ 
ンの機動性が発揮されます。 

|シナ U 才作成の目安 

初心者の マスター はまずモジュールをや 
れといいますが，モジュールは高いし，そ 
のうちやっぱり自分でシナリオを作りたく 
なります。というわけで，シナリオメイク 
の How to について若干ふれておきます。 

• ダンジョンダンジョン 

ダンジョンといえばうっかり土牢などと 
訳されたものを見かけますが， RPG 用語 
ではモンスターや宝がちりばめられた迷路 
を指します。このダンジョンがシナリオに 
あればとりあえず間が持つので， RPG の 
必需品といえましよう。 

というわけでダンジョンですが，注意す 
べきは「広すぎず狭すぎず」というところ 
です。 RPG の楽しさの中で「異世界を探 
検する」というのはかなり重要で，小さす 
ぎるダンジョンは物足りなさを感じてしま 
います。かといって，広すぎるダンジョン 
も困りもので途中でだれてしまいます 。 R 
PG のシナリオというのは要するにエン 


ターテイメントなのですから，いかに盛り 
上げるかというのが大事になるのです。 

エンターテイメントの演出として重要な 
ことは， 

1) いきなり盛り上がりを持ってきてはい 
けない 

盛り上がりのピークを高めるためには， 
その前にウォーミングアップが必要。ピー 
クの前にひとつ小さな山を作っておくと 
ピークをさらに押し上げることができる。 

2) ウォーミングアップが長すぎない 
前置きが長すぎると刺激に対する感受性 

が釗 i くなり，ピークを逆に下げてしまう。 

3) 盛り上がりのあとも大切に 
終わったあとに爽快感を持たせるためと, 


リスト2 DICES ## 


100 RANDOMIZE 
110 CLS 

120 PRINT "nDm+p … n*m+p" 

130 INPUT ，，？ " ； DD$ 

140 D$=DD$ 

150 N=VAL D$ 

160 本 LOOP 

170 D$=RIGHT$ (D$,LEN D$-l) 

180 IF LEFT$ <D$, 1}<>” 本 ，1 THEN 本 LOOP 
190 D$=RIGHT$ (D$,LEN D$-l) 

200 D=VAL D$ 

210 P=EVAL D$-VAL D$ 

220 FOR J=1 TO N 
230 P=P+RND D 
240 NEXT J 

250 PRINT "." ；P 

260 GOTO130 


リスト 1 THACO . 2## 

260 IF PL>=3 THEN HD=HD+1 ： PL=0 

，，本 * THACO CALC ♦ 本，， 270 IF PL>0 THEN THACO=19 


と，シナリオ作成のとき 
に便利です。私は多くの 
場合シナリオを電車の中 
とか授業中 （！） とかに作 
っているのですが，いち 
いち マニュアルを持ち歩 
くのは面倒です。それに 
考えて みる とマニュアル 


120 INPUT "HD/CL+LV=" ； HD$ 

130 M=1 

140 IF LEFTS (HD$ ,1 い，， F” THEN M=2 
150 IF LEFT$ (HD$,1)="C" THEN M=3 
160 IF LEFT$ (HD$,1)="T" THEN M=4 
170 IF LEFT$ <HD$,1>="M” THEN M=5 
180 HD=VAL (RIGHT$ (HD$,LEN HD$-1)) 

190 ON M GOSUB ネ MON , 本 FIG , 本 CUE , 本 THI , 本 MAG 

200 PRINT ".THAC0=” ； THACO 

210 GOTO120 
220 *MON 

230 PL=EVAL (HD$)-VAL (HD$) 

240 HD=VAL (HD$) 

250 THACO=20 


280 IF HD>1 THEN THACO=21-INT (HD/2+0.5)*2 

290 RETURN 

300 *FIG 

310 THACO=21-HD 

320 RETURN 

330 *CLE 

340 THACO=22+INT 本 2 

350 RETURN 
360 本 THI 

370 THACO=21+INT (-HD/2) 

380 RETURN 
390 *MAG 

400 THACO=21+INT (-HD/3) 

410 RETURN 
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テーブルトーク RPG あれこれ 

ゲーム名 発売元 最低必要金額(円） 


次回に向けて興奮を持続させるため。 

盛り上がりを高めるためにはある程度の 
長さを。逆に長すぎるダンジョンは2つに 
分割して区切りを入れましよう。 

• It’s Encounter ! 

前の部分と関連しますが，ダンジョンに 
は敵がいるわけです。この敵もエンターテ 
イメントの法則にしたがいます。多すぎる 
敵はだれるもとですが，すぐ大ボスでは盛 
り上がりに欠けます。 

このあたりは経験がものをいいますが， 
慣れないうちは，固定したモンスターは2 
〜3ぐらいにして，ワンダリングモンスタ 
一をうまく使うといいようです。それから 
CRPG から入った人はモンスターを出し 
すぎる傾向があるので気をっけて。 

籲宝箱があります 

そしてダンジョンには宝があるわけです 
が，これは資丰主義の要です。しかしあま 
りに金を持ちすぎた奴は，利息で暮らそう 
としたり地上げをしてさらなる富を得よう 
とします。こうなると「誰があんな危険な 
ダンジョンに行くか！」ということになり 
かねません。宝物を出すのはほどほどに。 

マジックアイテムも同様で，あまり強い 
アイテムを出してしまうと，あとはひたす 
ら パワー ゲームへ と発散してしまうことが 
多いのです。それから，マニュアルに出て 
いるマジックアイテムには，製作者が思い 
もつかなかった使い方が見つかることがあ 
ります0特に他のアイテムと組み合わせた 
場合，無敵のアイテムとなってしまうもの 
がいくつか存在します。 ルールの 穴と呼ぶ 
べきものですが注意しましよう。 

_買にかかった！ 

同様に，罠も多すぎず少なすぎずが重要 
です。また，罠は買とわかってしまっては 


楽しいテーブルトークといえども根本的に向 
いていない人がいます。どういう人かというと… 

1 ) 根本的に想像力，ロマンがない人。つまり， 
ゴッコ遊びができない人。 

2) 友達と話せない人。自閉症か，あるいは単 
なる嫌な奴。 

3) 極端な平和主義者。モンスターを殺すのが 
嫌いな人。 

逆にテーブルトークに向いた人として，次の 
人たちがあげられます。 

I ) グループのイニシアチブを取るのが好きな 


Dungeons & Dragons 
新和 4,800円 x 2 

一番メジャー。ベーシックとエキスパートの 
2箱を買えばとりあえず遊べる 0 サプリメント 
(市販シナリオなど）多し。わかりやすい。 
Advanced Dungeons & Dragons 
TSR.inc 15,000円ぐらい（英語版） 

米英では一番メジャー。マスターハンドブッ 
ク，プレイヤーハンドブック，モンスターコン 
ぺディウム（モンスター集。現在たぶん4まで 
出ている）その他からなる。サプリメントもつ 
とも多し。ルールも D & D よりよくできている。 
Rune Quest 

ホビージャパン 5, 700 + 7, 000円 

世界設定は面白いが，なにしろ面倒くさい。 

ソードワールド RPG 
富 士見窨 房 680円 

元も子もないので，害のないカムフラージ 
ュをいくつかちりばめておきましょう。 

|サイの目の怨念 

と，今までテーブルトーク RPG のコンビ 
ュ ータサ ポートに ついて 考えてきたわけで 
すが，世の中にはコンピュータ化してはな 
らないことも存在します。 

それは，プレイヤーのサイコロは自分で振 
らせなければならないのです。ひとつはイン 
チキの防止ですが，ほカリこも理由があります。 

サイコロを振るということは， テーブル 
トークをしている過程で唯一肉体的な動作 
です。つまり，サイコロを振るという動作 
はすなわち「殴る」とか「避ける」とかい 
う実際の動作の代償行為なのです。 

特に，ファイターなどの肉体派キャラク 
夕は，サイコロを振る行動と攻撃とが直接 
対応し，サイの目を振る動作がキーとなっ 


人。 

2) みんなと ゲームを やるのが好きな人。 

3) 欲求不満の溜まっている人。なんでもいい 
から殴りたい人。 

4) ひま人, または徹夜に強い人。 

5) ファンタジー小説が好きな人 

6) 自己顕示欲の強い人 

7) 金持ち。 

8) 本を読む人，変な人。 

9) 英語の読める人。 

(6—9 は 特に マスターを やる人） 


安くていいが，サプリメントがない。 

Tunnels & Trolls 
社会思想社 680円 

安いがそれだけ。 

指輪物語 RPG 
ホビージャパン 4,800 円 

指輪の世界である。 

クトウルフの呼び声 
ホビージャパン 

設定が1920年代のオカルト RPG 。 戦閼もので 
はない。雰囲気を味わうための RPG 。 

トラべ ラー 

ホビージャパン 3,500 円 

SF もの0 

ほかにも数多くありますがとりあえずこんなと 
ころで。 

※それぞれのゲームはそれぞれ登録商標です。 

て，プレイヤーの心理に実際に剣で殴った 
のに近い緊迫感を与えるのです。 

AD & D や D&D のいいところは この プレ 
イヤーとキャラクタの動作の対応であり， 
ここ に複雑化しすぎたルーンク エス トや単 
純化しすぎた T & T の問題点があるのだと 
私は思います。 

ところで，サイコロを振るという動作そ 
れ自体，プレイヤーの心理的動作，すなわ 
ち意志なのですから，その結果もプレイヤ 
一の意志力に左右されます。当然 （？） サイ 
の目は乱数にはなりません。 

たとえば，私の知り合いである某後藤さ 
んなどは確率を遥かに上回って20を出しま 
くります。そう，念力は確かに存在します。 
実はテーブルトーク RPG は意志力の勝負 
なのです。 

ついでに言っておくと， サイコロ 振りに 
もテクニックがあります。「この角度でこ 
うすれば1が出ない」とか「この高さから 
この回転で投げれば6が出る」などという 
のは誰もがすることで，特に4面サイは惯 
れれば9割がた望みの目が出るようになり 
ます。これをインチキというか努力という 
かは人によってさまざまです。 

|その他の ツール 

リスト3 の 「 monster . c 」 は， パソコン 
(+ プリンタ）用戦_支援プログラムです 0 
C で書いてあるので MS - DOS 用ですが 
BASIC で書き直すことも簡単です。 C が 
シナリオ作成の支援 79 


テーブルトークに向いた人，向いていない人 



/* 

* monster 

本 

* exec.. monster hd n 

本 / 

tinclude <stdio.h> 
tinclude <math.h> 

#include <string.h> 
char buf[50 ]； 

main(argc,argv) 
int argc; 
char 本本 argv; 

{ 

int n,j ； 
int hp; 
int hd; 
int plus=0 ； 

if (argc==3) { 

strcpy<buf ，本 ++argv>; 

} 

else { 

fprintf(stderr,"HD =")； 
gets(buf); 

} 

printf (" 本本本本本 HD=%a 本本本本本 ¥n”,buf); 
plus=0 ； 

for (j=0 ； buf[j]!= ,¥0 ’； j++) { 

if (buf[j]==’ + ’ > { 

buf[j]= ， ¥0 ，； 
plus=atoi(buf+j+1); 
break ； 

} 

if (buf[j]=-•-* ) { 


buf U] = ， ¥0 ，； 
plus=-atoi(buf+j+1); 
break ； 

} 

} 

hd=atoi(buf )； 
if (argc==3) { 

n=atoi { 本 ++argv); 

} 

else { 

fprintf (stderr ，’ ’N 二’’）； 
gets(buf )； 
n=atoi(buf); 

} 

while (kbhit()) getch ()； 
fprintf(stderr,"Hit any key!¥n ")； 
for (j=0 ；； j++) { 

if (kbhit()) break; 

} 

getch ()； 
srand(j); 

while (n--) { 

hp=0; 

for (j=0; j<hd; j++) { 

hp+=rand()%8+l; 

} 

if ((hp+=plus)<1)hp=1; 
printf("%4d ",hp); 

} 

printf("¥n ")； 



ある人は，とりあえず 「 monster . c 」 とい 
うフアイル名で入力して，コンハ。イルして 
ください。実行は， 
monster hd n 

とします。 hd は，モンスターの HD で ， n 
は数です。そうすると，標準出力にそのモ 
ンスターの HP が n 個分計算されて出てき 
ますから，プリンタにリダイレクトすれば 
たくさんモンスターが出たときにいちいち 
HP を振らないでもよくなります。また， 
よく使うモンスターの HP は作り置きして 


ぉくと便利です。 

また，長;くなるの 
でリストは載せませ 
んが，名前生成プロ 
グラムというのもあ 
りまして，暗号関係 
の本に英語の2文字 
連関表（たとえば T 
の次に H のくる確率 
は何％で…という表） 
というものがあるの 
でこれと乱数を使え 
ばなんとなく英語っ 
ぼい単語をたくさん 
作ることができます。 
これもプリンタに落としてぉくと名前がた 
くさん必要なときに役に立ちます。 

|皆さんがんばってね 

というわけで，なんとなくこの コーナー 
は終わりですが，私としてはもっとテープ 
ルトークがメジヤーになってルールブック 
やサプリメントの値段が下がることと，女 
性 RPG 人口が増えることを（その点では 
Oh ! X に連載することはなにか間違ってい 

リスト 3 monster.c 


るような気がする）願ってやみません。ど 
こかのネットで AD & D ， D & D の SIG を開 
いてくれるといいんですけれどねえ。 
それでは皆さん，ごきげんよう。 

《 RPG 参考図書》 

指輪物語（全6巻）評論社文庫 
言わずと知れた指輪である。文章はかなリゲボ 
ポだけれど一般教養ということで。 

ゲド戦記（全3巻）岩波書店 

I 巻だけでいいような気もするけどまあ面白い。 
リフトウオーサーガ（魔術師の帝国，シルバー 
ソーン，セサノンの暗黒）早川文庫 FT 

まるで RPG のシナリオのよう。物語としてはま 
あまあ0 

ベルガリアード物語（全5巻）早川文庫 FT 
これも RPG を見ているような話。続編も出てな 
んとなく銀英伝化している。展開はたるいが結構 
面白い。 

ハロルドシェイ（全4巻）早川文庫 FT 

現代人がファンタジー世界に入るという，最近 
ありがちな小説のたぶん元祖である。 

霜のなかの顔早川文庫 FT 

魔法使いもののなかではかなりの出来。 

ドラゴンランス戦記富士見害房 
AD & D のシナリオを本にしたもので，続編，外 
伝などたくさん出ている。そんなに面白いわけで 
はないが，できればペーパーバックで読むと英語 
の練習になる。アメリカ人はテーブルトークで恥 
ずかしげもなくよくこんなセリフをはけるもんだ 
と思う。 

その他，ギリシャ•ローマ神話，北欧神話など 

要約版も出ているのでとりあえず読んでおいて 
損はない。 


789012345678901234567890123456789012 

333444444444455555555556666666666777 


123456789012345678901234567890123456 

111111111122222222223333333 


SO Oh ! X 1990.10. 
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電子音楽術入門 
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コンピュータミュージックといえば，いまや誰も 
が MIDI を思い浮かべることでしょう。バソコンの 
内蔵音源 （ FM 音源）に注目する人は少ないかもし 
れません。しかし，内蔵音源の性能は少々低く見 
積もられ過ぎではないでしょうか0 
実際， X 68000 に標準装備のミュージックドライバ 
が内蔵音源の性能を生かしきるものでないのも事 
実です0しかし，使い手によっては Y コマンドの 
多用という特殊な方法によって高度な表現を実現 
しています。また，その手法をプログラムで自動 
化する試みもあります0ここでは，よりよい音を 
作るための知識，自由な表現のためのテクニック 
を紹介していくことにしましょう。 

なにより，ユーザーがパソコンを通じて音に触れ， 
曲を楽しみ，作品を生み出し，そして音楽的素養 
を身につけていく……，そんなプロセスが考えら 
れるとしたら，それこそがパソコンの目指すべき 
音楽環境の姿ではないでしょうか。 
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PIXY と X 68000 と MML 

FM 音*のぁる部屋 

FM 音源はゲームの巳 GM のためだけにあるわけじやない。朝 

O gikubo KBi 荻疰圭 締以托加奴>财以托孔 Z ： 贴枝 

° "" も， FM 音源があれば，あなたは音楽とともに暮らしていける 

のだ。さあ，君もそんな自分だけの部屋を作ろ*3。 


いやあ，実は先日， PIXY を買ってしま 
いまして。あの， 「 PIXY の幅があれば生 
きていける」の PIXY でんがな。.しかも， 
いちばん高い PIXY 99 X 。 どうして 99 X か 
というと， DSP を搭載している！ての 
に惹かれてしまったのだ。しかも，外部入 
力が VIDE 01 〜3の3系統ついていて ， A 
V セレクタにもなるという0 VIDE 01 はビ 
デオで，2は X 68000 で，3はアナログプ 
レイヤーという構成0ほかの機種は AV セ 
レクタを買わないと端子が足りなかったの 
だ。しかも，映像 IN / OUT もある。 

X 68000 の FM 音源の音というのは， Y コ 
マンドとか使って器用なことをすればかな 
りのところまでいくが，イマイチ，音に厚 
みがない。そこで， DSP 付きの PIXY な 
らばいろいろ エフ ェク ト できるのではない 
か，と思ったわけだ。 

PIXY 99 X にはダイナミックサウンド， 

ハ。ラメトリックイコライザー，サラウンド 
の3種を DSP で行っている。最初のは， 
コンプレスを行って，小さい音を強める効 
果を出すもの。イコライザーはグラフィッ 
クイコライザ ー。 サラウンドはお馴染みサ 
ラウンドで，残響効果のレベルと残響時間 
を設定できる。せっかく DSP 積んだのだ 
から，もっといろんなことができてもいい 
と思うし，もっと細かい設定もしたいなあ。 
ついでに RS -232 C なんかがあって ， DSP 
の効果を X 68000から制御できたら面白い 
だろうになあ。でもそれ以上いうときっと 
定価がぼんと上がったりしそうだから，泣 
く泣く妥協というところだ。 

で，テープなんかに落とすときも DSP 
をかけてから落とせるので， X 68000 の音 
を派手にして録音なんてのも可能だ。 

DSP は知ってのとおり，デジタルシグ 
ナルプロセッサであり，デジタル信号のリ 
アルタイム処理に向いている強力なプロセ 
ッサだ。 CD のサンプリングレート約 44 k 
Hz くらいなら，安いチップで十分だろう。 

CD 以外のソースについては，きっと， 
A / D 変換して DSP を通して， D / A 変換し 


てアンプへ渡していると思う。 

それで，だな。どうして PIXY の話をし 
たかというと，こいつがまた X 68000 とぴっ 
たりあうのだよ。推奨オーデイオシステム 
といってもいいくらいた 

なぜなら， PIXY 99 X を全部積み重ねた 
ときの高さが， X 68000 と1咖程度しか違 
わないのだ。そんでもって， PIXY はちょっ 
とざらっとした黒なので， X 68000 のチタ 
ンブラックとよくマッチするのだ。私のは 
初代だからグレーと黒という取り合わせに 
なってしまっているが，ブラックの X 68000 
なら，もう最初から X 68000 の周辺機器と 
して作ったのかと思わせるほど。マンハッ 
タンシエイプと高さが一緖というのは驚い 
たな。 

さあ，ここまで褒めたからには SONY 
から何かもらいたいところだが（ハンデイ 
カム45がいいな），そんなに甘くないのが 
世の常である。 

そして私は昔作った Oh ! X のテーマなん 
かを DSP でサラウンドして聴いて感動し 
ていたりするのであった。バッハなんて派 
手にサラウンドすると教会の残響の雰囲気 
がちょっとだけ出て，気持ちいいぞ。 

でも，ビープ音がサラウンドするのはと 
っても気持ち悪い。 

；| MML 文化 

で，日本にはアメリカにはない独自のパ 
ソコン文化がいくつかある。ひとつはアニ 
メ絵文化であり，もうひとつが MML 文化 
だ0どちらもサブカルチャーって感じだ。 

MML っていうのは知らない人がいても 
おかしくないのでいっておくと，ミュージ 
ックマクロ ランゲージの略で，ランゲージ 
というからには言語なのである。ふつう， 
この MML ってので書いた演奏データを F 
M 音源ドライバに送ってやると， FM 音源 
が勝手に音を出す。 

この MML 文化の面白いところは ， OS 
自体は MML を FM 音源のドライバがその 


まま受け付けられるデータに翻訳して ， F 
M 音源に渡してやるだけっていうこと。あ 
とは， ユーザーは なにもしなくて いいので 
ある。だから，演奏が始まれば，あとは， 
ワープロしようがプログラ4作ろうが絵を 
描こうがなにしていても いいの だ。 FM 音 
源は勝手に，もらったデータを演奏し終え 
るまで鳴って いるので ある。 

確かに FM 音源はたった1個の FM 音源 
にすぎない。 MIDI で制御する最新の音源 
に比べれば音も貧弱だし，アンプまわりの 
回路もオーディオ機器に比べればよくもな 
い。でもだなあ，だからって FM 音源を馬 
鹿にしたりゲームの BGM 専用だと思うの 
だとしたら，それは 1600 万色でないから X 
68000 の CG は貧弱だとか， 1500 dpi 以下の 
印刷物なんて読む気がしないっていってい 
るのと一緒だ。パソコンが内蔵している程 
度のたった8チヤンネルの音源だって，観 
賞用としては CD や MIDI 楽器なんかには 
及ぶべくもないけど，積極的に楽しめばと 
ても面白いものなのた’。 PIXY のない人も， 
ここはひとつ FM 音源のある部屋を作って 
みようではないか。 

♦ FM 音源のある部屋1 

朝，机の下で寝ている猫だけが気づく小 
さな音でクインとデイスプレイの電源が入 
り，ハードディスクが回り始める。それに 
呼応するように黒一色のオーデイオシステ 
ムも立ち上がり，じっと入力を待つ。 

ハードデイスタからたっぷりとプログラ 

ムを吸い取った X68000 は息を始め， AUT 
OEXEC.BAT に仕込まれた小さなプログ 
ラムが今日の日付と時間をチェックして予 
定された目覚めの1曲を選ぶ。 

突如として大音量で鳴り響くバッハの卜 
短調フーガが 30 秒くらい部屋を満たしたの 
ち彼は目を覚まし，枕もとのリモコンで音 
量を適正ボリュームまで下げる。 

バッハを鳴らしながら CRT に広がる今 
日の時間割りを呆けた目で睨み， OPT.2+. 
で デイス プレイを 朝のニュースに変更す る。 
台風が来ている。今日は学校を休もう。今 
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月 2 回目の風邪だがいいや。熱が39度くら 
いあることにしよう。 

解説：バッハの曲は，特にオルガン用のカノン 
やフーガなんかは相手がオルガンであるからし 
て，弦楽器のように微妙な表現ができない。そ 
して，ある意味で数学的である。8チャンネル 
の FM 音源でも工夫すればかなりの音が表現で 
きる。 

朝， X68000 が立ち上がるのはタイマー機能 
のおかげである。毎日違う曲が鳴るのは，その 
日の日付（あるいは曜日）をチェックするプロ 
グラムを用意したからである。チェックした結 
果は エラーコー ドという形で数字となって返っ 
てくる。バッチプログラム内の“ IF ERROR LEV 
E じ文で返ってきた数字に応じたラベルへ飛 
ばす。そこには “copy BACH_Gm.OPM opm" って 
害いてあるだけだったりする。 

この毎日違う曲というのがミソで，毎回同じ 
曲が鳴っていたら，いくらなんでも飽きる。 

• FM 音源のある部屋2 

どたどた歩くと階下から苦情の出るフ 
ローリングの部屋の真ん中にリラクゼイ 
ションチェアがある。ボディソニック付き 
だ。それにゆったりと座る。視線の先には 
21インチのデイスプレイがあり， X 68000 
がつながっている 。X 68000の音声出力は20 
素子のイコライザとデジタルリバーブを通 
してリラクゼ'イションチェアにつながり， 
そこから伸びたケーブルには高価なヘッド 
ホンがある。 

指をキーボードに伸ばして FM 音源の曲 
を連続プレイでいくつかセットする0静か 
でかっ刺激的な環境音楽が鳴り始め，それ 
に同期をとったサイケデリックなパターン 
が21インチデイスプレイをうごめく。 

やがて，サイケデリックなパターンが彼 
を包み込み，異世界を垣間見たようなサイ 
バーなトリップに旅立つ。 

解説： FM 音源と同期をとってなにかを行う試 
みは， Oh!X 1989年6月号の KENBAN.BAS で行わ 
れている。その後も，チヤンネル別レベルメー 
ターなど，演奏中画面を飾る環境ソフトはいく 
つもある。 AMIGA にはマイクの拾った音にあわ 
せて画面に画像パターンを表示するというハー 
ド&ソフト（マインドライト 7) が発売されて 
いる。 X68000 でも FM 音源の演奏にあわせてサ 
イケデリックなパターンを表示させるソフトは 
作成可能である。 

サイケデリックという言葉には「ドラッグが, 
日常に垢で汚れ，暴った心を洗い流してくれる 
という発想がある」 （STUDIO VOICE9 月号より）。 
どんなパターンを描くかについては，いろいろ 
歴史的に研究された資料がある。たとえば，荘 
厳にはすみれ色，興奮には赤か赤紫。音程と色 
との対応。一部は「色を心で視る」という本に 
紹介されている。 

私は常々，こういった環境ソフトを待ち望ん 
でいるが，作ろうという人はなかなか現れない 
ようだ。リアルタイムで音符を出したりレベル 
メータしたり，っていう発想が出つくしたら， 
ぜひこういった遊びにも挑戦してもらいたいも 
のだ。 


• FM 音源のある部屋3 

彼はたくさんの FM 音源を演奏するプロ 
グラムや OPM フアイルを持っているが， 
彼のプログラムには特徴がある。チヤンネ 
ル1から6までしか使わなぃのだ。 

あとの2つはなにかとぃうと，アドリブ 
用である。チヤンネル7と8を使って，彼 
はアドリブでシンバルなり効果音なりを入 
れる。 

彼は夜中，退屈してくると X 68000 と才 
ーディ オユニット に火を入れ，その日の気 
分で音楽を鳴らす。 X 68000 の音を無機質 
にポルタメントもなにもかけないで硬ぃ音 
で鳴らすと気持ちぃぃとのたまうレトロテ 
タノ ボーイた^ただ聴ぃて ぃる だけだと退 
屈なので，アドリブでちゃちゃを入れる。 
ちょっとだけ，演奏に参加した気分になる。 
解説： X68000 では演奏データをトラックとい 
うバッファに入れ，そのデータをチヤンネルご 
とに演奏させることができる。使っていない 
チヤンネルはいつでも使用可能である。アドリ 
ブだって，できる。 

[BASIC サンプル] 

10 for 1=1 to 8 
20 m^allocd, 1000) 

30 next 

40 ro_trk い，••演奏データ 
50 mJrkU, ••演奏データ"） 

100 m_tempo <120 ):m_play( 192939415 f 6) 

110 atr S 
120 while -1 
130 I=INKEY$ 

140 if 1=" " then m_play(7) else m_play(8) 

150 endwhile 

そろそろネタが虚しくなってきたのでこ 
のシリーズはやめよう。 

■ まずは聴くことから始めよう 

なんだかんだぃって，自分で演奏データ 
を作るのはむずかしぃ。でも，みんな，な 
にがしかのデータを 持っ ているはずだ。 

X 68000において F 
M 音源を鳴らすには2 
つの方法がある。ひと 
つほ OS の管理下で OP 
M ファイルと呼ばれる 
ものを鳴らす方法であ 
り，もうひとつ力 ？ X - 
BASIC 上で MML を 
使ったプログラムで鳴 
らす方法である。 

OPM ファイルとい 

ぇば， SX-WINDOW 
を買った人ならサンプ 
ルがつ いてきたはず 
だ。拡張子が 「. OPM 」 

のファイルである。電 
脳倶楽部購読者なら毎 


月 OPM ファイルがついてくる。電脳俱楽 
部に 載っ ている 音楽 データはすべて OPM 
フアイルだ0 

OPM ファイル というのは OPM ドライパ、 
( FM 音源ドライバで， OPMDRV . X とい 
う名前）で扱える形式の演奏データをいう。 
その形式のデータを， 

copy フアイル名 opm 
と OPM にコピーしてやれば，演奏してく 
れるのた^このいろんなデ'ノ《イスをフアイ 
ルと同等に扱うというのは UNIX 以来の伝 
統を引き継いでぉり， X 68000 のぉいしい 
特徴のひとつだ。 PRN にコピーするとプ 
リンタに， AUX にコピーすると RS —232 C 
に， PCM にコピーすると ADPCM に ， C 
ON にコピーするとコン ソール （つまり出 

力なら CRT , 入力ならキーボードで，標 
準入出力という）に出力されるのもそうだ。 

続いて， BASIC の MML だが，これは0 
h!X LIVE やシステムデイスタについてく 
る演奏プログラムなんかがそれにあたる。 
BASIC が MML を解釈して， OPM にほら 
よ！と渡してやる方法だ。 

OPM ファイルに関しては次の記事で， 
X - BASIC の MML に関しては以降の記事 
を参照のこと。 

それでもって，ステレオで FM 音源を聴 
いてみれば，そこそこの音が出ることに気 
づくはずだ。 

まだの人は早く FM 音源のある部屋を作 
ろう。 
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システム上て BGM を 
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OPM ファイルで遊ぼう 


Nisnikawa Zenji 
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◦ PM フアイルは Human 68上のミュージックドライバ 
□ PMDRV . X がサポートする音楽データの棟準形式です。マ 
ニュアルなどには載っていませんが、本誌でもしばしば登場し 
ますので、これを機に扱い方を覚えておいてください。 


いやあ，この間，某駅前通りを歩いてい 
たときやられてしまいましたよ。突然，背 
後から「ちよっと時間をいただけますか」 
ときて，返事をする前に「この中から興味 
のあるものを選んでください」ときました。 
若い女1¢でした。「こ，この署い中，なんて 
ご苦労なヤツなんだ」と思いつつ選択肢を 
覗き込みむと，そ，そこには……， 

「結婚，恋愛，宗教，超能力，死後の世界， 
異性，戦争，天皇，……，科学」 

しばしの沈黙ののち私は「•••か，科学…」 

と答えると，彼女は「あ，皆さんそう答え 
るんですよね」と。「だってあんた，なにが 
悲しくて町の真ん中で見ず知らずのあんた 
と死後の世界を語り合わなきやならないん 
だよ」と思いつつもあとの質問に全部答え 
てしまう人のいい西川善司でした。 

■ OPMDRV メがあるじやないか 

皆さんは X 68000 でどのように音楽を楽 
しんでいるのでしようか。え？ ああ，な 
るほど，市販ソフトのミユージッタモード 
を使って聞いている，と。それは，なかな 
か「通」ですな。私もよく 「ちい，暑いと 
きにや，これにつきるぜえ」といってドラ 
ゴンスピリットを起動し，1面のテーマを 
流しっぱなしにすることがあります。でも， 
これはイチイチ，ゲームディスクを立ち上 
げなければならないし，曲を聴いている間 
は X 68000 が使えないというのがちよっと 
ね。なになに， BASIC を起動してそれから 
ミユージッタプログラムを RUN ? 確か 
にこれがいちばん一般的なのかもしれませ 
んが， SYSTEM コマンドで COMMAND.X 
や VS . X ， SX - WINDOW などの「システム」 
に帰還したときには曲が止まってしまいま 
す。 

多くの人は，仕事や作業を上記のような 
システム上で行っているはずですから，帰 
還したときに音楽が止まってしまうという 
のは少し残^:です。やっぱり音楽を聴きな 
がらワープロを使ったりプログラムを作り 


たいものですよね。 

では，本体同梱の FM 音源ドラィバ 「0 P 
MDRV . Xj はこういったシステム上で音楽 
を鳴らすようにはできていないのでしよう 
か？ いえいえ，使いやすさにこだわるシ 
ヤープがそんな陳腐なものを作るはずがあ 
りません。 

BASIC の外部関数に MUSIC . FNC とい 
うのがありますがこれは実は関数が受け取 
ったハ。ラメータをこの OPMDRV . X へ転送 
しているにすぎません。ですから システム 
上から OPMDRV . X へパラメータを送るこ 
とができれば シス テム上でも音楽を鳴らす 
ことはできるわけです。この送るべきパラ 
メータをフアイルにしてしまったのが通称 
「 OPM ファイル」です0 

OPM フアイルは通常の文書フアイルと 
構造上はまったく同じもので，アセンブラ 
や C のソースプログラム同様，エディタ 

( ED . X ) などで1行1行に OPMDRV . X の 
コマンドやパラメータを記述して作成しま 
す（行番号はいりません）。できた OPM ファ 
イルはシステム予約ファイル 「 OPM 」 へ 
COPY すれば OPMDRV . X へデータを渡し 
てくれます。いま TEST . OPM というフア 
イルがあったとすれば， 

COPY TEST.OPM OPM 
とすればいいことになります。しかし，必 
ず OPMDRV . X がデバイスドライバ、として 
登録されていなければなりません。でない 
と単に OPM というフアイルが作られるだ 
けで，なにも起きません。 

■気分はミュージックモード!！ 

さて， 「 OPM ファイル」は， 

A > COPY ファイル名 OPM 
で演奏で.きますが，どうも フアイルネーム 
を打ち込むあたりがスマートじゃありませ 
んね。少しましな方法があるにはあります。 
OPM フアイルのフアイルネームを「フアイ 
ルネーム . OPM 」 で統一し，エディタで， 
ECHO OFF 


COPY % 1.0 PM OPM > NUL 
というようなバッチファイルを 「 PLAY . 
BAT 」 といった名前で作るのです（バッチ 
ファイルを知らない人は本誌1月号の 0 S 
特集や Human 68 k マニュアルを読んでチ 
ョンマゲ）。 

これで， 

A > PLAY ファイル 4、ー ム 
(「. OPM 」 まで打ち込む必要はない〉で演 
奏ができるようになります。 

う一ん，だいぶキータイプ数は減ってい 
るものの，まだファイルネームを打ち込む 
あたりが面倒ですね。ここで待ってました 
とばかりに登場してくるのがビジュアルシ 
エル 「 VS . X 」 0 この VS . X の マウス オペレー 
ションによるメニュー機能を利用して市販 
ソフト顔負けのミュージッタモードを作っ 
てしまいましょう。 

用意するものはフアイルネームの拡張子 
を「• OPM 」 で統一した OPM ファイルと 
VS . X だけです。それでは，まず， VS . X を 
起動してください。 VS . X の画面右側中央下 
あたりに机の上に本やら三角定規が置いて 
あるアイコンがありますね。これを マウス 
カーソルで ポイントし，右ボタンを押しな 
がら 「 IconMaintenance 」 を選択してくだ 

さい。 

ここで音符など，なにか音楽に関係する 
絵を適当に描いたら，画面上の「アイコン 
名」というところをクリックして 
*.OPM 

と打ち込んでリータンしてください。拡張 
子が「. OPM 」 のファイルすべてがこのアイ 
コンの絵で表示されます。次に「実行ファ 
イル」のところをクリックして， 

/ COMMAND.X 

と入力（「/」を指定しないと実行終了後に 
「 vs . x:press mouse button or key 」 と出 
てきてしまいちょっとみっともない），さら 
に「パラメータ」をクリックして， 

COPY % OPM 

と打ち込んで， 「0 K 」 で 「Icon Mainte 
nance 」 を終•了します。これでひとたびこの 
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アイコンがクリックされると， 

COMMAND.X COPY % OPM 

が実行されるわけです。これは，子 プロセ 
スで COMMAND . X を起動し，その直後に 
「 COPY % OPM 」 を実行したのと同じ意 
味になります。「％」にはアイコンのフアイ 
ル名が代入されるので実質， 

COPY OPM ファイル名 OPM 
が実行されるわけです。 


これで「音楽ビジュアルシェル」の完成 
です。好きな曲を選択したら，ワープロで 
も起動して「本邦初！ BGM 付きワープ 
口 ！ j とかいって PC なんとかの一〇郎ュー 
ザーにでも自慢してください（「なんだそり 
や」と返り討ちにあうこと請け合い！？）。 

ところで， SX - WINDOW を持っている 
ューザーは このようなことをしなくても 
OPM ファイルを「アクセサリ」の「プレイ 


ヤー」アイコンへ持っていくだけで簡単に 
演奏ができてしまうんですよね。 

氺 氺 

メーカーから与えられたシステムデイス 
クのみで，これだけの音楽環境を整えるこ 
とができるパソコンってもしかしたら 
「 X 68000」 だけかもしれませんね。いや 
あ，日本に生まれてよかった， X 68000 ュー 
ザーでよかった。 


OPM ファイルの文法 

OPM ファイルを 作成するには 「OPM ファイ 
ルフオー マット」を知る必要がありますが， 
BASIC の「音楽用外部関数」を理解していれば 
なにも 難しい ことはありません。ここでは 
BASIC の音楽外部関数と対比させて OPM ファ 
イルフオー マットを説明して いく ことにしまし 
よう（音楽外部関数についての詳しいことは 
BASIC マニュアルを 参照して く ださい）。 


: m_alloc(TR,SZ) 

i (mTR,SZ) 

m_alloc は MML 用のトラックバッファを確 
保す'"る命令です。トラック番号 TR に SZ バイト 
確保しますが，これを OPM ファイル フォーマッ 
卜では上記のように括弧で閉じた中にと 
2つのパラメータを m_alloc 命令と同じ順番で 
記述します。 

例） 

m_alloc(4, 500 0) は， (m 4,500 0) 
となります。 

： m_assign(CH,TR) : 

: (aCH,TR) : 

m assign は m alloc で確保したトラックバッ 
ファを FM 音源のチヤンネル番号 CH (1-8) 

に割り当てます。ですから TR は m_alloc のパラ 
メータの TR と同じものです。 OPM ファイルで 
は上記のように括弧で閉じた中に2つのパラメ 
ータを m_assign と同じ順番で記述します。 

例） 

m assign (1,4) は， （al，4) 

となります。 


: m_vset(I,V) 

: (vl,0 , …… ） i 

m_vset は4 X10 の音色 パラメータ 配列変数 
Vを音色番号Iへセットする命令です。 OPM フ 
アイルフォーマッ トではまず 「(」 の後ろに音色 
セットの コマンド「 V 」 を書き，その後ろに夕* 
ミーのゼロを書きます。あとは配列Vの内容を, 
V(0,0)，V(0,1)，V(0,2)，...，V(0,10)， V 
(1,0>，".，V(1，10)，".，V(2,0)，..- 
と順番に55個の数値を「，」で区切りながら書 
き，锻後に 「> j でしめく くります。 

(BASIC で表すとしたら， 

FOR 1=0 TO 4 : FOR J = 0 TO10 : 
PRINT V(IJ) 

: NEXT:NEXT 
という感じかな）。 

具体的な例を図に示します。 


m mit() 


m_init は FM 音源や OPMDRV.X のイニシャ 
ライズを行うコマンドです o 0PM ファイルフォ 
ーマットでは「（ i )j の3文字を書くだけです。 

r --- - -I 

: m tempo(T) 

i (oT) 

m_tempo は読んで字のごとく，テンポを設定 
する コマン ドで す。 OPM ファイルフォ ー マット 
では，テンポの値 T をコマンド文字「〇」の後 
ろに書きこれを括弧でく くります。 

例） 

m_tempo(156) は，(〇156) 

に相当します。 

: m_trk(TR,MML) 

； (tTR)MML 

m_trk は実際に MML を OPMDRV.X にセッ 
卜する命令です o 0PM ファイルフォーマットで 
は，括弧でくくられた中にコマンド文字 「tj 
と トラック番号 TR を書き，閉じ括弧 「)j の後 
ろにずら 一っと MML データを書きます。もち 
ろん， MML データは通常 BASIC で使用してい 
るのとまったく同じものでかまいません。とこ 
ろで， OPM ファイルフォーマットでは MML 文 
字列の長さは255文字以内という制約がありま 
せんので，一度も改行せず，力まかせに書くこ 
とも可能です。 

例> 

m_trk(l，”cdefg”） は， (tl)cdefg 
と書きます。 

: m 一 play(CHl,CH2, … ， CH8) 

: m 一 stop(CHl ， CH2 ， ." ， CH8) 

； m_cont(CHl ， CH2 ， ".,CH8) 

： (pCHl,CH2 ， .",CH8) 

: (sCHl ， CH2, … ， CH8) 

i (cCHl ， CH2, … ， CH8) 


図 1 m_vset 

r B A S I (:. j で 


いずれも演奏を直接制御するコマンドですが 
とても似かよっているのでまとめて説明します。 
m_play, m_stop, m_cont はそれぞれ「演奏開 
始」「演奏中断 j 「演奏再開」のコマンドで，引 
数に FM 音源のチヤンネル番号をとることによ 
って指定されたチャンネルへの制御が可能です。 

たとえば， 

m_play(l,2) 

は FM 音源のチャンネル1と2のみの演奏を開 
始します。また，この引数を省略すると全チャ 
ンネル対象の制御となります。つまり， 
m_play() 

は， 

m_play(l，2,3,4,5,6,7,8) 

に相当し，全チャンネルの演奏を開始します。 

さて， OPM ファイルフオーマツ トの コマンド 
にもこれらに相当する命令があるのはもちろん 
ですが，引数も同様に省略したり設定したりす 
ることができます。 

m_play(l ,2) は， ( pi ,2) に， 
m _ play () は， （ p) 

に相当します。いまの例の 「Pj を r s」 に変 
えると m_stop に， 「Cj に変えると m_cont の機 
能をします。 

氺 

OPM ファイルフ オー マツトのコマンド説明 
はこれで終わりです。しかし「エディタでミュ 
ージッタプログラムを書くのはどうもね ぇ。 変 
数や for 〜 next といったループ制御文も使えな 
いし」といまいち OPM ファイルに魅力を感じな 
い人もいることでしよう。確かにミュージッタ 
プログラムの開発環境については BASIC のほ 
うに軍配が上がります。 

そこで，今回は BASIC 上で作ったミュージッ 
クプログラムを OPM ファイルに変換するプロ 
グラムを特集の最後に掲載しています。ぜひと 
も利用してください。 
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210 m.vset(70.v) 


「 O P M フ T イルでは 

(V70.0.5B. 15.d.».0.B.0.0.0.3.0.2B.8.5.7.2.30.3, ： 3.3.».B.2U.5.4.4> 1.3M. 3.4.3.0. 
0.28.4.2,0.3,30.3. 1,3.0,0,31. IB, 3. 5. 1 . 0,3, 1,3.0.0) 

こうする _ 


特集 OPM ファイルで遊ぼう 85 


































初心者から中級者に贈る 



音楽プログラムは ffiK ない 


Nishikawa Zenji 


圆 II 


善司 


「音楽プログラム J といろものが市民権を得て以来，数多くの 
プログラムが雑誌に掲載されている。が，それでも音楽データ 
の入力に抵抗を感じる人は多いようだ。ここでは MML プログ 
ラミングの初歩的な事項を確認してみよう。 


私が [ CTRL ] + [0 PT 1] + LDEL ] でリセ 
ット をかけるのが癖となりハード ディ スタ 
アクセス中にこれをやって重要な ファイル 
(実は OPMD . X のソースリスト）を失って 
しまったマヌーな西川善司です。ここでは， 
• いかに楽しく音楽プログラムを入力する 
か 

• いかに楽をして音楽プログラムを作るか 
• いかに掲載されるような音楽プログラム 
を作る力、 

などをお話ししようかと思います。「なに 
いってやんでい，この馬鹿は！」と感じる 
部分もあるかもしれませんが，そのときは 
ご容赦くださいネ（と先にわびを入れる腰 
の低い善司）。 

X 68000 の内蔵音源は FM 音源8声と AD 
PCM 1 声の9重和音です。 Oh ! X では，従 
来のデータとの互換性を保ちつつも FM 音 
源 i:AD PCM を同期する 「 OPMA 」 ドラ 
イバの発表以後，この2つの音源を駆使し 
た素晴らしい音楽プログラムが数多く発表さ 
れてきました。もういまでは市販ゲームソ 
フトの BGM もこの FM + AD PCM の同期 
演奏は常識（ソフトハウスには悪いけど） 
いい風潮になったもんです。 

と，そんなわけで，せっかくこれほど音 
楽機能の充実したバソコンを所有している 
んです，他人の音楽プログラムを入力する 
のも結構，自分で譜面を打ち込んでみるの 
も結構，とにかく自分の手で直接音源をい 
じってみませんか。 

■ 入力はっらぐょい 

葉書にこんなのがありました。 

「私はダンプリストは何 K バイトでも 
入力できるが，ミュージックデータを見る 
と鳥肌が立つ」山口県出留門手斗磨夫 

う一ん。私はあの「さ ススス っ」 という 
黒板消しが黒板と擦れる音を聞くと鳥肌が 
立ちますがミュージックデータを見て鳥肌 
が立つという人は初めてですな。出留門手 
さんは恐らく入力のコツをまだ知らないの 


かもしれませんね。 

ところで，機械語のダンプリストという 
のは入力の途中で実行することはまずでき 
ませんが，ミュージックプログラムはそれ 
が可能です。つまり，入力した時点までを 
聴くことができるのです。 

たとえば，いま主流と思われる，プログ 
ラムを 8つのブロックに分けて そのブロッ 
クブロックが各チヤンネルに対応している 
タイプがあります（今月の 「 ZMUSIC.F 
NC 」 のサンプルプログラムなどがそうで 
す0以下の文章はそのようなリストを見な 
がら読むとわかりやすいと思います）。こ 
ういったタイプは頭からただ順番に打ち込 
むのではなく，プログラム先頭の音色設定 
部分や文字変数宣言の箇所まで打ち込んだ 
ら8つに分かれた各ブロックを並行して入 
力するようにするのです。 

音色設定部や変数宣言部を入力後，たと 
えば各ブロックの 「 a =」 という文字列と 
それをトラッ タノぐ ッ ファに セットしている 
命令（つまり 「m 一 trk (?, a )」 ですね）を 
入力します。それから 「RUNj するとエラ 
一がなければ 「0 K 」 と表示されますので， 
m_play () 

を実行してください。入力し終えたところ 
まで曲を聴くことができます。 

こうして同様に文字列を入力していくた 
びに試聴していけば， 入カミスを発見しや 
すくなるし， そのまた次の文字列を入力し 
た〈なってきます。ちなみに音楽プログラ 
ムを作る側も多くの場合こうした，ちよっ 
と打ち込んでは試聴……という方法をとっ 
ていますよ。 

ところで6月号付録ディスクに収録され 
ている MUSICDRV のような高機能 MML 
は別にして，普通 MML では「1トラック 
では1声しかシーケンスできない」という 
鉄則があります。したがって主に和音で構 
成されるコードやバッキングと いっナこパ ー 
卜は複数のトラックに分散されてプログラ 
ムされています。しかし，互いのトラック 
が非常に似通った文字列になっていること 


が多いのでこうしたトラックは入力した文 
字列を 「 LIST 」 コマンドなどで再び画面に 
出しこれをエディットすると非常に楽です。 

たとえば図1のような譜面があったとし 
ます0この和音のルート 「 C 」 が MML に 
なっていたとすると， 

L 16 C 8. CC 4 C 8. CC 4 

ですが，次の 「 E 」 を入力するときは上の 
文字列の 「 C 」 の上に カーソルを 合わせて 
「 E 」 を入れていけばよいのです（音長の 
MML はいじらない）。万が一，音長部分 
の入カミスをしてしまった場合はあとで試 
聴したときに和音まるごとテンポがおかし 
〈なってくるはずなのですぐわかります。 

| 見やすいミュージックプログラム 

BASIC マニュアルの 「m _ trk 」 の項を 
読んで基本的な MML を覚えたら，多くの 
人が楽譜を基にミュージッタプログラムを 
作ると思います。譜面を基に作る場合，い 
くつか注意したいことがあるのでここでは 
それについてお話しします。 

MML は一般的なスコア入カソフトと違 
ってとっつきにくいものです力 5 '，ひとたび 
これに慣れてしまうとほかのミュージッタ 
ソフトとは比べものにならないほど高速に 
1曲を作り上げることができます。 

しかし，どうも演奏がおかしいと感じて 
いざプログラムを修正しようと思ったとき 
には，譜面のどの部分がプログラムリスト 
のどこに対応しているのかわからなくなっ 
てしまうことが多いのです。そんなわけで， 
なるべく美しい，見やすいミュージックプ 
ログラムを作ることを心がけなければなら 
ないわけですが， 

a ) 1小節入力したらスペースを開ける 
図1 
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char st=1,ed=l ,g 
int i , j,k,ln=100,fn 
dim char v(4,10) 
str s[256] 
input "from";st 
input "to ";ed 
input "line number";In 
input "make file ? (y/n)：",s 
if a="y" or s="Y" then mkf1():g=1 else g=0 
for k=st to ed 
m_vget(k,v) 

a=right$(" "+atr$(In),5) 

prt(s+" /* AF OM WF SY SP PMD AMD PMS AMS PAN") 

ln=ln+10 

s = right$(" "+str$(ln) ,5)+" v= {•• 

for i=0 to10 

s=s+right$(" M +str$(v(0,i)) ,3)+", " 

next 
prt(s) 
ln=ln+10 

s=right$(" "+str$(In),5) 

prt(s + " / 本 AR DR SR RR SL OL KS ML DTI DT2 AME") 

ln=ln+10 

for j=l to 4 

s = right$ ( " "+3tr$ (In) , 5 ) +" •’ 

for i=0 to10 

s=s+right$(" "+str$(v(j,i)) ,3)+" ," 

next 

if j = 4 then prt (left$ < s ， len ( s )-2 >+••}" ) else prt ( s ) 
ln=ln+10 
next 

prt(right$( " "+atr$ (In) , 5 )+ " m_vaet ( ,, +str$ (k)+ " , v)") 

ln=ln+10 
next 

if g then fwrites(chr$(&H1A),fn) ： fcloseall() 
end 

func str prt(s;str) 

print s : if g then fwrites(s+chr$(13)+chr$(10),fn) 
endfunc 
func mkf1() 

input "file name : ,s 
fn=fopen(a,"c") 
endfunc 


U スト 2 

リスト 1 実行例 


こだわらないで選び出すことも大切です。 
希望している音色がまったく関係のなさそ 
うな楽器名で登録されているかもしれませ 
んょ。 

さて，エディットするには FM 音源につ 
いての知識をある程度持っていなくてはな 
りません。 

X 68000 の FM 音源は 4オペレータ • 8 
アルゴリズムと呼ばれるタイプです。 4 才 
ペレータと は音を構成する要素が 4 つあり， 
このオペレータの つなぎあわせ方「アルゴ 
リズム」が8通りあるという意味です（図 
2)〇また，オペレータにはモジュレータ 
と キャリアの 2 種類があり図 2 では網掛け 
になっているのがキャリア，そうでないも 
のが モジ ュレ ー タです。 

キャリアというのは図2を見るとわかり 
ますがどのアルゴリズムの場合でもいちば 
ん下にきているものですね。難しいことは 


専門書に譲るとして，初心者は，キャリア 
とは「音量変化を決めるものである」，モ 
ジュレータは「音質変化を決めるものであ 
る」と覚えましょう（本当はちょっと違う 
けど）。 

ところで，すでにある程度似た音を選ん 
できている場合はこの音質変化というのは 
あまり重要ではありません。では目的とし 
ている音色に作り変えるにはどこをエディ 
ットしたらよいのでしようか。それは，卜 
ータルレべル （ TL または 0 L と略される0 
以下括弧の中は略号とする）」と 「マルチ 
プル （ ML )」 に注目すればよいのです〇こ 
の2つの パラメータの 意味については，ま 
たまた専門書に譲りますが音質そのものを 
決める パラメータ だと思ってください。こ 
れらをいろいろいじってみて目的の音色に 
いちばん近い状態にします。 イメージ 的な 
アドバイスを書いておくと， 


リスト 1 音色のファイル化 


b) コメントを入れる 

c) ひとつの文字変数に何小節もつつ込ま 
ない 

d) 「 L 」 は大文字で書く 

の4点に気をつければそこそこのものが書 
けるはずです。 

a ) は演奏が各トラックバラバラになっ 
てしまうといったバグを発見するときに便 
利です。こうしたバグの原因はほとんど 
の場合，音長関係の入カミスですので MM 
L と譜面に間違いがないかどうかいちいち 
見ていくしかな•いように思われますが， 
a ) のように1小節ごとに区切っておけば， 
譜面のほうを見る必要はありません。とい 
うのは打ち込んだ MML がちゃんと譜面の 
拍子にあっているかどうかをチェックして 
いけばいいからです。 

たとえば4分の4拍子の場合だと，音長 
関係の入カミスをしてしまった場合は必ず 
どこかに（その小節内に存在する音符の） 

音長をすべて足したときの和が4分音符4 
つ分になっていない小節があるはずです 
(譜面が間違っている場合もありますから 
注意しましよう）。私の経験上，「付号」音 
符が多い小節でこうしたミスヵ ? 起こりやす 
いようです。 

b ) はプログラムを組んでしばらく時間 
をおいて見直したときにわかりやすくする 
ものです。たとえば「この文字列に代入さ 
れている MML はいったい譜面のどの部分 
なんだ？ j と思ったときに「繰り返し2回 
目」 とか 「ピアノソロ」 など譜面情報や楽 
器情報を書いておけば容易に譜面との対応 
が把握できます。 

c ) , d ) は純粋にプリントアウトしたとき 
や， 「 LIST 」 で画面に出力したときに見 
苦しくしないようにしたり，誤読を防ぐた 
めのものです。 

卜 j 超初心者向けの音色作成法 

ゲームミユージッタやポップス，フユー 
ジョンにしろ，作っている曲をなるべく原 
曲に似せようとした場合，まず問題となる 
のが音色です。音色をまった〈ゼロの状態 
から作り始めるのはとても難しいことなの 
で内蔵音色などから似た音を持ってきてそ 
れをェディットして目的の音色へ作り変え 
るのが一般的です（リスト1に内蔵音色を 
配列変数にコンバートするプログラムを載 
せておきます）。 

まず似た音色の選び方ですが音量変化が 
似ている音よりも音質が似ているものを選 
んだほうがよいでしよう。また，音色名に 
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•きらきらした明るい方向に持っていきた 
い場合は卜ー タルレべルを 0に近づけてい 
く。マルチプルの値を大きくしてみる。暗 
くしたい場合はその逆 
•もっと，こもった感じの丸い音にしたい 
場合はトータルレベルの値を大きくしてみ 
る 

といった感じでしようか。 

ただしキャリアの トータルレベルは 音量 
を決定するものなのでいじっても音色は変 
化しません。逆に マルチプルは キャリアだ 
ろうが モジ ュレータだろうが変更すれば音 
色が変化します。また，比率をそのままに 
して，この マルチプルをエディッ トすれば 
オクターブを調整できます。 

あと，音色 データフォーマットの頭に A 
F というのがありますがこれは， 

フィードバック X 8 + アルゴリズム 
の値を書きます。このフイードバックも実 
は音質を構成するうえで重要な要素です。こ 
の値を大きくするとノイズのような「ジャ 
ン」といった感じになりますが，この効果 
が顕著に出てくるのはアルゴリズム4以上 
です。 

音色がなんとなく似てきたら次にキャリ 
アを エディ ットします。図3に エンべ ロー 
プを構成するパラメータのイメージ的な関 
係を示しますが，この図を參考に目的とす 
る音色の音量変化を頭に描き，これを大雑 
把でいいですから数値で打ち込んでみまし 
よう。希望するものと違ったなら数値を微 
調整していきます。また，先ほどもいった 
とおりキャリアのトータルレベルは音量に 
相当しますので，たいていの場合は〇 ( 最 
大）でいいはずです。 

ここまでで，かなり似た音色ができてい 
るはずです。さて，これから細かな音色調 
整，つまり先ほど「重要ではない」といい 
きった音質変化のエディットをしていきま 
すが，とかく人間は数値を暗記するのが苦 
手です。万が一，エディットしていくうち 
に目的としている音色から掛け離れてしま 
ったときに音色選びからやり直すのは馬鹿 
らしいので，ディスクにこの時点の音色を 
セーブしておきましよう。詳しくやると誌 
面がいくらあっても足りないのでここでも 
イメージ的なアドバイスをするにとどめま 
す。 

_音の硬さを変えたい 

キャリア，モジユレータの区別なしに 
「アタックレイト （ AR )」 や「デイケイレ 
イト （ DR または 1 DR ) j をエディットし 
ましよう。また，鳴らすオクターブによっ 
ては「キースケーリング （ KS または RS )」 


を エディット することによっても音の硬さ 
を変えられます。 

•音の余韻を変えたい 

これもキヤリア，モジュレータの区別な 
しに「リリースレイト （ RR )」 を エディッ 
卜しましよう。 

と，こんな感じですが，上に挙げたのは一 
般的な場合にすぎません。 

キヤリアが複数あるアルゴリズムで各才 
ペレータ に役目を持たせてある音色につい 
ては上のアドバイスどおりにエディットし 
ても目的の音色にならない場合があります。 
たとえば，アルゴリズム4で作られたピア 
ノの音色のなかには オペレータ 1， 2で弦 
を叩いたときのノイズ， オペレータ 3, 4 

で実際の音階を鳴らしているものがあり， 
いくら•ノィズ発生部分の音質変化を修正し 
ても音階となって耳で聞こえてくる音は変 
わりません。 

さて，音色を似せる方法はこのへんで終 
わりにしますが，エディットしている途中 
で目的の音色とは違ったものができても， 
「これはいい音色だな！」と思ったらすぐ 
さまセーブしましよう。後々その音が必要 
になってくるかもしれませんよ。 

図2アルゴリズム 


読んで損はない MML テクニック 

ここで話すことはむしろテクニックとい 
うよりは， FM 音源でミュージックプログ 
ラムを作る際の注意事項のようなものです0 

音色切り替えのお話 

さて，長い曲やチヤンネル数が足りない 
ときは音色切り替えが頻繁に行われるもの 
です。この音色切り替えの際注意したいの 
が 切り替え直後に休符を置かない ほうがよ 
いという点です。切り替えた音色によって 
は次に続く休符のときに「ぶ一ん」などと 
音が鳴ってしまうことがあるからです。解 
決策としては音色切り替え直後に休符でな 
く音階を置く以外にありません（要するに 
休符のあとに音色切り替えをする）。 
たとえば， 

@1 R 4 CDE 

とせずに， 

R 4@1 CDE 

としたほうがよいということです。 

また，音階を直後に置いた場合でも音色 
切り替えの終了した瞬間に「プチ」という 
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ノイズが出る場合があります。こうなって 
しまった場合はそのチャンネルのリリース 
レイト全部とディケイレイト全部に15を書 
き込みましよう。チャンネル1の場合だっ 
たら音色切り替えの直前に， 

Y 224,255 Y 240,255 Y 232,255 Y 248,255 
を書いておけば大丈夫のはずです。 

レジスタナンノ心-や値の意味は今月号102ぺ 
ージに掲載されている FM 音源レジスタマ 
ツプを参照して理解してく AT さい。ちなみ 
にレジスタナンバーの224,240,232,248は 
16進数で E 0 h , F 0 h , E 8 h , F 8 h ， 書き込んでい 
る値の255は16進数で FF H です。 

「ぶ一ん」にしろ「ブチ」にしろ音色を 
切り替えを行う前の音色のリリースレイト 
が極端に長いことが原因のひとつです。特 
に「プチ」のケースの対応策はかなり面倒 
臭いので音色のほうをエディツトするのが 
賢明かもしれません。 

また，新たに音源ドライバを作ろうとし 
ている人はこの「プチ」ノイズ防止のため 
に音色切り替えの直前に必ずそのチャンネ 
ルの 「1 DL / RR 」 レジスタ全部に FF H を書 
き込むようにプログラムしましよう。 

テンポが遅れ気味の場合 

「 OPMDRV . X 」 はかなり高速の割り込 
み周期で割り込みを行っているためテンポ 
を早くしすぎたり，微小音長 （@ L 1 など） 
を多用するとテンポが遅くなることがしば 
しばあります（その点 サン•ミュージカル • 
サービスの MUSICDRV . X は立派)。 これ 
はいく つかの トラツクの MML の頭に， 
@ L 1 R (@ L 1 でなくても奇数ならな 

んでもよい） 

のようなダミーの休符（別に休符でなくて 
もいいが）を書いてやることである程度免 
れます。 

理由は音源ドライバの作りをよく理解し 
た人にでないと説明しにくいのでここで詳 
しいことは避けますが，まあ「割り込み周 
期を分散させ軽くする」ためとでも思って 
ください。この 「@ L 1 R 」 を書き込む卜 
ラックの選び方ですが，エコ ーノヽ°ー トなどに 


入れるといいでしよう。エコーパートなど 
は元々遅れて発音するパートですからね。 

ひとつ注意しなくてはならないのはゲー 
ムミュージッタのようなループする曲の場 
合，この 「@ L 1 R 」 は必ずループ演奏の 
開始指定: d マンド 「[ DO ]」 などの前に 
置くということ。でないと演奏がループす 
るたびにずれていってしまいますよ。 

|八ード LF ◦のお話 

LFO ディレイが設定できないとか，各チ 
ヤンネルバラバラで LFO スピードを設定 
できない，波形も各チヤンネルバラバラに 
設定できない，など，やたらに嫌われてい 
るハード LFO ですがそんなに使えなくも 
ありません。たとえば波形については普通 
の楽器のビブラート（ピッチモジュレーシ 
ヨン）ならば三角波で十分ですし，スピー 
ドについては標準的な値に設定しておけば 
まず問題はないでしよう0ディレイです力 5 '， 
多少 MML が見にく くなるもののこれから 
話すテクニックを使えばなんとかなります。 

まず 曲中で使用するすべての音色につい 
て以下の処理を施してください （ X 68000 
の FM 音源では LFO のパラメータを音色ご 
とはおろか，チヤンネルごとにさえ設定で 
きないため）。ここでは音色データが配列 
変数 V に格納されているものとして話を進 
めます。 

a ) V (0,2) の SYC (シンクスイッチ）を 
0にする 

b ) V (0,4) の SPD ( LFO スピード）は180 
〜*220の値にする 

c ) V (0,5) の PMD (ピッチモジュレー シ 
ヨンデブス）は20〜50の値にする 

d ) V (0,7) の PMS (ピッチモジュレーシ 
ヨンセンシティビティ）を1以下にする 

e ) V (0,6) の AMD (アンプリチュードモ 
ジュレーシヨンデブス）， V (0,8) の AMS 
(アンプリチュードモジュレーシヨンセン 
シティビティ）を適当な値（普通は0にし 
たほうがいい）にする 

この処理が終わったらそれぞれの音色設 
リスレィ 


定を行っている 「 m _ vset (?, V ) j 命令の 
後ろに， 

: V (0, 7)= 3以上7以下の適当な値を 
付け加えます。これは音色パラメータの P 
MS を書き換えています。この書き換わっ 
た音色パラメータ配列変数を 「 m __ vsetj 
命令で適当な音色番号にセットしてくださ 
い。これでやっと準備完了です。 

パラメータを 書き換える前にセットした 
音色をたとえば，いまここでは音色番号1 
とし，書き換え後のものを71とします。 
@1 C 8&@71 C 8 

と演奏してみましよう。どうです。音長の 
半分あたりから音が揺れ始めたと思います。 
つまり，@1で演奏した部分が LFO ディレ 
イに相当するわけです。文章だけではわか 
りにくいと思うのでリスト3に実行例を示 
しておきます。 

しかし，この方法は先ほどもいったとお 
り非常に見にくい MML となること，また 
頻繁に音色切り替えを行わなくてはならな 
いことが欠点といえば欠点です。 

最後のわるあがき 

本文で書き忘れたことや，行数をさいて 
まで説明することもない簡単なテクニック, 
注意事項をいくつか示して終わりにします。 
• V 15=@ V 125 であるから最大音量は @V 
127である。 

籲バッキングなどの和音用の音色はアルゴ 
リズム4以上で作成すると音が厚く聴こえ 
る。 

•和音を構成する1音1音，無理して違う 
パン ポットに振り分ける必要はない（たと 
えば 「 CEG 」 の和音を鳴らす場合 「 C 」 を 
左， 「 E 」 を中央， 「 G 」 を右で鳴らしたり 
すると綺麗に聞こえないことがある）。 
• Oh!X のミュージッタプログラムコーナ 
一の選曲担当は私ではないので ゲームミュ 
ージック がいいとは限らない。 

以上です。ご精読ありがとうございました。 
では皆さん，ミュージックプログラミング 
を楽しんでください。 
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FM 音源用 MML 記述テクニック 

丫こそすベて 


«特集 


/ 電 /子/音/楽/術/入声々一 


ポルタメント，モジュレーション，そしてサンプリング音源制 
Orimo Naoki 織毛直樹 御……。あらゆる操作を可能にするという「丫」コマンドとはな 

にか 7 FM 音源を知り尽くした者だけに許される「丫」の秘密 
と超絶技巧の世界へ案内しよ5。 


■ X 68000 は楽器なのである 

どうも，はじめま.して。今回が初登場と 
なります織毛です。これからもど一かよろ 
しく。 

さて， X 68000 も発売されてからすでに3 
年が過ぎ，ミュージック機能を扱う環境も 
だいぶ整ってきました。当初はふつうのユ 
ーザーには使用不可能だと思われていたサ 
ンプリング音源も， OPMA によって利用可 
能となり，さらに OPMD によって簡単に 
MIDI さえも扱えるようになりました。 

これは，よ一するに“豪華”な音が出せ 
るようになったということで，ば一んば一 
んざいもの。しかし忘れるべからずは初心 
なり。基本は内蔵の FM 音源だということ 
は肝に銘じておかなければなりません。な 
ぜなら，サンプリング音源はいくら生の音 
が出るとはいっても FM 音源の引き立て役 
にすぎないし， MIDI 音源のみによる演奏を 
するならば，わざわざ楽譜を MML で打ち 
込む意味がないからです。つまり，全部の 
音源のバランスが取れてこそ， X 68000 とい 
う1台のマ•シンですべてを制御する意味が 
出てくるワケで，耳先 （ ？ ） ばかりにとら 
われてはいけません。 

FM 音源が使いこなせて初めて“サンプ 
リング”や “MIDI” が生きてくるのですか 
ら，それら力す互いに調和していなければ， 
単なる「あ 一とね一 ちゃ 一した 井手ら っき 
ょ」にすぎないのです。 

んがが，確かに FM 音源の出せる音には 
限界があります。道行く人にはピコピコ音 
の延長だといわれてしまうかもしれません。 
どう逆立ちしようとも8つしか音が出ませ 
んからね。でも，そんなところが逆に可愛 
いのであって，ちょっと打ち込んでみると 
いうだけなら手軽な楽器としてのポテンシ 
ャルは十分に持っているのです（その実力 
はといえば，そんじょそこらの CASIO トー 
ン顔負けなのだ)。 

それにコンピュータの FM 音源はほかの 
90 Oh!X 1990.10. 


キーボード類とは違って，ユーザーと音源 
チップとのあいだが密着しているから，「思 
いどおりに操れる」という利点があります 

(実はこれが非常に大事なことなのだ)。む 
ろん，それにはさまざまなノウハウが必要 
ですが，これはなかなかどうして「むふふ」 
な関係なんですよね。 

てなわけで，今回の音楽特集。 

非常に高価な楽器となってしまったあな 
たの X 68000 の前でへッドホンして，にたに 
たしながら，恐怖の Y コマンドを並べよう 
じゃあ一りませんか。 

■音楽のススメ 

あさてさて，実際に X 68000 ちゃんで音楽 
するワケです力 5 ',なにから始めるのがいい 
のでしよう力、。まず，てっとりばやいのが 
Oh!X LIVE コーナーに 載っかっているプ 
ログラムをぽこぽこ入力すること。これだ 
とプログラミングに悩むこともなく，根気 
さえあれば素晴らしい曲を愛機が奏でてく 
れます•(公理一)。 

一度も入力したことのない人はぜひ入力 
してみてください。最初はなんでも構いま 
せんから。以前 Oh!X LIVE コーナーに 載っ 
た「代々木ゼミナール校歌」「この木なんの 
木」といったものが手頃なところですね。 
短いので10分もあれば十分でしよう。 

絶対に笑えますよ。 

でもって「そうか，ペケロタで音楽する 
のは面白いかもしれないな」と思ったのな 
らしめたもの。今度はちよっと手の込んだ 
OPMA , もしくは〇 PMD ( MIDI なし版）用 
のわりと長めのものに挑戦してみてくださ 
い。いわゆるサンプリングばしばし「進 
藤」，「立川」プログラムというヤツですね0 
たかがハ。 ソコ ンの音楽とはいっても，「う一 
む，なかなかどうして」ものの，生音楽に 
引けをとらない曲が聞けるはずです。 

この際， OPMD といった音源ドライバや 
サンプリング データの ように，なかなか手 
にすることが難しいものでも，6月号のお 


まけディスタにたあ一んと入っております 
ので，ここぞとばかりに利用しましよう。 

ここまでの段階だったら本体とディスプレ 
イとヘッドホンの基本システム（公理二） 

た^けでこと足りますしね。ま，なによりも 
重要なのは実際に自分の手で入力したもの 
を自分の耳で聞いてみるということです^ 

んで，「そ一か，うちのペケロタはこんな 
にいい音がするのか」と，今度は自分でプ 
ログラムを作ってみようということになる 
ワケですが，とっころがぎっちょんちょん。 
マニュアルの 親切さと FM 音源の簡潔さと 
があいまって（そう，皮肉よ），ここでほっ 
ぽりだしてしまう人が多いのが実態のよう 
です。 

西川の善さんが初心者向けの講座をゃっ 
てくれているので，私は「だいたいの MM 
L はわかるんだけど，いま三歩いいものが 
できないんだよなあ j という，まだ初心者 
に片足を突っ込んでいる（おそらく大多数 
の）人のために“これさえ知っていればあ 
なたも明日からミュージックプログラマ 
一’’という，とっておきのテクニックをご 
紹介することにします。 

最近の Oh!X LIVE の凝った作品にはす 
でに使われているものばかりですが「嵐の 
ような Y コマンド」にうんざりして，解析 
するのをあきらめた人がほとんどではない 
かと思います。んでも，機械的に MML を打 
ち込むのと，そのコマンドの意図を知ったう 
えで打ち込むのとではスピード的に雲泥の 
差があるわけで，知っていて損はしないハ 
ズ。うさんくさい世界ではありますが， FM 
音源の凄さを見直す機会になってくれれば 
と思います。 

では，まいりましょ。 

■ まずは「ディチューン」 

パソコンの 曲を聞いて誰でも思うのが， 

「生の音にはかなわない」ということです。 
でも， FM 音源がたった55個の数値で音の 
複雑な波形を決定しているのを考えれば， 


•謎の裏チヤンネル 

X 68000 にはパンポツト機能といって，音を真ん中と左右合わせて3方向に振る機能がついています。よ一する 
にステレオ出力なワケです（公式七〉。でも，完全的に音 b 別れてしまうので，うまく使わないと非常に聴きづら 
い，不自然な曲になってしまいます。 







その出せる音のバリエーションは驚異的と 
もいえます。しかし，デジタル音源だから 
しかたないとはいえ，どうしても音のつぶ 
つぶは粗くなる。ウスくなる。 

そこで，「ウスいのならアツくしてしま 
え」という単純な発想からきたのが“デイ 


に MML をセットしていますので確認して 
みてください。 

あとは，細かくなるので具体例は示しま 
せんが，「エコーパートの音色をメインより 
も柔らかい音色にする」（反射音は反射する 
物体によってその波形が変わってくる。直 


接音と反射音が同一波形になるのは理想反 
射体の場合のみ），「エコーパートを1音ご 
とに左右に振る」（限られた音場空間を最大 
限に活用する必要性より。別項にて詳説)， 
「メリハリのあるエコーパートの 使用」 （常 
に特定のパートにかけるのではなく，その 


チューン”テクニック。 

小学生の合唱コンクールがあると下手な 
者同士集められるのと一緒で，貧弱な音源 
でも同時発声をすれば豪華に聞こえるとい 
うものです。貴重なチャンネルを余計に使 
ってしまうのがこの技の欠点ですが，得ら 
れる効果はそれを補ってもあり余るほどで， 
けっこう頻繁に用いられます。 

この際，同時に鳴らすチャンネル同士の 
出力周波数をわずかにずらしておくのがミ 
ソ。そのずれが心地よいうねりとなって聞 
こえてくることでしよう（定理春）。 

まず基本リストを実行したうえでリスト 
1を実行してみてください。リスト0と比 
ベると違いは歴然でしょう。 

なるへそ，と腕組みしたなら，次の技。 

■カラオケ技「エコー J 


■ J スト〇 
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120 

m_vset( 7 1 , v) 










130 

m_init():for 

i=l 

to 8 : 

m_alloc( i , 

1000 ):next 





140 for i= 1 to 8: m_assign(i , i) ： next 

150 str a[256],b[256],c[256],d[256],e[256],f [256] 

160 /* 

170 ハ 

180 a="tl20 o5 132 @71 p3 q8 vl4 y 48,00 yl5,0 

190 b="frgrarbrrrarrrgr rrdrrrcrrrrrfl&f4 
200 ra_trk(1 ， a) 

210 m=trk(1,b> 

230 /本 

240 m_play() 


リスト 1 


10 /* 

20 /* < V スト 1> 

30 /本 


テ • イチューンヲカケタモノ 
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dim 

char 

v( 4 , 
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120 

m vset(71,v) 










130 

m_init() 

: for 

i=l 

to 8:m alloct 1 , 

1000) 

: next 




140 

for 

i =l 

to 8 : 

: m_assign(i,i)：next 







150 str a[256],b[256],c[256],d[256],e[256],f [256] 

160 /本 

170 ハ 

180 a="tl20 〇 5 132 @71 p3 q8 

190 b="frgrarbrrrarrrgr rrdrrrcrrrrrfl&f4 
200 m_trk(1,a) 

210 m_trk(1,b) 

220 /* 

230 /* 

240 a=" o5 132 @71 p3 q8 

250 b="frgrarbrrrarrrgr rrdrrrcrrrrrfl&f4 
260 m_trk(2,a) 

270 m_trk(2,b) 

280 /i 

290 »n_play() 


u スト e 


10 /* 
20 /本 

30 /本 


くリスト 2> テ•イチ: i - ン+ エコー ヲカケタモノ 


これはもう定型です。カラオケないし， 

風呂場で誰もが経験する偉大なる「エコー」 

効果の MML 版といえるのがこの技。あま 
りにも有名でいまさら解説の必要はないか 
もしれませんね。方法はしごく簡単。エコ 
一をかけたいフレーズを別のチヤンネルで 
少し遅らせて音量を下げて追いかけさせれ 
ば，はい，おまちどお，いっちょ一あがり。 

この際，定理春を併用すると一層の効果が 
得られます。リスト2です。 

さて，ここからが意外と知られていない， 

美味しい調味料にあたる部分。 

先ほどの「少し遅らせて音量を下げて」 

というのは具体的にどれくらいなのでしょ 
うか。もちろん，試行錯誤をして，聴感上 
もっとも適切で，その場面で求められてい 
る効果を探り出すのが望ましいのですが， 

一応基本パターンがあります。 

1) 基本音長の 1.5 倍だけ遅らせて， 

2) ボリュームの値を2だけ下げる 

(定理式） 

これが基本です。ですから，まずこれに 
従って入力してみて，あとは聞きながら微 
調整というのがよいでしょう。あ，そうそ 
う，ここでの基本音長というのは「その曲 
のなかでいちばん多く出てくる音長」のこ 
とです。つまり，8分音符が基本になって 
いる曲だったら，付点8分音符分だけずら 
すということ。リスト2はこの基本どおり 

そこで「音場 j について考えなければなりません。「音場」とは文字どおり，「音が鳴る場所，空間」のこと。 
X68000 は3方向の出力しか持っていないので，この「音場」がきわめて狭いものになっているのはわかってもら 
えるはずですが，ここで「そういうもんなんだ」と關き直ってしまうのはちょっと早いもの。 
r 移動感 j 「琪チヤンネルの効果的な利用 j を追及すれば，狹いなりに農かな音場を作り出すことが可能なので 


vl4 y 48,00 yl 5，0 


vl4 y 49,32 yl 5，0 
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120 m_vset( 71 
130 minit() ： for i=l to 8 ： m_alloc(i, 1000 ) : next 
140 for i=1 to 8 ： m_asaign(i t i) : next 
150 str a[256],b[256],c[256],d[256],e[256],f[2 
160 /* 

170 /* 

180 a="tl20 o5 132 @71 p3 q8 

190 b="frgrarbrrrarrrgr rrdrrrcrrrrrfl&f4 
200 m_trk(1,a) 

210 m_trk(1,b) 

220 /* 

230 /本 

240 a=" rl6. o5 132 @71 p3 q8 

250 b="frgrarbrrrarrrgr rrdrrrcrrrrrfl&f4 
260 m_trk(2,a) 

270 m_trk(2,b) 

280 /* 

290 m play() 


vl4 y 48,00 yl5,0 


vl2 y 49,40 yl5,0 


特集 Y こそすベて 91 










時点でもっとも目立つパートにかけるこ 
と）などの必須事項力 5 '挙げられます。 

ほかにも， エコーに 関しては「調子に乗 
って深くかけすぎない」（私も初めはこれに 
ハマった）とか， 「エコーに 2チヤンネル以 
上使わない」（なにせ少ないチャンネル。そ 
んな無駄をするよりもっと有効な使い道が 
ある）といった禁止事項もあります。 • 

よ一するに，こういったテクニックは音 
を引き立てるために使うのであって，それ 
自体が前に出てきてはならないのです。つ 
まり，大切なのは，「単独で聞いたときの聞 
き心地」ではなくて「全体的な調和」を最 
優先することにあります。 

「ふと気がついてみると，そこには美し 
い エコーの かかった旋律が あった」， という 
のが達人のエコーといえるでしよう。 

実は エコーには ほかに「たがいちがい 技」 
(自分でつけるとなんてカッコ悪い名前に 
なるんだろう）というのがあるのですが， 
楽譜の再構成という非常に神経を使う作業 
をしなければならなくて，一度 MML を打 
ち終えてからバグが見つかると，それ以後 
の部分をすべて書き直さなければならなく 
なるという「えげつない」シロモノなんで 
すよね。 

きわめて自然なエコー効果が得られると 
いうことと，エコーをかけているメロディ 
が単音になったり和音になったりするとき 
に（ピアノ曲によくある）真価を発揮する 
という点で優れモノではあるのですが，デ 
バッグが異様に大変なので，ここでは準公 
式としてサンプルプログラムを挙げておく 
に留めます（でもこれだけはちゃんと入力 
してほしいな） 0 !；スト3です。名前の由来 
は各チャンネルを別々に聞いてみればわか 
るようになってます。 

センスのある人，自分でもっといい名前 
つけてね。 

■ 時代は「ポルタメント」なのであります 

んじゃ，お次。「ポルタメント」というの 
は“音階と音階を滑らかにつないで演奏す 
る”という，あれです。「ピッチベンド」と 
呼ばれることもあります。楽譜では音符同 
士が「ぶるぶる」でつながれているやつで 
すね0エレキギターとかによく出てきます0 
また，ピアノでは絶対にできません（当た 
り前か）。 

さて，これを MML で記述するのですが 
残念ながら BASIC の MML には「最初の音 
符と最後の音符，そして長さを指定すると 
勝手にポルタメントにしてくれる」なんて 


いう便利なコマンドはありません（善さん 
の記事を見てね）。ですから兀からあるコマ 
ンド，定理を組み合わせてなんとかするし 
かしようがない。 

ここで，おもむろに BASIC マニュアルを 
ばさばさとめくってみます。すると，あっ 
たあった。 

:前後の音符をつなげて演奏する” 
これはなかなか使えそうですね。で，早 
速 「04 C 」 から 「05 C 」 まで1オクターブの 

ポルタメントをこのコマンドを用い 


て記述してみたのがリスト4です。 

しかし，確かに 「04 C 」 から 「05 Cj まで 
で音はつながっているものの，単に 
ドレミと音を並べただけなので,決して「な 
めらか」といえません。ま，人間の耳なん 
てあまり.当てにならないもんで，テンポを 
速〈すればこれでも滑らかに聞こえてしま 
います“の値を200にして実行してみてく 
ださい）。でも，曲によってはなが一くてお 
そ 一い ポルタメントが出てくることも，む 
ろん，あるワケです。 
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>o( i, 1000 ) : next 





きらきらてつきん 


rr 


10 /拿 < リスト 3> r タカ • イチカ • イホウ j ニヨル 
20 /拿 

30 /* 才 V シ ■ナル スコア『イトシ夺リリモ j 
40 /拿 

50 dim char v(4 ,10)={ 

60 /* AF OM WF SY SP 

70 60 ， 15 ， 3 ， 1 ， 237, 

80 /* AR DR SR RR SL 

90 31, 0, 0, 0, 0, 

100 31, 12 ， 0 ， 3, 2, 

110 31, 0, 0, 0, 0, 

120 31,12, 0, 3, 2, 

130 m_vaet(71,v) 

140 m_init() : for i=l to 8:ra_all( 

150 for i=1 to 8 : m_assign(i,i):next 
160 str a[256],b[2S6],c[256],d[256],e[256],f[256) 

170 /* 

180 /* 

190 a="tl00 o4 18 971 p3 q3 vl2 y 48，00 yl5,0 

200 b="errrrrrrer r rrer rr r r rr>br r b r>r br rrr r rb rrr r 
rrr rrr<<t92o r r rr r t94r r t92d t90r t89r t88rt87r t86rt85rt70r 
rl 

210 m_trk(1,a) 

220 mltrk(l,b) 

230 /i 
240 /* 

250 a=" o4 18 071 p3 q3 vl2 y 49，04 

260 b="orrrrrcrrr r rrrr rr>>g-r rr rr r< a-r r rr rrr <c rr rrr r 
oor rrr r r r> >ar r r a rrr rb rrr 

rl 

270 m_trk(2,a) 

280 m_trk(2,b) 

290 /» 

300 / 拿 
310 a=" 

320 b="grrrrgrrrr 
rrr rrr f r r 

rl 

330 m_trk(3,a) 

340 m_trk(3,b) 

350 /* 

360 /拿 
370 a=" 

380 b="rrrerrrrrr 
rrr rrr r r>>g 

rl 

390 m_trk(4,a) 

400 m_trk(4,b) 

410 /i 
420 ハ 
430 a=" 

440 b="rrdrrrrrrr 
rrr rrr a r r 

16gr2... 

450 m_trk(5,a) 

460 m_trk(5,b) 

470 /* 

480 /* 

490 a= M o2 18 071 p3 q3 

500 b="rgrrrrrrrr r<<rfrr rr r r>dr rr 
rrr rrr r>>o r rr r r r > a 

rl 

510 m_trk(6,a) 

520 mltrk(6,b) 

530 /* 

540 /* 

550 a=" i 

560 b="crrrrrrrrr<<g 
rrr rrr>> f r r r 

64br2..&r16.. 

570 m_trk(7,a) 

580 n»_trk(7 ,b) 

590 /* 

600 /* 

610 a=" o4 18 «71 p3 q3 vl2 y 55,28 

620 b="rrrrrrrdrr r rrrr rd r r rr rd-r r r d rr rrr 
rrr<arr rrrrcr o r r r>g rr 

32dr2..&rl6. 

630 m_trk(8,a) 

640 m_trk(8,b) 

650 /* 

660 ハ 

670 m_play() 


o3 18 971 p3 q3 vl2 y 50,08 

rrrr>>rb r r rr rr r<<<e r r rr>brr 
r r 2 r r r r 


18 971 p3 q3 vl2 751,12 

rg- r r rr rr r >>e r r rr rrr< 
r r< b r r r r 


18 «71 p3 q3 vl2 y 52，16 

ra r r rr rr<d r r r cr rrr 

r<o r r r>> a r 


rr rrr 

r g 


rrrr 

r<< 


y 53,20 

r>a-rr rrr < g rr rrr 
r r r< < d r 


18 «71 p3 q3 vl2 y 54,24 

rr r>d-rr rr r r>e r rr rrr> 
b r r> d r r r 


rrr<<b r rr 
r r< < r 


r>>er rrr 


す。「裏チャンネル」とは，本来なら3方向しかない出力の4番目に当たるチャンネルのことをいいます。2チャ 
ンネル使って左右から同じフレーズを（周波数を少しずらして）出力したときに，音が定位する位置を「典チャ 
ンネル j と（私が勝手に）呼んでいるのです。実際に，ただパンポットを中央にあわせたものと同時に，なにか 
音を出して聴いてみてください。どちらも中央から音が出ているはずなのに，不思議とこの「裏チャンネル」と 
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そんなときは，音程が階段状に変化する 
せいで滑らかに聞こえないので，もっとも 
っと微妙な音程を出して（あたかも）滑ら 
か（なよう）に聞かせる必要がでてきます。 
そこで定理春を見てください。な，ぬわん 
と•，「音程を微妙にずらす公式」があるでは 
ありませんか！（わざとらしい） （定理 参） 

そんなこんなで，定理春を利用した，よ 
り滑らかなポルタメントがリスト5。 

いや一， Y コマンドがず一らずらで気色 
悪いですね。でも，滑らかさは聞いてのと 
おりで，手間をとるか完成度をとるかの違 
いになってきます。もっとも，どうせなら 
Y コマンド並べるのもやらせてしまえ，と 
プログラム 中に関数を作ってしまうのもひ 
とつの手です力す， RUN してから音が出てく 
るまでにけっこう時間がかかるので私はあ 
まり好きではありません。こんなのは好み 
の問題だけど。調子に乗ってばしばしとい 
ろんな機能つけすぎて「いや 一， RUN した 
の昨日なんだけどね」っていうのは，レイ 
トレみたいでヤだもん。 

■ぶるぶる「ビブ ラート」 

このビブラートというのは「音声を細か 
〈ふるわせる奏法」（広辞苑第三版）とあり 
ますが，具体的には「音程を細かく上下さ 
せる」ことをいいます（ほかにも音量を細9 
かく増減させるものがあるのですが，パソ 
コンでは前者のほうが効果が顕著に表れる 
のでここでは扱いません）。 

ところで， OPM ( X 1や X 68000 に搭載さ 
れている FM 音源の名称）には LFO という 
名の，音にビブラートをかける機能がつい 
ていて，これを使えば済みそうなものなの 
ですが，「実質的に1チャンネルにしかかけ 
ることができない」，非常に有効的な機能， 
「発声してから一時おいてビブラートをか 
け始める“ディレイ”がついていない」と 
いう欠点のために，「テンポが変わっても波 
形の周期が変わらない」，「音の減衰部分， 
つまりリリースにもビブラートがかかる」 
という利点があるにも関わらず，実際には 
あまり使えない「宝の持ち腐れ機能」に成 
り下がってしまっています。つまり，ユー 
ザー側でなんらかの工夫をしてやらなけれ 
ばならないのです （定理 四）。 

定義を振り返ってみますと，音程を「細 
かく」上下させるということなので，ここ 
でも定理春の公式が役に立ちます。よ一す 
るに，長い音#を細かくみじん切りにして， 
音程を少し上げては少し下げてを繰り返し 
てやるのです。そうすれば図1の i うなビ 


ブラートの「ぶるぶる」を再現できるでし 

上？ 

これをプログラムしたのがリスト6。最 
後の音符にビブラートがかかっているのが 
わかると思います。この際，波形の1周期 
をひとまとめにして，リピートコマンドで 
繰り返すことによって短縮化を図っていま 
す。んが， どっちみち MML が長くなってし 
まうのは避けられないので，曲の「締めど 
ころ」だけでかけるとかして，なるべく少 
なく済ませる工夫をしてください。さもな 
いと，素晴らしいドロ沼にずぶずぶと入っ 
ていくことになりますからね。初めのうち 
は「さわり」を出すだけでも十分でしよう。 

真面目な話，いかに聞いている人を誤魔 


化すかというの も，. 実はきわめて重要なこ 
となのです。 

❾柔らかい便箋，「ソフトエンベロープ」 

さて，前のビブラートや エコー もそうだ 
ったのですが，このあたりになって〈ると’ 
もはや楽譜に載っている情報ではなく，才 
リ ジナル だったら自分の感性に， コピー だ 
ったら元曲を聞き取る聴力に頼る部分が大 
きくなってきます。つまり，「ここはヤマ場 
だから エコーを たっぷりと効かせてビブラ 
ートも深一く，うにようによさせよう」と 
か，「うむむむ， ベース 音と ハイ ハツ トを音 
色切り替えのステレオ割り込みで1チヤン 


U スト4 


10 /本 

20 /拿 くリスト 4> アライホタメント 
30 /本 

40 dim char v( 4,10 ) = { 


ネイロカ * チカ * ウノテ*チュウイ 


50 

/* 

AF 

0M 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 


60 


44, 

15, 

0, 

0, 

0 ， 

0 ， 

0 ， 

0, 

0, 

3, 

0, 

70 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

AME 

80 


31, 

0, 

0, 

15, 

0 ， 

21 ， 

0, 

1 ， 

3, 

0, 

0, 

90 


31, 

0, 

0, 

15, 

0, 

0, 

0, 

1 ， 

3, 

0, 

0, 

100 


31, 

0, 

0, 

15, 

0 ， 

20, 

0 ， 

1 ， 

7, 

0, 

0, 

110 

120 

31 ， 

m_vset( 71 

0, 

,v) 

0, 

15, 

0 ， 

0, 

0, 

2, 

7, 

0, 

0J 


130 m_init() : for i=l to 8 ： m_alloc(i ,1000): next 

140 for i=l to 8 : m_assign(i,i) : next 

150 str a[256],b[256],c[256],d[256],e[256],f[256] 

160 /拿 

170 /本 

180 a="t 35 o4 164 @71 p3 q8 vl4 y 48，00 yl 5，0 

190 b= " cic + &d&d + fite&f &f + &g&g+&a&a + &b&<c4 
200 m_trk(1,a) 

210 m_trk(1,b) 

230 /* 

240 m_play() 


スト 5 


10 /本 
20 /本 

30 /* 


< リスト 5> ナメラカナホ•ルタメント 


40 

dim 

char 

v(4, 

,10): 

:{ 








50 

/* 

AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

Sax 

60 


44, 

15, 

0, 

0, 

0, 

0, 

0, 

0, 

0, 

3, 

0, 

70 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

AME 

80 


31, 

0, 

0 ， 

15, 

0, 

21, 

0, 

1, 

3, 

0, 

0, 

90 


31 ， 

0, 

0, 

15, 

0, 

0, 

0, 

1, 

3, 

0, 

0, 

100 


31, 

0, 

0, 

15, 

0, 

20, 

0, 

1, 

7, 

0, 

0 ， 

110 


31 ， 

0, 

0, 

15, 

0, 

0, 

0, 

1, 

7, 

0, 

0) 


120 m_vset( 71, v) 

130 m_init() : for i= 1 to 8 : m_alloc(i, 1000 ) : next 

140 for i=l to 8 ： m_assign(i,i)：next 

150 atr a[256],b[256],c[256],d[256],e[256],f[256] 

160 /本 

170 /* 

180 a="t35 o4 @11 @71 p3 q8 vl4 y 48,00 yl5,0 

190 b="y48 t 0c&y48,80c&y48,160c&y48,0c+&y48,80c+&y48,160c+&y48,0dfity48,80d&y48,1 
60d4y48,0d+&y48,80d+&y48,160d+ty48,0e&y48,80e&y48,160e&y48,0f&y48,80f&y48,160f&y 
48,0f+&y 48,80 f+&y48,160f+& 

200 c="y48,0g&y48,80g&y48,160g&y48,0g+&y48,80g+&y48,160g+&y48,0a&y48 , 80a&y48,1 
60a&y48•0a+&y48 , 80a+&y48,160a+&y48,0b&y48,80b&y48,160b&<y48,0c4 
210 m_trk(1,a) 

220 mltrk(l,b) 

230 m_trk(1,c) 

240 /* 

250 m_play() 


図 1 ビブラートを Y コマンドで表現する法 


時間 



「表チャンネル」を独立して，あたかも別のプレーンで鳴っているかのように聞こえます。これも余計なチャン 
ネルを喰う，というデメリツトがあるのですが，なかなか使えそうな技でしょ？たとえば，表チャンネルをメイ 特集 y こそすベて 93 

ンパートに，「裏チャンネル j をエコーパートに割り当てて「エコー」（公式二）をかけてみると，「う一んと広一 
い空間 j が頭の中に出現します。さらに定理六も適用させると， 














ネルに収めているな，流石はコナミの曲だ」 
といった感じです。 

初めのうちは見落としがちだった音の細 
かい表情が見えてくるのも，こういった楽 
譜には書かれていない情報を自分の手で入 
力しだすあたりからです。 

「ソフトエンベロープ」 というのもそうい 
った音の微妙な表情のうちのひとつで，フ 
ァンファー レと かに ありがちな「出た音が 
いったん減衰して，またじわじわと立ち上 
がってくる」（むむむ，音を文章で表現する 
のは難しいな）というような時間的音量変 
化がある音を再現するときに使うテクニッ 
クです。ブラス系の音によくある効果です 
ね 。 

もっとも，ゲームミュージッタなどでは 
こういった表情を細やかに出しているもの 
は少なく，生音楽（なにげなく使ってるけ 
ど変な日本語）を元にプログラミングする 
とき，特に注意して聞いて（読んで）くだ 
さい。 

ま，テクニックとはいってもその発想さ 
え手にしてしまえばたいしたもんではあり 
ません。前のビブラートのところで使った 
「音のみじん切り」を利用して音符のあい 
だにボリューム コマンドをバシバシ 挟んで 
いけばいいのです。とにかく聞いてみてく 
ださい。リスト7です（定理五 )0 

音が小さくなってから大きくなるのがわ 
かると思いますが，ここで大事なのは，い 
かにも人間が楽器を吹いているかのように 
聞かせるということ。 

また，この段階まできてしまうと完全に 
人それぞれの感性の問題で，公式なんかな 
いから試行錯誤を繰り返して“勘”を養う 
しかありません。 Oh!X LIVE コーナー 常連 
の人のようにミュージックプログラミング 
に長けている人とそうでない人の差が出て 
くるのもこのあたり。 

ある程度のものができるようになったら 
テクニックを盗むつもりで他人のプログラ 
ムを研究していくのも上達の近道かもしれ 
ません。実は，私もそうしてきたひとりだ 
ったりすのだよん。ふふふ。 

ちなみに，時間的音量変化だけでなく， 
時間的音色変化というのを再現する「ソフ 
ト モジュレーション」 という テクニック も 
あるのですが，そこまでいくとほとんど重 
箱つつきの世界なので，あえてここでは触 
れないことにします。音色作成の技術が必 
要になってきますし，場合によっては「長 
い長い Y コマンド ずらずら」になりかねな 
いので初心者は手を出さないほうが無難と 
いえるでしよう。 
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I 1チャンネルで二度おいしい「リバーブ」 

さあ，いよいよ小賢しい領域に入ってき 
ま した。1チャンネルのみで エコーに 近い 
効果が得られる「リパーブ」技です。さっ 
きからしつこく，チヤンネルを無駄なく使 
うようにいってきてるので，まさにうって 
つけの技といえます。 

この技は 「 FM 音源を休ませてはいけな 
い」という発想からきました。つまり，休 
んでる暇があったらどっかで音を出してろ， 


というワケ。う一む，残酷。 

どんな曲のフレーズでも途中に休符とい 
うものがありますよね（たまに全然ない変 
な曲もあるけど）。で，当然のことながら， 
FM 音源はその休符で休みをとります。そ 
こに目をつけてなにかに利用できないかと 
考えるワケです。 

でも，なにせ休符のやってくるタイミン 
ダは不規則。なんか別の楽器音を出すにし 
ても，その音を出すタイミングが限定され 
ていては曲になりません。特に元曲がある 
場合には，その フレーズをアレンジ してし 


U スト6 


10 /本 
20 /* 
30 /本 


40 

dim 

char 

v( 4 , 

10)=( 









50 

/* 

AF 

0M 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

Sax 

60 


58, 

15, 

0, 

0, 

0, 

0, 

0, 

0, 

0, 

3, 

0, 

70 

n 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

AME 

80 


19, 

4, 

3, 

6, 

11 ， 

32, 

1, 

1, 

0 ， 

0, 

0 ， 

90 


20, 

0, 

0, 

6, 

0, 

54, 

1, 

9, 

0, 

1, 

0, 

100 


21 ， 

22, 

0, 

6, 

6, 

0, 

58, 

1, 

1, 

0, 

0, 

0, 

110 


0, 

4, 

7, 

0, 

0, 

1 ， 

2. 

0, 

0, 

0) 


ra_alloc(i ,1000 ) : next 


120 m_vaet( 71, v) 

130 m_init() : for i=l to 8 : 

140 for i=l to 8 : m_assign(i,i)：next 
150 atr a[256],b 【 2i6 】， c[256 】， d[256],e[256] ， f[256] 

160 /本 

170 /* 

180 a="tl20 o5 132 ©71 p3 q8 vl4 y 48，00 yl5,0 

190 b="frgrarbrrrarrrgr rrdrrrcrrrrrf4 & @11 

200 c="| : 12y 48,40 fy 48,80 fy48,120fy48,160fy48,120fy48,80fy48,40fy48,0fy48,220ey 
48,180ey48,140ey48,100ey48,140ey48,180ey48,220ey48,0f ： |y 8，0 
210 m_trk(1,a) 

220 ro_trk<1 ， b} 

230 m_trk(1,c) 

240 /* 

250 /本 

260 a=" rl6. o5 132 ®71 p3 q8 vl2 y 49,40 

270 b="frgrarbrrrarrrgr rrdrrrcrrrrrf4 & @11 

280 c="|:12y 49,80 fy49, 1 20fy49,160fy49,200fy49,160fy49,120fy49,80fy49,40fy49,0f 
y49,220ey49,180ey49,140ey49,180ey49,220ey49,0fy49,40f : Iy8,1 
290 m_trk(2,a) 

300 m_trk(2,b) 

310 m_trk(2,c) 

320 /i 
330 m_play() 


リスト 7 


10 /拿 

20 /本 < リスト 7> サラニ r ソフトエンへ - D- フ • j ヲカケタモノ SR 力 * 力 *7 ッテイルノテ*チュウイ 

30 /* 

40 dim char v( 4,10 ) = { 


50 

/* 

AF 

OM 

WF 

0, 

SY 

0, 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

Sax 

60 


58, 

15, 

0, 

0, 

0, 

0, 

0, 

3, 

0, 

70 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

AME 

80 


19, 

4, 

2, 

6, 

11, 

32, 

54, 

1, 

1, 

0, 

0, 

0, 

90 


20, 

0 ， 

0, 

6, 

0, 

1, 

9, 

0, 

1, 

0, 

100 


21, 

0, 

3, 

6, 

0, 

58, 

1 ， 

1, 

0, 

0, 

0, 

110 


22, 

a, 

0, 

7, 

0, 

0, 

1, 

2, 

0, 

0, 

0} 


m_alloc(i,2000) : next 


120 m_vaet(71,v) 

130 m_init() : for i=1 to 8 : 

140 for i=l to 8 : m_assign(i,i):next 
150 atr a[256],b[256],c[256],d[256],e[256],f[256] 

160 str g[256],h[256],j[256],k[256],1[256],m[256] 

170 /本 
180 /* 

190 a="tl20 o5 132 ®71 p3 q8 vl4 y 48,00 yl 5，0 

200 b="frgrarbrrrarrrgr rrdrrrcrrrrrl32vl4f&vl3f&vl2f&vlIf&vl0f&v9f&v8fjiv7f&®l 

1 

210 c="y 48,40 fy 48,80 fy48,120fy48,160fy48,120fy48,80fy48,40fy48,0fy48,220ey48,1 
80ey48,140ey48,100ey48,140ey48 f 180ey 48,220 ey48,0f 
220 m_trk(1,a) 

230 m_trk(1,b) 

240 m:trk(l ， "v6"+c> 

250 m_trk(1,"v7"+c) 

260 m_trk(1,"v8"+c) 

270 m_trk(l f "v9 M +c) 

280 m_trk(l,"vl0 ,, +c 
290 m_trk(1,"vll"+c 
300 m_trk(1,"vl2"+c 
310 m_trk(1,"vl3"+c 
320 m_trk(1,"vl4"+c 
330 m_trk(1,"vl5"+c 
340 m trk<1,"«vl26"+c) 

350 ra_trk(l, M «vl27"+c) 

360 /i 
370 m_play() 


「う一み一は 一， ひろい一な 一， お一き一な- Jo 

本当に信じられないくらいの広がりが出てくるので，ぜひ試してみてください。 

さて，問題がひとつ。 r ヘッドホンをつけないと典チャンネルが認識できない j ということ。これは外部スピー 
カーだと「左の音は左耳だけで，右の音は右耳だけで」聴くことができないからです（モノラルの内蔵スピーカ 











まうわけにもいきませんからね。 

逆にいうと，オリジナル曲であれば休符 
のタイミングをうまく調節して，そこに別 
のフレーズを（リズム楽器などがやりやす 
い）さくさく埋め込めば，あら不思議，1 
チヤンネルで2つのフレーズが鳴ってしま 
うというものも作れます。 

ただ，これには作曲や編曲の技術，音場 
空間を効果的に利用する技術，さらに，い 
かにも2チヤンネルで演奏しているかのよ 
うに聞かせる「誤魔化し」の技術が必要に 
なって〈るので，かなり高度な技であるこ 
とは否めません。興味のある人には，コナ 
ミ 曲の リズム パート， ファミコン 曲の一部 
(マッドシティ とか） のフレーズ など が 参 
考になるでしよう。 

さて，その休符部分を別のフレーズに使 
うのが難しいとなると, • あとはなんらかの 
“効果”に回すしかありません。 

有名なのが「繰り返し音による エコー 効 
果」。やまびこのように音(単音だけでなく 
短い フレーズ でも可）を小さくしながら何 
度も繰り返すことによって エコーを 得ると 
いう方法です。 

しかし，確かにこれだと1チャンネルで 
エコーが かかるのですが，まとま った 長さ 
の休符がないとそれらしく聞こえない，何 
度も音を繰り返すために多用すると旋律が 
濁って〈る，という理由でいま 0.5 歩（いま 
一歩まではいかない）見送りです。一応サ 
ンプルは作っておきましたので聞いてみて 
ください。リスト8です。 

んでもって，ここで登場するのが「リバ 
ーブ」技（なんとまあ，手前ミソ）。図2を 
見てください。上が休符になにも小細工を 
しない!：きの音量変イ匕で，下が休符のとき 
に音量を半分にしたものです。どうでしよ 
う。 FM 音源が休符の部分で余韻として立 
派に働いているのがわかるでしよう力、。 

このときに注意しなければならないのが 
「リバーブをかける音色のキャリアのリリ 
ースレートを長めにとる」必要があるとい 
うことです。 

今回は基本的に，音色作成の知識がなく 
てもわかる技ばかりにしたのです力 ? ，これ 
だけはしかたがありません。キャリアとい 
うのがなんだかわからない人や，リリース 
レートってなんじやらほい（死語）？とい 
う人は「リストの網掛けになっている部分 
を機械的に3，ないし4に書き換える」こ 
とだと考えてください。一応，それでなん 
とかなります。 

具体的な MML の記述は実際にリスト9 
を見て覚えてください（定理六）。 


■ステレオ化に関する諸注意 

さて，いよいよ最後。締めく くりの意味 
でいままでとは少し趣向を変えて，ミュー 
ジッタプログラムを組む際に，上手い人と 
そうでない人の差がいちばん出てくる「音 
源のステレオ化」について簡単に説明する 
ことにしましよう。 

図2リバーブ技の原理 


まずひとつあるのが， Oh!X LIVE コーナ 
一に投稿されてくるプログラムのほとんど 
が「モノラル」のまんまであるという悲し 
い事実。 

もちろん，常連さんのものは工夫の限り 
を凝らしてあって，素晴らしい“広がり” 
があるものばかりなのですが，どうやらま 
だ大多数の人が「ステレオ化が音源の貧弱 
さを補う必殺技だ j ということを知らない 
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この部分が余韻となる 
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10 /本 

20 /* <'；X 

30 /* 

40 dim char v( 4,10 ) = { 


t マヒ • コェ 3 - ネイロカ • カワッテイルノテ•チュウイ 
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/* 

AF 
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OM 
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WF 
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SY 

0, 

SP 

0 ， 

PMD 

0, 

AMD 
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PMS 

0, 

AMS 
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70 
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ML 
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110 


31, 

12, 

9, 

12, 

5, 

0, 

0, 

8, 

7, 

0, 

0) 


120 m_vaet( 71, v) 

130 ra_init() : for i= 1 to 8 ： m_alloc(i, 1000 ):next 

140 for i=1 to 8 : m_asBign(i,i)：next 

150 Btr a[256],b[256],c[256],d[256],e[256],f[256] 

160 /* 

170 /本 

180 a="tl20 ol 116 «71 p3 q8 vl4 y 48,00 yl5,0 

190 b="vl4avl3avl2avl4avl3a<vl4egafvl3fvl2fvl4dvl3dvl2d>vl4avl3avl4gvl3gvl2gvl 
4gv13gvl4b-<df>a-vl3a-vl2a-vl4a-vl3a-<vl4ea-vl3a-vl2a-vlla-vIGa-vSa-vSa-vTa-vGa- 
vSa-vAa-vSa-vZa-vla-vOa-rS . 

200 m_trk(1,a) 

210 m_trk(1,b) 

220 /* 

230 m_play() 


リスト 9 


10 (/* 

20 /本 < リスト 9> リハ *- フ * 

30 /* 

40 dim char v( 4,10 ) = { 


50 

/* 

AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

Sax 

60 


58, 

15, 

0, 

0, 

0, 

0, 
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70 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

AME 

80 


19, 

4, 

3, 

3, 

11, 
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1 ， 
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0, 

0, 

0, 

90 


20, 

0, 

0, 

3, 

0, 

54, 
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9, 

0, 

1, 

0, 

100 


21, 

0, 

6, 

3, 

0, 

58, 
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0, 

0, 

0, 

110 


22 , 

0, 

4, 

3 » 

0, 

0, 

1, 

2, 

0, 

0, 

0) 


120 m_vaet(71,v) 

130 ra_init() : for i=1 to 8 ： m_alloc(i, 1000 ) : next 

140 for i=1 to 8 : m_assign(i,i) : next 

150 atr a[256],bt256],c[256],d[256],e[256],f [256] 

160 /本 

170 パ 

180 a="tl20 〇 5 132 @71 p3 q8 vl4 y 48,00 yl 5，0 

190 b="fv8rvl4gv8rvl4av8rvl4bv8rrrvl4av8rrrvl4gv8r rrvl4dv8rrrvl4cv8rrrrrv14f4 
&011 

200 c="|:12y 48,40 fy 48,80 fy48,120fy48,160fy48,120fy 48,80 fy 48,40 fy48,0fy 48,220 ey 
48,180ey48,140ey48,100ey48,140ey48,180ey48,220ey48,0f:|y8,0@v0r 
210 m_trk(1,a) 

220 mltrk(l,b) 

230 m_trk(1 f c) 

240 /* 

250 m_play() 


一は論外〉。つまり，ヘッドホンだと両側から出力した音は“典ん中”に間こえるのに対して，外部スピーカーだ 

と両側から出した音が“両側”から聞こえてしまうので，結果的に音が散浚としてしまうのです。「音質がいい」 特集 Y こそすベて 95 

以外に，こんな理由で私はへッドホンを推しているのですが，まだちゃんとしたへッドホンで X 68000 の曲を聴い 
ている人は少ないのが実情。みんな，ヘッドホンを買うんだ。 （織） 

















ようです。というよりも，ちゃんとヘッド 
ホンで曲を聞いている人が少ないのかもし 
れません。 

ここで，私の独断と偏見によります力す， 
ミュージックプログラムの 「勝負どころ」 
を挙げておきますと， 

1. 楽譜 

2. 音色 

3. 音場 

と，この3つが押さえなくてはならないポ 
イントだと思います。 

まず最初の“楽譜”ですが，これは当た 
り前で，和音構成がおかしかったりフレー 
ズが違っていたりすると，聞く以前に音楽 
として成立しないからです。コピー曲でし 
たらなおさらですね。 

それから，次の“音色”については，ド 
ラムはドラムの音色で，ベースはベースの 
音色で演奏するという基本的な原則です 
(でも意外とここで引っかかる人もいる）。 
コピーだったらさらに音色を“似せる’’こ 
とも必要になりますが，とりあえずは聴い 
ていて不自然じゃなければ十分。 

そして最後の“音場”がまさに「ステレ 


「公理定理公式 J 


公理一 

「プロ グラムは間違えずに打つ」 

当然といえば当然だが，ミュージックプログ 
ラムには「エラーにならないバグ」がたくさん 
出てくるから注意が必要である。 

「七、を込めて打ち込む j 

こらこら，馬鹿にするんじやない。こ一する 
と打ち間違えも減るってものなのだ。半分嘘み 
たいな話だけど，半分は冗談なんだよん。 

公理二 

「音楽やるならへッドホンを使う」 

ハミダシで説明しているとおり，ウラチヤン 
ネルとかを微妙に聞き分けるにはへッドホンは 
必需品。それも高品質のものをひとつ持ってお 
きたいところだ。音楽用のボードを買ったと思 
えば安いってモノ。_ 

定理 ■ 

「周波数を微妙にずらすには Y コマンドを使 

え」 

これが Y コマンドの基本。あとは OPMA や 
OPMD でサンプリングを鳴らしたり，音をキー 
オフするときくらいにしか使わない。ま，知っ 
てる人も多いでしよ。 

公式 ： 「Y 47+ n ,4 mj 

n :チヤンネル番号 
{n | l^n^8} 

m : ずらし加減。1で最小。63でほぼ半音上 
がる 

{m| 0^m^63} 


才化」に当たる部分で，「コンピュータ曲丸 
出し」にしないようにするために，いちば 
ん気を遣う部分なのです。 

ここで早とちりしてはいけないの力 5 ',ス 
テレオ化というのが「単にチャンネルを左 
右に振り分けることではない」ということ。 
重要なのは， 

“チャンネルに最大限の移動感を持たせ 
て少ない音源を多く見せかける（音源をス 
テレオにあちこち振って聞く人が追いかけ 
られないようにする）” 

ということなのです（定理七）。 

具体的に例を挙げだすと切りがないので 
すが，進藤さんや立川さんのプログラムに 
は，この「移動感」に溢れているので，参 
考にするとよいと思います。実際に，この 
部分は人の説明を聞くよりも，自分でいろ 
いろと試したほうがいいし，楽しいですか 
らね。 

ともかく，プログラミング時にこのステ 
レオイ匕というのを念頭に置いていれば，そ 
れだけでも違ってくるはずです。 

あ一でもない，こ一でもない，といいな 
がら 「P コマンド」 をがりがり書き込んで 


定理武_ 

「エコーは別チヤンネルで同フレーズを追い 
力\けさせろ」 

これも有名な技。一応公式は次のとぉり。 
公式： エコーパート の設定 

「 Vn -2 rm.j 
n :音世の値 

{n | n はメインパートの音量} 

m :音長の値 

{m | m は曲の基本音長} 

定理参 

「ポルタメントは音をなるべく細かく区切つ 
て間に Y コマンドを挟め」 

これは定理一の応用編。 Y コマンドを使わな 
くても済むならそのほうがいいに決まっていて， 
下手に細かくしすぎないのもテクのうち。ゼン 
ジー西川さんの ZMUSIC . FNC を打ち込むか， 

Y コマンド並べる力、。あ，どっちも大変なのね。 
公式：一般型を誉いてもごちゃごちゃするだけ 
だから省略だあね0 _ 

定理四 

「ビブラートなどは繰り返し記号で短縮化を 
図れ」 

Y コマンドでいちばん手に負えないのがこれ。 
ずらずらと並んでいても意味がさっぱりわから 
ないということもある。入力するときは要注意。 
公式：これだけは経験的処理が必要なので公式 
はなし。あえていうならば「人のプログラムを 
見て真似する」こと。_ 

定理五 

「ソフトエンベロープは下手に@ V コマンド 
を使うな j 


くださいね。 

ホ* 氺 

えっと，駆け足ながら 「 MML さえ知って 
いればすぐ使えるテクニック」を紹介して 
きました。が，まだまだ音色に関するテク 
ニック，サンプリングを活用するときのテ 
クニックなど，ミュージックプログラムを 
作るうえで大事なものがいろいろとありま 
す 。 

「え，サンプリングにテクニックなんて 
あるんかいな？」と思う人もいそうですが， 
冒頭でも説明したように，サンプリングの 
「よい音」に惑わされて，ただガンガンと 
鳴らせばいいってもんではありません。み 
てくれだけの“かつら”としてではなく， 
FM 音源にプラス a をする“増毛法”として 
サンプリングを使うには，いろいろなノウ 
ハウが必要なのです。 

まあ，そういったものはまたの機会にし 
ますので，とにかくいまはいろんな曲をプ 
ログラムして腕を磨いてください。もちろ 
ん，よいものが出来たら Oh ! XLIVE まで投 
稿するのを忘れないよ一に。では，みんな 
がんばって。 

@V コマンドの音量変化は滑らかだからいい 
けど，対数変化だから，聴感上 V コマンドのほ 
うが扱いやすい。 

公式： 「 Vn 」 

n : 音量の値。数が増えるほど大きくな 
るが，0でも無音ではない。 

_ {n | 0ミ n ミ 15} _ 

定理六 

「リバ ーブの余韻部分だけをステレオに振る 
と効果が高い j 

実は「リバ ーブ j と 「エコー」 を同時にかけ 
るとより美味しい。いわゆる定理の組み合わせ 
というヤツ。音色のリリースを長めにとること 
を忘れずに。 

公式 ：「VI m Vl + 2 r VI 」 

1••そのチヤンネルのボリュームの値 
m :演奏すべき音符 
r :演奏すべき休符 

_ {1 | 0ミ 1-15} _ 

定理七 

「ステレオ化ではとにかく 「移動感 j で勝負 
せよ」 

パートによる割り振りも大切だが，差が出て 
くるのは移動感があるかないかというところ。 

リズム系の楽器は特に顕著にこの差が出る。ス 
テレオに振るだけで音が躍動的になるからね。 

公式 ： 「Pnj 

n :音の左右真ん中の出力の指定 
1:左 2:右 3:中央 
{n | l ^ n ^3} 

ここに挙げた公式はあくまでも目安にすぎま 
せん。時と場合と気分によってその都度補正を 
してくださいな。 

(ただし出てくる変数はすべて整数） 


96 Oh ! X 1990.10. 






















多彩な表現をマクロにする外部関数 

ZMUSIC . FNC 


逆^電/子/音/楽/術/入/門/ 


Nishikawa Zenji 


西川善司 


一般的な MML で，ポルタメントやモジュレーションといった 
表現を使おろと思ったら，それこそ常人の理解を超えた大量の 
丫コマンドをちりばめなければなりません。もっと簡単に豊か 
な表現を，とい5わけで生まれたのが ZMUSIC . FNC です。 


ボンジュール， 西川善司デ ース。 いやあ， 
もう秋ですね。外を見れば，ほんのり黄色 
く色づいた銀杏の葉がヒラヒラと舞い落ち 
ているではありませんか。道行く人の服装 
も白系統から茶系統へ。おや，いま，庭を 
横切ったのは夏毛から冬毛に生えかわった 
野ウサギ！そうかあ，もう冬への支度を 
始めた動物もいるんだなあ 。 

……なんちて。実はこの原稿を書いてい 
るのは，夏も真っ盛り，8月中旬。アッイ 
アツイ。言えばいうほど暑くなる，この暑 
さを袋に詰め込んで，冬に開放する……， 
そんな エアコンで きませんかね，電気代も 
かからないし。それはさておき，秋です（ま 
だいってる）。秋といえば芸術の秋。芸術と 
いえば音楽です。今月は「電子音楽術入門」 
ということで私は「こいつあ，便利，必殺 
MML マクロコマンド， ZMUSIC . FNC 」 を 
お届けします。 

恐の丫コマンド 

リスト1，2を見てください。これは， 
Oh!X LIVE の常連「進藤君」と「立川君」 

のリストの一部です。凄いですね。なにが 
凄いって， 「 Y コマンド」の嵐がですよ。説 
明すると，リスト1は OPM のレジスタ 「キ 
ー フラクション （KEY FRACTION ) 」に 
周期的な値を書き込むことによってビブラ 
ート効果を作り出しています。リスト2は 
キーフラクショ ンへ1方向的な値を書き込 
んで行う テクニック， ポルタメント（ピッ 
チベンド）です。 

このキーフラクションというレジスタは， 
音程を微妙にずらすためのもので，〇〜63 
の範囲の値を書き込むことによって最大半 
音上までずらすことが可能です（実際にレ 
ジスタへ書き込むデータは4倍しなくては 
ならない）〇このレジスタを用いたテクニッ 
クとしては，前出のモジュレーション，ポ 
ルタメントのほかに，デイチューンと呼ば 
れるものがあります。これは単に，互いに 
音程の微妙にずれた音を2声重ねて発声す 


るだけなのですが，実に厚みのある豊かな 
音になります。 

こうした，キーフラクションを使ったテ 
クニックは，もはや FM 音源を使う人間に 
は当たり前になってきているのですが，ひ 
とつ問題があります。それは，プログラム 
リストとして掲載されたときに，入力しよ 
うとする人が思わず月に向かって吠えてし 
まうということです。 

「わを〜ん！ Y 48,0 C & Y 48,40 C & 
Y 48,80 C & Y 48，120 C & …… ， ああ一ん もう 
肋弁してくだしゃ一い」 

Oh ! X のミュージックプログラムを入力 
していて，こう叫んでしまった人も少なく 
ないはずです。これらの Y コマンドの嵐が 
なにをやっているのか理解している「その 


筋人間」ならまだしも，ごくたまにミュー 
ジックプログラムを入力するような一®^人 
(?) にとっては拷問以外のなにものでもな 
いことでしよう。 

実は，先ほど挙げた例にしても公差40の 
等差数列（なつかし一）というれっきとし 
た規則性があるわけですし，なんとかコン 
ピュータ側にこれらと同様なことをさせる 
ことができないか，誰しも思うはずです。 
そう，これが今回作成した ZMUSIC.FNC 
の テーマな のです。 

ZMUSICFNC の動作 

さて，ポルタメントにしろなんにしろ， 
新たな MML コマンドを増やすには FM 音 


リスト1モジュレーション（進藤君の場合) 


1 ハ進藤君の「メタルホーク」より … 

16000 p(0)="[d.c.Jrlrl @71 vl2 丄 12 〇 3 p3 q8 y 53,16 [coda] 
16010 p(1)= ,, vllc&v9fvl2b-<e-6&@14 | :4y53,16e-&y53,220d&y53,16e-&y 
53,68 e-&:|y53,16y8,5112dc>b-@13 
16020 pol(16,-34,16,6,10):p(2)sl+ H & 

16030 p(3)= M @14| :6y53,16c&y53 f 144>b&y53,16 く c&y53,128c&: |y53,1611 
2>g-b-g-<d-6&@14|:4y 53,16 d-&y 53,200 c&y53,16d-&y53,88d-&:|y53,16y 
8,5> 

16040 pol(16,-24, 12,6, 5) : p(4)=1+ M &y53,16|:3y53,16g-&y53,220f&y5 
3,16g-&y 53,68 g-&:|y53,16y 8,5112 

16050 p(5)= H <fe-d-c>b-a-<c>b-a-<@14I:3y53,16a-&y53,240g&y53,16a- 
&y 53,48 a-& ： |y 8,5112 > 


リスト 2 ポルタメント（立川君の場合） 

I /* 立川君の「サンダークロス」より 
12020 a=" [d.c.] [codaJ 〇 3 @12 @1 p3 q8 vl4 y 49,20 

12030 bb="y 49,020 c& y 49,050 c& y 49,080 c& y 49 ， 110 c& y 49,140 c& y49, 
170c& y 49,200 c& y 49,230 c& 

12040 cc="y49,020c+&y49,050c+&y49,080c+&y49,110c+&y49,140c+&y49, 
170c+&y49,200c+&y49,230C+& 

12050 dd="y49,0*20d& y 49,050 d& y 49,080 d& y 49,110 d& y 49,140 d& y49 , 
170d& y 49,200 d& y 49,230 d& 

12060 ee="y49,020d+&y49,050d+&y49,080d+&y49,110d+&y49,140d+&y49, 
170d+&y49,200d+&y49,230d+& 

12070 ff="y 49 ， 020 e& y 49 ， 050 e& y 49,080 e& y 49,110 e& y49,140e& y49, 
170e& y 49,200 e& y 49,230 e& 

12080 gg = . ， y49,020f& y 49,050 f& y 49,080 y 49,110 f& v 49,140 y4 9 , 
170f& y 49,200 f& y 49,230 f& 

12090 hh="y49,020f+&y 49,050 f+&y49,080f+&y49,110f+&y49,140f+&y49, 
170f+&y 49,200 f+&y49,230f+& 

12100 jj="y49,020g& y 49,050 g& y49,080g& y 49 ， 110 g& y 49 ， 140 y49, 
170g& y49,200g& y 49,230 

12110 kk= M y49,020g+&y 49,050 g+&y 49,080 g+&y49,110g+&y49,140g+&y49, 
170g+&y49,200g+&y49,230g+& 

12120 11= ， . y 49,020 a& y 49,050 ai y 491080 a& y 49 ， 110 a& y 49 ， 140 a& y49 • 
170a& y 49,200 a& y 49,230 a& 

12130 ram="y49,020a+&y 49,050 a+&y49,080a+iy49,110a+&y49,140a+&y49, 
170a+&y49,200a+&y49,230a+& 

12140 nn="y49,020b& y 49 ， 050 b& y 49,080 b& y 49 ， 110 b& y 49 ， 140 b& y49, 
170b& y 49,200 b& y 49,230 b&< 
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源ドラィバの改造または作り直しが必要に 
なってきます。しかし，改造というのはか 
なり危険な行為で，プログラムも非常に組 
みに〈くなるため今回は遠慮しました。そ 
こで，今回着眼したのは X - BASIC の外部 
関数 MUSIC . FNC です。 

この MUSIC . FNC という外部関数は音源 
ドライバ、ではなく， BASIC プログラムから 
受け取ったパラメータを単に OPMDRV.X 
(本体同梱の FM 音源デバイスドライバ） 
へ送っているだけです。 MML をセットす 
る M _ TRK という命令にしても MML の書 
いてある文字変数を BASIC から受け取り 
そのまま OPMDRV . X へ転送しているだけ 
なのです。これをそのままでなく，加工し 
てから送るのが ZMUSIC . FNC です。 

つまり，送るべき文字列中にあらかじめ 
決めておいた「新たな MML コマンド」 が存 
在したならば，それを従来の MML コマン 
ドに変換してから送ってやろうというわけ 
です。 

具体的な例を挙げて説明しましょう。ド 
( C ) からミ （ E ) へのポルタメントを， 

( C , E ) 

と記述すると決めたとします（新たな 
MML コマンド）。 ZMUSIC . FNC はその 「新 
たな MML コマンド」 を確認する と 「Y コマ 
ン ドの嵐（従来の MML コマンド）」へと 変 
換し，それから OPMDRV . X へ転送するの 
です。何十文字も打ち込まなくては表現で 
きなかったポルタメントもいまの例でいく 
と，たった5文字ですんでしまうのです。 

まあ，早い話, M _ TRK 命令の機能拡張と 
いったところですかね。しかし，面倒臭い 
ことはコンピュータにさせちまえ，という 
基本思想にのっとった味のあるアイデアに 
私は，しばしお尻にできたおできの痛みも 
忘れ酔いしれたものです。 

入力方法 

リスト5のダンプリストをマシン語入力 
ツール （ 6月号付録の mac . x ) から入力する 
か， またはリスト6のソースをエディタか 
ら入力しアセンブルしてください。アセン 
ブルからリンクまでの手順を初心者のため 
に詳しく説明します。まず， 

A〉ED ZMUSIC.S 

でエディタを起動します。リスト6を入力 
終了後， [ ESC ] + [ E ] でエディタを抜け 
て， 

A>AS ZMUSIC.S 

とアセンブラでアセンブルしてください。 
また，本リストは IOCSCALL . MAC と DOS 


CALL . MAC をインクルードしますので， 

これらのファイルをカレントディレクトリ 
(この場合はソースリストなどが存在する 
ディレクトリ） へ コピーして おく 力、， 

A>AS /I IOCSCALL . MAC などの 
存在するディレクトリ ZMUSIC . S 
のようにしてアセンブルしてください。 
ァセンブル時，何かしらのエラーが出た場 
合は， 

A〉ED ZMUSIC.S 

として再びエディタを起動して，打ち込ん 
た^リスト6をィ1多正してくた^さい。 

無事アセンブルを終了すると「 N 0 
FATAL ERROR ( S ) j というメッセージ 
が出ます。このメッセージを確認したら， 
A〉LK ZMUSIC .0 

としてリンクしてください。 

これで， ZMUSIC . X というファイルがで 
きたはずです。 

注）アセンブラ，リンカ， IOCSCALL . 
MAC , DOSCALL . MAC は ， 「C compiler 
PRO -68 K 」 や 「 THE 福袋 V 2.0」 に入っ 
ています。また， IOCSCALL . MAC , DOS 
CALL . MAC は本誌6月号の付録ディスク 
にも収録されています。 

外部関数の組み込み 

さて，アセンブル，リンクを終了すると 
ZMUSIC . X というファイルができますが 
これを， 

A>REN ZMUSIC.X ZMUSIC . 

FNC 

として ZMUSIC . FNC にリネームしてくだ 
さい。そして，この ZMUSIC . FNC を， 

A > COPY ZMUSIC.FNC 
¥ BASIC 2 

のようにして，自分のシステムディスクの 
BASIC のデイレクトリへコピーしてくだ 
さい。 

注）初代 X 68000 のシステムディスクでは 


新し L 、外部関数が発表となるたびにディスクを 
用意してそれを組み込むような BASIC システムデ 
ィスクを作るのはどうもスマートでありませんね。 
知っている人も多いかと思われますが，任意の 
BASIC コンフィギュレーションフアイルを組み込 
んで BASIC を立ち上げる方法があるのでこれを紹 
介しておきます。 

たとえば， ZMUSIC . FNC を組み込むように設定し 
たコンフィギュレーションフアイルが BASIC _ ZM . 
CNF という名前で A ドライブの BASIC 2 というディ 
レクトリにセーブしてあるとします。そこでこの 
ファイルに書かれた環境で BASIC を立ち上げるに 


BASIC 2 ではなく BASIC というデイレクト 
リになっています。各自システムディスク 
を確認してください。 

次に BASIC のコンフイギユ レー シヨン 
フアイルを変更します。 

A>CD BASIC 2 
で BASIC のデイレクトリへ入り， 

A>ED BASIC.CNF 

で コンフイギユ レー シヨンフアイルを読み 
込んでください。 

FREE =128 
WIDTH =64 
BEEP 二 ON 
CAPS =OFF 
FUNC =GRAPH 

のようなものが画面に出てくるはずです。 
一番下の行に， 

FUNC = ZMUSIC 

を付け足し [ ESC ]+ [ E ] でエディタを終 
了してください。これで準備完了です。 

A > BASIC 

で ZMUSIC . FNC を組み込んだ BASIC が起 
動します。 

ZMUSIC . FNC のコマンド詳細 

ZMUSIC . FNC を組み込むと， M _ TRK 2 
という命令が使用可能になります。従来の 
M _ TRK も使用可能ですので従来の音楽プ 
ログラムも同じシステムで実行可能です。 

それでは， M _ TRK 2 で追加されたコマンド 
を解説していきたいと思います。 


Kn (デイチューン） 


このコマンドの書かれたチヤンネルの音 
程を微妙にずらします。 n は0 ‘ n $63 の範 
囲の値をとり， n =63 で半音上となります。 
通常は〇〜15を与えてやるといいでしよう。 
ちなみにこのコマンドは， 


は. 

A > BASIC / cA :¥ BASIC 2¥ BASIC — ZM.CNF 
とします。 「/ cj というスイッチの後ろにコンフィ 
ギュレーションファイルの名前を書いて起動すれ 
ばいいのです。 「/ cj を設定しないと BASIC . CNF とい 
うコンフィギュレーションファイルを勝手に選択 
して起動します。私は， 

BASIC / cA :¥ BASIC 2¥ BASIC _ ZM.CNF 
を ZM . BAT というバッチファイルにして ZMUSIC.FNC 
を組み込んだ BASIC が， 

A>ZM 

で立ち上がるようにしています。 


コンフィギュレーションファイルを選択して巳 ASIC を起動 
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Y 48 + チャンネル番号 （0 〜 7)， nX 4 
が OPMDRV . X へ送られます。 BASIC 起動 
時，デフオルトとして0がセットされてい 
ます。また，値を省略すると以前に設定し 
た値を使用します。 

例） 

K 10 K 


(相対ボリューム) 


ボリュームを相対的に変化させることが 
できます。「一」はボリュームアップ，し」 

はボリュームダウンです。「__」の後ろには 
0〜127の値を書くことができ，省略すると 
以前に与えられた値が使用されます（デフ 
オルトは3です）。たとえば， 

例） 

@ V 120~3 C _ D _ E_F 

という MML を M _ TRK 2 を用いてセット 
したとすると以下のように変換されます。 

@ V 120@ V 123 C @ V 126 D @ V 127 E 

@ V 124 F 

ここで， 「 C 」 は120+ 3 =123で@ V 123 で 
演奏されるのは明らかですね。 「 C 」 の後ろ 
に「 _ 」がありますが値がありません。この 
場合は，先ほど述べたようにその直前に使 
用された値3が起用され123+ 3 =126とな 
ります。また， 「 D 」 の後ろにまた「一」が 
ありますので126+ 3 =129，としたいとこ 
ろですが， FM 音源では @ V 127 が最大値で 
すので 「 E 」 は @ V 127 で演奏されます。こ 
れと同様に相対ボリュームコマンドを用い 
て値が最小値である0を超えてマイナスに 
なったときは @ V 0 に変換されます。ちなみ 
に「一」はシフトキーを押しながらご」，「_」 
はシフトキーを押しながら「かな」の「ろ」 
が印刷してあるキーを押すと出てきます。 


(kioct k 2 )lng (ポルタメント） 
oct = “く〉，，， 


音程を K から k 2 へ絶対音長 Ing の長さで 
変化させます（絶対音長とは 「@ L 」 で全音 
符を192とした場合の音長設定のことです。 
詳しくは BASIC マニュアルの M_TRK の 
項をどうぞ）〇 oct はオクターブスイツチの 
ことですが次の例を見ていただくと意味が 
わかると思います。 

例） 

( C < E —)48 

は 「 C 」 から ひとつ上の オクターブの 「 E -」 
まで，絶対音長48，つまり192/48= 4, 4 
分音符の長さで滑らかに変化させます。 
「く」を「>」に変えると 「 C 」 からひとつ 


下のオクターブの 「 E — 」までのピッチダウ 
ン，また，「,」にすると同じオクターブの 
「 E — 」までのピッチアップとなります。 
Ing は省略すると以前の 「 L 」 または 「@ L 」 
コマンドで設定したデフオルトの音長が使 
用されます。 oct は省略不可で，必ず 
「<>,」のいずれかを書いてください。ま 
たこのコマンドの後ろに「&」を書くこと 
によって「タイ」「スラー」が表現可能で 
す。 

例） 

( C , E ) 24& E 4. 


=n (モジュレーションスイ ツチ) 


後述するモジュレーション効果を有効に 
するか無効にするかのスイッチです。「= 
0」でオフ「=1」でオンです。「=」のあ 
との値を省略すると以前に与えたスイッチ 
の逆を実行します。「=1」のあとに「=」 
を実行したとすれはオフとなるわけです。 

このコマンドは ZMUSIC . FNC の内部ワ 
ークへスイッチを設定するだけで OPM 
DRV . Xfflj へはなにも出力しませんが「= 
1」の状態から「=0」と設定したときだ 
け，（標準に戻すという意味で）以前に 「K 
コマンド」で設定された「キーフラクショ 
ン」を書き込みます。 

例） 

=1 


A n!,spd,dly (モジュレーション） 


モジユレーシヨンのパラメータを設定し 
ます。 n , は振幅で0 Sr S 126が設定可能で 
す。63が半音に相当するので最大上下2半 
音分音の揺らぎを表現できます。 spd はモ 
ジユレーシヨンのスピードで1^ spd ^16 
の範囲で設定可能です。16がもっとも速く， 

図1 @ V と V の関係 


13前後が実用的な値です。 

最後のパラメータ dly はデイレイタイム 
で，どのくらいの時間をおいてからモジユ 
レーシヨンをかけ始めるかを設定できます。 
1 SdlyS 8の値が設定範囲となっており， 

1と設定すると音の鳴り始めから， 4とす 
ると音長の真ん中くらいからモジュレーシ 
ヨンがかかり始めます（図2)。 

パラメータは省略不可能ですが，デフオ 
ルトでは^15,14,4が設定されています0 

なお，このコマンドは「=」コマンド同 

様， ZMUSIC . FNC の内部ワークにパラメ 
ータを格納するだけで， OPMDRV . X へは 
なにも出力しません。 

例） 

^10,13,2 


@On 


Q コマンドというのが初めから用意され 
ているのは多くの方がご存じでしよう。こ 
れは，1音中で実際に音を出している時間 
を1/8〜8/8の割合で設定するものでした。 
@ Q はこの Q を細かく絶対音長の値で設定 
する命令なのですが，後ろから設定すると 
いうのが多少変わっています。 

いま， @ Q 10 を設定したとして，4分音符 
を鳴らしたとするとしましよう。 4分音符 
は絶対音長でいくと48です。発音時間は 
48- (@ Q で設定した値 10)=38 となりま 
す。つまり， @ Q で設定した音長分だけ発音 
を早く終えるというわけです。 

ただし，もし， @ Q で設定した値より音長 
が短い場合は @ Q は無効になります。たと 
えば @ Q 30 としたとき，8分音符（絶対音 
長 = 24) を鳴らしたとすると 24-30= — 6 
となって発音時間がなくなってしまうので 
はなく，音長分24まるまる発音するという 
ことです。 


V 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

II 

12 

13 

14 

15 

@v 

0 

87 

90 

93 

95 

98 

101 

103 

106 

109 

III 

1 14 

117 

119 

122 

125 


図 S DELAY の説明 


.音長 L (発音時間)- 


delay= 


2 3 4 5 6 7 8 


たとえば，ディレイ= 4なら，ここから 
モジュレーションがかかり始める 
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デフオルトでは0が設定されており ® Q 
は無効となっています。また， @ Q を使用す 
る場合は 「 Q 」 コマンドのほうは 「 Q 8」 と 
設定しておいてください。 

例） 

@ Q 10 

ZMUSIQFNC 麵上の鑛 

ZMUSIC . FNC を組み込むと， M _ TRK 2 
という命令が使用可能になるわけですが， 
標準の M _ TRK 命令同様にトラックバッフ 
ァの確保と，チヤンネルのアサインをして 
からでないと正常に動作しません。説明す 
るまでもないかと思いますがトラックパ、ッ 
ファの確保は M _ ALLOC ， チヤンネルアサ 
インは M _ ASSIGN で行います（詳細は 
BASIC マニュアルを 参照してください） 〇 
さて， M _ TRK 2 はチヤンネルのアサイン 
に関してひとつ制約があります。それは 


FM 音源のチヤンネル番号 ch( 1 〜 8 ) は必 
ずトラック番号 ch+ 8 Xn (n= 0 ,1, 

2,…… ) ヘアサインされていなくてはな 
りません0つまり， FM 音源のチヤンネル1 
〜8はトラック1〜8， 9〜16，17〜24， 
……ヘア サインされなくてはならないとい 
うことです。なんか，字で書くとたいそう 
な制約に見えますが，たいしたことはあり 
ません。多くの皆さんが普通に使っている， 
for i =l to 8 : m_alloc ( i ， 500 0) 

: m_assign ( i ， i ) : nest 
でいいわけですから。 

初めに断ったように ZMUSIC . FNC は新 
しく設けたコマンドを従来の MML に展開 
する「アセンブラ」のマクロ的な動作をし 
ます。命令詳細のところでいくつかの命令 
について は どんな MML に 展開され るのか 
を示しておきましたが，ここでは 「ポルタ 
メン ト」と「モジュレ ーシ ヨン」 について 
詳しく説明したいと思います。 


•ポルタメント 

ポルタメントはリスト3に示す BASIC 
プログラムのようなアルゴリズムのもとで 
MML を生成します。基本的に 「@ L 1」つ 
まり絶対音長「1」で，目的の音程までキ 
ーフラクションを駆使して滑らかに音程を 
変化させる MML をはき出すのです。 

リスト3中央に「経験的処理」というコ 
メントがありますが，これはたとえば ， 「Cj 
から 「 D 」 へのポルタメントのように，2つ 
の音程がさほど離れていないときなど，絶 
対音長「1」で MML をはき出すには及ばな 
い（つまり，そんなに細かい精度を必要と 
しない）場合，絶対音長2以上を用いて掃 
き出すようにプログラムを制御する部分で 
す。 

具体的には2つの音程が半音以内の場合 
は 「@ L 4」， 2半音以内の場合は 「@L 
3」，3半音以内の場合は 「@L 2」で MML 
を生成します。生成した MML の後ろに必 
ず「デフオルト」の音長を出力するのでュ 
ーザーはいちいち音長を再設定する必要は 
ありません。 

( C < E ) 

のように2つの音階の間にオクターブコマ 
ンドを揷入することによって1オクターブ 
以上のポルタメントも可能になるのは前に 
お話ししたとおりですが，このコマンドの 
実行後デフオルトのオタターブ値も変化し 
ます。たとえば， 

04 ( C < E ) 

を実行するとオクターブは「5」になるわ 
けです。 

リスト3は， 

( C > A ) 48 

を実行した場合とほぼ同じ MML を画面に 
出力します。 

•モジュレーション 

リスト 4 が ZMUSIC.FNC のモジュレー 
ションアルゴリズムを BASIC で表したも 
のです。モジュレーションは，必ず絶対音 
長 「@ L 1 j で展開されます。リスト 4 は， 
八 32,10 ， 1=1 B4 

のときの MML とほぼ同じものを画面に表 
示します。 

リスト4では @ L 1 でズラーッと音符を 
書いていますが ZMUSIC . FNC ではモジュ 
レーションの周期を自動的に計算し「| :」 
「： |」の繰り返しコマンドを用いて 
MML の-短縮化を行います。 

次にデイ レイ の パラメータ はどう MML 
に反映されるのかを説明します。面倒臭い 
話は嫌いだという人は図2さえ理解してお 
いてくれれば，これから話すことは読み飛 


リスト3ポルタメントテスト 

10 ノ*ボルタメントテストブログラム 
20 float 1=48 

30 float kf =0 /*detune 

40 str q="c",cm= M >",r="a" 

50 str k{12} = {"c” ， "c+",”d” •”d+","e" ， "f" ， ,, f+","g" ， "g+ n ,"a” ， ”a+ 
,"b","<c H }，ti 

60 float a,n=0,y,s,b,ll f sg,bs,be 
70 int lw,ch=0 /*ch=channel 

80 wl=<instr<1,"c c+d d+e f f+g g+a a+b",q)+1)/2 
90 w2=(instr(1, M c c+d d+e f f+g g+a a+b",r)+1)/2 
100 if cm= M >" then w2=w2-12 
110 if cm=" く ” then w2=w2+12 
120 ba=kf:be=abs(w2-wl)*63+kf 
130 sg=sgn(w2-wl) 

140 b=abs(be-bs) 

150 11=1:lw=l:ti="" 

160 if 1>15 then { /* 経験的処理 

165 ti="&" 

170 if (1 rood 2)=0 and b く 192 then ll = 2:lw=2 
180 if (1 mod 3)=0 and b<128 then ll=3 ： lw=3 
190 if (1 mod 4)=0 and b く 64 then 11 = 4 ： lw=4 
200 } 

210 wl=wl-l 

220 if ag<0 then wl=wl-l : y=63+kf else y=bs 
230 if y>63 then y=y-63:wl=wl+1 
240 if wl く 0 then wl=11:print; 

250 if wl>11 then wl=0 
260 print"@L ,, +str$(ll); 

270 if 1-1=0 then print"error" : end 
280 a=int(b/(l-l)) 

290 a=int(256*(b mod (1-1))/(1-1)) 

310 for i=l to1 

320 lw=lw-l : if lw=0 then lw=ll : prt() 

330 n=n+a 

340 if n>255 then y=y+sg : n=n-255 
350 y=y+s 本 sg 
360 next 

365 if then print chr$(&H1D)+" M 

370 end 

380 func prt() 

390 if y>63 then y=y-63 : wl=wl+1 
400 if y<0 then y=y+63 : wl=wl-1 
410 if wl<0 then wl=l1:print">"； 

420 if wl>11 then wl = 0 : print"<"； 

430 if y<>63 then print"y";str$(48+ch);",";str$(y*4);k(wl )； ti ； 
else print"y";Btr$ < 48+ch);",0";k(w1+1);ti; 

440 endfunc 


図 3 U スト 3 の実行例 

>@L2 y 48,236 b&y 48,204 b&y48,172b&y48,140b&y48,108b&y48,76b&y48,44 
b&y48,12b&y48,232a+&y48,200a+&y48,168a+&y48,136a+&y48,104a+&y48, 
72a+&y48,40a+&y48,8a+&y 48,228 a&y48,196a&y48,164a&y48,132a&y48,10 
0a&y48,68a&y48,36a&y48,4a 
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ばしていただいて結構です。 

音長 L をまず8で割りそれをディレイの 
パラメータ値から1引いたものと掛け合わ 
せ，これをディレイの音長とします。この 
音長を 「@ L 」 コマンドで書き，その後ろに 
与えられたキーコードを書きます。あとは， 
リスト4のような 「@ L 1 j のモジュレーシ 
ョン MML 部分が〈る，という寸法です。少 
しわかりにくいと思うので具体例を用いて 
もう一度説明します。いま， 

"15,14,4 =1 C 4 

を M _ TRK 2 を使ってセツトしたとしまし 
よう 0 「C 4」が モジュレーション として 展 
開されることになるわけですが，この音符 
の音長は4分音符，つまり絶対音長48です。 
この48を8で割ります。48/8 二 6。 モジ ュ 
レー ションパラメータのデイ レイとして4 
が与えられています力 5 '，これから1を引き 
ます。4 — 1 = 3。 この 3 と先ほどの6を 
掛けた 3 X 6 =18が ディ レイ音長となりま 
す。つまり， 

@ L 18 C & | : n . ••モジュレーション 
展開部…：| 

となります 0 モジュレーションとして展開 
された部分は絶対音長に換算して30となっ 
ているはずです。これで18 + 30 = 48，4分 
音符分無事演奏されるわけです。 

モジュレーションをオンに すると MML 
を使用するうえでひとつ制約が出てきます。 
それは 「 I :」 「 ： | j を使用した繰り返し 
コマンドが使用できなくなる ということで 
す。 これはすでに モジュレーションの 展関 
部分で 「I :」「： |」 を 用いてしまってい 
るためで，多重 ループの できない繰り返し 
コマンドを持つ OPMDRV.X を 使う以上し 
かたのないことです。つまり， モジュレー 
ション • オンの状態で， 

I ： C :| 

とすると，これを展開すると， 

| : | :…モジュレーション展開部 

…：| : | 

となり外側の「丨：」「： I 」は無視されてし 
まうのです。 

ならば，繰り返し部分も展開してしまえ， 
という人もいることでしよう。つまり， 

| : CDE : | 

なら， 

CDE CDE 

と，してしまえということですね。それは 
私も考えたのですが， OPMDRV . X に対し 
て一度文字列を送ってしまうともう，それ 
っきりで，外部関数側からは操作すること 
ができないのです。このため複数の文字列 
に渡った「繰り返し」が再現不可能となっ 


てしまいます。 

また，この モジュレーションは 極端にバ 
ッファを食うため上のように展開したとす 
ると，まず，アっという間にトラックバッ 
ファが一杯になり，まず実用になりません。 
これらの理由から モジュレーション.オン 
のとき は 「 I :」「： |」を使用できませ 
ん。ご了承〈ださい。 

トラック八ッファについて 

さて，繰り返し言ってきたとおり，この 

2 つのマクロコマンド，「ポルタメン ト」と 
「モジュレーション」はいずれも微小音長 
の MML に変換するため，多用するとかな 
りトラ ックバ、ッファを 消費します0多用す 
るときは普段より多くトラック バッファを 
確保しましよう。また，いくらトラックバ 
ッファを 多〈取りたいといっても OPM 
DRV . X の 登録 時にその マキシマム はすで 
に決定されていますから，どうしても，も 
つと！というときは CONFIG.SYS を 書き 


換え，システムをもう一度立ち上げ直すし 
かありません。初心者のために具体的に示 
すとしましよう。 

A>ED CONFIG.SYS 
として，エディタに CONFIG . SYS を読み込 
んで〈ださい。画面に， 

FILES =15 
BUFFERS = 20 
BELL = BEEP.SYS 
DEVICE = PRNDRV.SYS 

と出てくるはずです。画面から 「 DEVICE 二 
¥ SYS ¥ OPMDRV . X 」という1行を探し出 
して〈ださい。見つけたら OPMDRV . X の 
後ろに「#」を書いてさらにその後ろに希望 
するトラックバッファの容量を記述してく 
ださい。 180 K バイトなら， 

DEVICE = ¥ SYSYOPMDRV.X #180 
とします。変更したら [ ESC ]+ [ E ] でェ 
ディタを終了してください。あとはリセッ 
トスイツチを押してシステムを立ち上げ直 
せば OK です。 


リスト4モジュレーションテスト 

10 /* モジュレーションテストプログラム 

20 str 〇 (15) = { __b-" ， "b" ， ，， c” ， ”c+ n ， ” d” ，” d + ” ， ”e" , ”f ” ， 

30 ”f+ ， . ， ” g" , ” g+” ， ”a" , ”a+" ， "b" ， "c” ， ”c” } 

40 str k="b" 

50 float a,b,sw,sg=1 
60 int nl = 32 /* 振幅 
70 int spd=10 ノ本 speed 

80 int lg=48 /^length 

90 int oct=0,ch=1 /^channel 
100 wl=(instr(1,"c c+d d+e f f+g g+a a+b",k)+l)/2+1 
110 kf = 0 /*detune 

120 spd=17-spd : if spd=0 then print"error" 

130 a=nl/spd 
140 b=kf 

150 ml=nl+kf / 本上限 
160 m2 = -nl+kf / 本下限 
170 print”@Ll"; 

180 for i=l tolg 
190 prt() 

200 b=b+a*sg 

210 if b>ml or b<m2 then sg=-sg:b=b+a 本 sg 本 2 
220 next 

230 if oct=-l then print” ぐ ’ else if oct=l then print">" 

240 end 

250 func prt() 

260 n=0:bb=b 
270 if bb>0 then { 

280 while bb>63 
290 bb=bb-63:n=n+1 
300 endwhile 
310 } else { 

320 while bb<0 
330 bb=bb+63 : n=n-1 
340 endwhile } 

350 print "y” ； str$(48+chstr$(bb*4}; 

360 if wl+n<2 and oct< >-1 then print"oct=-l 
370 if wl+n>13 and oct<>1 then print"<";:oct=l 
380 if wl+n>1 and oct=-l then print "<" ； :oct=0 
390 if wl+n<14 and oct=1 then print ">" ； :oct=0 
400 print o(wl+n); 

410 endfunc 


図 4 リスト 4 の実行例 

@L1 y49,0by49,16by49 , 32by49,48by49,64by49,80by49,96by49,112by49, 
128by49,112by49,96by49,80by49,64by49,48by49,32by49,16by49,0by49, 
236a+y 49,220 a+y 49,204 a+y49,188a+y49,172a+y49,156a+y49,140a+y49,1 
24a+y49,140a+y49,156a+y49,172a+y49,188a+y49,204a+y49,220a+y49,23 
6a+y49,0by49,16by49,32by49,48by49,64by49,80by49,96by49,112by49,1 
28by49,112by 49,96 by 49,80 by 49,64 by 49,48 by 49,32 by49,16b 
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CHO CHI CH2 CH3 CH4 CH5 CH6 CH7 


20„ 2I„ 22„ 23„ 24„ 25„ 26„ 27 H 

R 

し 

FEED BACK 

ALG 

28„ 29 h 2A„ 2B„ 2Q, 2D H 2E,, 2F„ 

/ 

KEY CODE 


D7 Dg D5 D 4 D3 D2 Dj Do 


30 h 3 Ih 32 h 33 h 34" 35 h 36|! 37 h 


FRACTION 


M_TRK と M_T 闩 K2 

M_TRK と M _ TRK 2 は共存が可能です。 
ですから，たとえば，あるチヤンネルはマ 
クロコマンド は使わないから M_TRK のみ 
を使い，また別のチヤンネルは M _ TRK 2 で 
がりがり MML を セッ トするといったこと 
が可能なのです0しかし，同ーチャンネル 
を M _ TRK ， M _ TRK 2 をとっかえひっかえ 
シーケンス することは避けてください。 

ォマヶ 

ZMUSIC.FNC を組み込むと， M . TRK 2 
のほかに] VLSWITCH という命令も使用で 
きるようになります。これは「おまけ」に 
付けたコマンドで， M _ TRK 2 命令にセット 
した MML をファイルに書き出すためのス 
ィッチ命令です。 

M 一 SWITCH (1) 

とすると，以後， M _ TRK 2 にセットされた 
文字列や，マクロ コマンド によって展開さ 
れた文字列がカレントドライブのカレント 
デイレクトリに ZMUSIC . TMP というファ 
イル名で書き出されます。当然のことなが 
らディスクやドライブの準備ができていな 
いとエラーになります。出力されるファイ 
ルは 「 OPM ファイル」フォーマットに準拠 
しており，エディタや COMMAND . X の 
TYPE コマンドで見ることができます。こ 
のスイッチを用いた完全な 「 OPM ファイ 
ル」の作り方は別項を参照してください。 

サンプルプログラム 

サンプルプログラムとして，セガ•メガ' 
ドライブのゲーム「スー ノぐ 一忍」のメイン 

テーマ 「THE SHINOBIj をお届けしま 
す。作曲は 「イース」「ソーサリアン」「ス 

キーム」 「ボスコ ニ アン」 と次々に 名曲 

を生みだすスーパーコンポーザー古代祐三 
氏によるものです。 

ZMUSIC . FNC を組み込んだ BASIC を立 
ち上げてからリスト7を入力， RUN で実行 
してください〇「トラックバッファが足りま 
せん」といったエラーが発生した場合には 
前述した CONFIG . SYS を書き換える方法 
でトラックバ、ッファを大きくした OPMDRV . 
X を再起動してから実行してください。 

* 

ZMUSIC . FNC はミュージックプログラ 
ムを入力する人の立場，制作する人の立場 
に立って作られたものなのですが，大きな 


問題があります。それは，この ZMUSIC . 
FNC を入力しなくてはその恩恵にあずか 
ることができない点です（当たり前だな 
……)〇また，今後，この ZMUSIC . FNC を 
使用したミュージツクプログラムが Oh!X 
LIVE の コーナーに 投稿され，発表された 
としたら，当然のことながら ZMUSIC . 

図5 FM 音源レジスタマップ（参考） 

レジスタマップ (oo h 〜 if h ) 


FNC を持っていない人，今月号を持ってい 
ない人は，そのプログラムを実行できませ 
ん。これは ミュージックデータに 関する 
Oh!X の最大の テーマ 「ミュージックデータ 
の共有性」から大きくそれるものとなりま 
す。この辺については読者の皆さんのご意 
見を聞きたいところです……。 


(20„〜 FF „) 
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AMS-EN 


7H7HFHF,, 
4 5 4 5 

6 6 Ul E 
4 5 4 5 

5„5„D„D„ 
4 5 4 5 

4h4,,c,«c„ 
4 5 4 5 

3 3 B B 

4 5 4 5 

2H2HAHAH 
4 5 4 5 

H H H H 

4 5 4 5 

0M0H8H8H 

4 5 4 5 


7H7HFHFH 
6 7 6 7 

6 6 E E 
6 7 6 7 

5H5HDHDH 
6 7 6 7 

4H4HCHCI, 
6 7 6 7 

3 3 B B 
6 7 6 7 

2H2HAHAH 
6 7 6 7 

H H H H 

6 7 6 7 

0H0H8H8H 

6 7 6 7 


7H7HFHFH 
8 9 8 9 

6 6 Li E 
8 9 8 9 

5h5„d,id„ 
8 9 8 9 

4H4HCHCI. 
8 9 8 9 

0*5* B B 
8 9 8 9 

2„2ha,,a„ 

8 9 8 9 

H H H H 

8 9 8 9 

0 0 8 8 
8 9 8 9 


7H7HFHF,, 
A B A B 

6 E E 
A B A B 

5H5HDHD,, 
A B A B 

A4HB4HACHBCH 

3 B B 
A B A B 

2h2„ 、 ja„ 
A B Aa 

UIH 9H9H 
A B A B 

0H0H8H8H 

A B A B 


C7HD7HCFHDFH 

06 ,, 06„孟 

C5HD5HCDHDDH 

SHE 

C3HD3HCBHDBH 
02 „ 02 „ 50 ;:" 

H H H H 

c D c D 

C0HD0HC8HD8H 


E7WF7HEFHFFH 

E6„F6HEE,,FE,, 

E5HF5HED.,FD„ 

E4„F4„EC,,FC,, 

3 3 B B 
E F E F 

—H H H H 

E E E F 

0H0H8H8H 
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0288 

0290 

0298 

02A0 

02A8 

02B0 

02B8 

02C0 

02C8 

02D0 

02D8 

02E0 

02E8 

02F0 

02F8 


SUM: 

0300 

0308 

0310 

0318 

0320 

0328 

0330 

0338 

0340 

0348 

0350 

0358 

0360 

0368 

0370 

0378 


SUM ： 

0380 

0388 

0390 

0398 

03A0 

03A8 

03B0 

03B8 

03C0 

03C8 

03D0 

03D8 

03E0 

03E8 

03F0 

03F8 


SUM ： 

0400 

0408 

0410 

0418 

0420 

0428 

0430 

0438 

0440 

0448 

0450 

0458 

0460 

0468 

0470 

0478 


SUM: 

0480 

0488 

0490 

0498 

04A0 

04A8 

04B0 

04B8 

04C0 

04C8 

04D0 

04D8 

04E0 

04E8 

04F0 

04F8 


0180 

0188 

0190 

0198 

01A0 

01A8 

01B0 

01B8 

01C0 

01C8 

01D0 

01D8 

01E0 

01E8 

01F0 

01F8 


0080 

0088 

0090 

0098 

00A0 

00A8 

00B0 

00B8 

0000 

00C8 

00D0 

00D8 

00E0 

00E8 

00F0 

00F8 


SUM ： 

0100 

0108 

0110 

0118 

0120 

0128 

0130 

0138 

0140 

0148 

0150 

0158 

0160 

0168 

0170 

0178 


SUM ： 

0580 

0588 

0590 

0598 

05A0 

05A8 

05B0 

05B8 

05C0 

05C8 

05D0 

05D8 

05E0 

05E8 

05F0 

05F8 


SUM ： 

0600 

0608 

0610 

0618 

0620 

0628 

0630 

0638 

0640 

0648 

0650 

0658 

0660 

0668 

0670 

0678 


SUM ： 

0680 

0688 

0690 

0698 

06A0 

06A8 

06B0 

06B8 

06C0 

06C8 

06D0 

06D8 

06E0 

06E8 

06F0 

06F8 


SUM ： 

0700 

0708 

0710 

0718 

0720 

0728 

0730 

0738 

0740 

0748 

0750 

0758 

0760 

0768 

0770 

0778 


0510 14 FC 

0518 38 84 

0520 10 2B 

0528 3E 05 
0530 66 04 

0538 01 B4 

0540 6F 02 
0548 0E 12 
0550 019C 

0558 FF CC 
0560 12 00 

0568 1411 

0570 14 3C 

0578 00 2B 


SUM: EB F913ID 79 F4 2F AB 


SUM ： 48 55 01 0A 00 00 17 E6 


リスト 5 ZMUSIC.FNC ダンプリスト 


(6424バイトでセーブ) 


BC 

F1 

5A 

ED 

69 

14 

D8 

4B 

3F 

4A 

8C 

00 

3F 

3E 

00 

2D 


0000 48 55 00 00 00 00 00 00 
0008 00 00 00 00 00 00 17 84 
0010 00 00 00 00 00 00 00 00 
0018 00 00 0154 00 00 00 00 
0020 00 00 00 00 00 00 00 00 
0028 00 00 00 00 00 00 00 00 
0030 00 00 00 00 00 00 00 00 
0038 00 00 00 00 00 00 00 00 
0040 00 00 00 6C 00 00 00 A6 
0048 00 00 00 E2 00 00 00 E2 
0050 00 00 00 E2 00 00 00 A6 
0058 00 00 00 E2 00 00 00 E2 
0060 00 00 00 40 00 00 00 52 
0068 00 00 00 64 00 00 00 00 
0070 00 00 00 00 00 00 00 00 
0078 00 00 00 00 00 00 00 00 


SUM ： 

AD 

05 

07 

C2 

55 

37 

CA 

C2 

A5AC 

0500 

14 

FC 

00 

40 

14 

FC 

00 

4C 

: AC 

0508 

10 

2B 

00 

03 

61 

00 

06 

46 

: EB 


SUM ： 

26 

E9 

5A 

EA 

17 

7E 

D5 

FD 

03EC 

0780 

63 

00 

05 

10 

60 

08 

16 

2B 

: 21 

0788 

00 

01 

02 

43 

00 

FF 

33 

C3 

: 3B 

0790 

00 

00 

0E 

02 

61 

00 

03 

46 

: BA 


SUM: 

D3 

8F 

65 

30 

43 

48 

2A 

BA 42E9 

0200 

00 

71 

67 

44 

0C 

01 

00 

28 

51 

0208 

67 

00 

04 

EE 

0C 

01 

00 

5E 

C4 

0210 

67 

00 

00 

F8 

0C 

01 

00 

7E 

EA 

0218 

67 

00 

00 

A8 

0C 

01 

00 

5F 

7B 

0220 

67 

00 

00 

A0 

0C 

01 

00 

3D 

51 

0228 

67 

5A 

0C 

01 

00 

5B 

67 

44 

D4 

0230 

14 

Cl 

66 

00 

FF 

6C 

43 

F9 

E2 

0238 

00 

00 

13 

84 

53 

8A 

95 

C9 

D2 

0240 

23 

CA 

00 

00 

0E 

1A 

4E 

75 

D8 

0248 

52 

89 

61 

00 

08 

60 

67 

00 

0B 

0250 

0A 

46 

61 

00 

09 

58 

17 

43 

6C 

0258 

00 

03 

66 

00 

FF 

44 

14 

FC 

BC 

0260 

00 

40 

14 

FC 

00 

4C 

70 

00 

0C 

0268 

10 

2B 

00 

01 

61 

00 

08 

E6 

8B 

0270 

60 

00 

FF 

2E 

14 

Cl 

12 

19 

8D 

0278 

14 

Cl 

0C 

01 

00 

5D 

66 

F6 

9B 

SUM ： 

1A 

54 

37 

23 

21 

D6 

0F 

4F 1149 

0280 

60 

00 

FF 

IE 

61 

00 

08 

26 : 

: 0C 


B 318 FBE1 4115 D06 
0E82D04A12C92CB 


BA 0003063 B 23326 
E 003010 E 4200005 


WF 6761601109 D< 


06600006071664 


>F0F0F 00070 t 


0601016766707 « 


-FD0EF 6000661 


1112112977893 E3A 
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6 

B 

5 

B 

B 

B 

EC 

8 
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8 

c 


500C0AF3D 60173 BA 
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J200C3050CF0F 881 


40CA00B3045B6403 
001F 012000772000 
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0 C 
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C 
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7 
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7 

2 

5 
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特集 ZMUSIC.FNC 103 

































0D00 

0D08 

0D10 

0D18 

0D20 

0D28 

0D30 

0D38 

0D40 

0D48 

0D50 

0D58 

0D60 

0D68 

0D70 

0D78 


SUM ： 

0D80 

0D88 

0D90 

0D98 

0DA0 

0DA8 

0DB0 

0DB8 

0DC0 

0DC8 

0DD0 

0DD8 

0DE0 

0DE8 

0DF0 

0DF8 


SUM ： 

0E00 

0E08 

0E10 

0E18 

0E20 

0E28 

0E30 

0E38 

0E40 

0E48 

0E50 

0E58 

0E60 

0E68 

0E70 

0E78 


0A80 

0A88 

0A90 

0A98 

0AA0 

0AA8 

0AB0 

0AB8 

0AC0 

0AC8 

0AD0 

0AD8 

0AE0 

0AE8 

0AF0 

0AF8 


SUM ： 014B 5A 9D CB 5A 919C 


SUM ： DD 3B 14 4190 4D 50 EC 


SUM ： 3136 8E IF 9C D0 1C 84 

0C80 13 C0 00 00 12 3D E0 48 
0C88 13 C0 00 00 12 3C 70 33 
0C90 60 20 70 32 60 1C 70 31 
0C98 60 18 41 FA 01 C2 2140 
0CA0 00 06 4E 75 4A B9 00 00 
0CA8 0E 34 6A 04 70 09 60 02 
0CB0 4E 75 2E 79 00 00 0E 14 


SUM ： 

0B80 

0B88 

0B90 

0B98 

0BA0 

0BA8 

0BB0 

0BB8 

0BC0 

0BC8 

0BD0 

0BD8 

0BE0 

0BE8 

0BF0 

0BF8 


SUM ： 

0C00 

0C08 

0C10 

0C18 

0C20 

0C28 

0C30 

0C38 

0C40 

0C48 

0C50 

0C58 

0C60 

0C68 

0C70 

0C78 


00 

00 

0A 

6F 

C3 

35 

A7 

01 

67 

B9 

0F 

61 

C3 

12 

73 

DF 


0CB8 

0CC0 

0CC8 

0CD0 

0CD8 

0CE0 

0CE8 

0CF0 

0CF8 


SUM：12 33 48 28 D8 9D C3 B7 

0B00 60 00 F6 9E 14 Cl14 D9 
0B08 48 E7 0140 61 00 00 9E 
0B10 17 83 60 00 4C DF 02 80 
0B18 60 00 F6 8614 FC 00 79 
0B20 618A 66 06 76 00 1613 
0B28 60 0E 61 00 00 80 0C 03 
0B30 00 3F 62 00 016216 83 
0B38 E5 0B 70 00 10 39 00 00 
0B40 0D 68 D0 3C 00 30 61 0C 
0B48 14 FC 00 2C 20 03 61 04 
0B50 60 00 F6 4E 48 E7 88 00 
0B58 42 39 00 00 0D 66 28 3C 
0B60 00 00 2710 02 80 00 00 
0B68 FF FF 80 C4 4A 39 00 00 
0B70 0D 66 66 0C 4A 00 67 0E 
0B78 13 FC 00 FF 00 00 0D 66 


0A28 E5 08 
0A30 00 00 

0A38 D1 C0 
0A40 00 01 

0A48 14 C0 

0A50 67 04 

0A58 4E 75 
0A60 41 F9 

0A68 6118 

0A70 0D AC 
0A78 02 08 


0E80 

0E88 

0E90 

0E98 

0EA0 

0EA8 

0EB0 

0EB8 

0EC0 

0EC8 

0ED0 

0ED8 

0EE0 

0EE8 

0EF0 

0EF8 


SUM ： 

0F00 

0F08 

0F10 

0F18 

0F20 

0F28 

0F30 

0F38 

0F40 


SUM ： 9C 93 9D CC 5F 72 9F 05 5B73 


SUM ： 

0980 

0988 

0990 

0998 

09A0 

09A8 

09B0 

09B8 

09C0 

0908 

09D0 

09D8 

09E0 

09E8 

09F0 

09F8 


SUM ： 

0880 

0888 

0890 

0898 

08A0 

08A8 

08B0 

08B8 

08C0 

08C8 

08D0 

08D8 

08E0 

08E8 

08F0 

08F8 


卜「ギュイィィイイ……ン」と見事にポルタメントのかかった音は，ハードディスクがク 

ラッシュしたときの音です（これで2台目）。 溝口信太郎 （20) 愛知県 


SUM ： 

F4 

8D 

9B 

4F 

45 

E6 

A7 

40 

996B 

0A00 

66 

24 

14 

FC 

00 

30 

41 

F9 

: 04 

0A08 

00 

00 

0D 

C6 

30 

06 

52 

00 

: 5B 

0A10 

D0 

00 

D1 

C0 

14 

E8 

00 

00 

: 5D 

0A18 

10 

28 

00 

01 

0C - 00 

00 

20 

: 65 

0A20 

67 

28 

14 

C0 

60 

24 

10 

03 

: FA 


1〇4 Oh!X 1990.10. 


SUM ： 

4D 

FC 

75 

2A 

56 

06 

6F 

BC 8B42 

0900 

FF 

DA 

38 

BC 

FF 

FF 

4A 

39 

4E 

0908 

00 

00 

0D 

67 

66 

24 

4A 

39 

81 

0910 

00 

00 

0D 

7A 

67 

04 

53 

8A 

CF 

0918 

60 

18 

14 

FC 

00 

79 

14 

FC 

11 

0920 

00 

38 

14 

FC 

00 

2C 

70 

00 

E4 

0928 

10 

39 

00 

00 

0D 

68 

61 

00 

IF 

0930 

02 

24 

14 

FC 

00 

40 

14 

FC 

86 

0938 

00 

4C 

70 

00 

10 

2B 

00 

01 

F8 

0940 

61 

00 

02 

12 

10 

39 

00 

00 

BE 

0948 

0D 

69 

67 

10 

0C 

00 

00 

3E 

37 

0950 

67 

06 

14 

FC 

00 

3E 

60 

04 

IF 

0958 

14 

FC 

00 

3C 

61 

0A 

60 

00 

17 

0960 

F8 

40 

02 

3C 

00 

FB 

60 

04 

D5 

0968 

00 

3C 

00 

04 

48 

E7 

FF 

FF 

6D 

0970 

43 

F9 

00 

00 

13 

84 

67 

0C 

46 

0978 

20 

4A 

91 

C9 

B1 

FC 

00 

00 

71 


0798 

07A0 

07A8 

07B0 

07B8 

0700 

07C8 

07D0 

07D8 

07E0 

07E8 

07F0 

07F8 


0C 11 
0D 67 
61 00 
61 00 
66 06 
0C 02 
00 0C 
6B 04 
74 FF 
00 3F 
6A 02 
00 00 
63 6A 


00 26 
66 02 
02 B0 
02 A8 
98 3C 
00 3C 
1213 
74 01 
02 44 
D8 41 
44 05 
0E 0A 
30 03 


57 F9 
52 89 
2C 04 
0C 02 
00 0C 
66 04 
98 06 
60 04 
00 FF 
3A 04 
33 FC 
0C 43 
02 40 


00 00 
30 01 
30 05 
00 3E 
60 0A 
D8 3C 
4A 04 
44 04 
C8 FC 
9A 41 
00 01 
00 0F 
00 01 


93 

E8 

78 

57 

B6 

C8 

ID 

90 

7C 

71 

E5 

76 

43 


SUM ： 5C 3B F9 F8 7B 2B D414 40A2 


0800 

0808 

0810 

0818 

0820 

0828 

0830 

0838 

0840 

0848 

0850 

0858 

0860 

0868 

0870 

0878 


6618 0C 
33 FC 00 
13 FC FF 
60 4A 20 
FF FF 80 
FF FF 00 
00 80 64 
00 00 0E 
00 00 0D 
02 40 00 
00 40 64 
00 00 0E 
00 00 0D 
16 014A 
D6 3C 00 
6F 06 96 


45 00 C0 
02 00 00 
FF 00 00 
03 02 80 
FC 00 03 
00 6618 
12 33 FC 
13 FC 
60 IE 
6616 
33 FC 
13 FC 
7A 61 00 
02 6A 06 
3F 0C 03 
3C 00 3F 


0A 

7A 

03 

10 

0A 


6412 
0E 0A 
0D 7A 
00 00 
02 80 
0C 45 
00 03 
FF FF 
30 03 
0C 45 
00 04 
FF FF 
00 FC 
53 06 
00 3F 
52 06 


05 

49 

94 

4F 

FF 

CD 

28 

25 

38 

12 

E7 

25 

E4 

2C 

9F 

DE 


0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
¢5 

0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
¢3 

00C8EA2EE82AE06E 

00F359DF258AD036 

00EFFFFF 00000111 
0000000011111111 

0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 

0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 

00097 D 759 ID 751 BF 
000147 BE1469CF14 

000FFFKF 00000011 

0 0 0 0 0 ilIX 11± IX 1A IX X 


4B07C04F00F05E1F 
0F 04330 F0C527B35 

20c 000201020 E002 

5000006060204012 

ACF0519C 901160 A2 
03D 07133000 1F060 

720CEC00F00C01D0 

6000400020006600 

860A05151C 0699 
5F 000717 C34C80 

0625AECE 40762 F07 
B 606440412 IF 5201 

50514 FA1 54304190 
71740 F017EC00CF0 

EAE0205AE 0006430 
4440606440866143 


0 o 

0 4 


9 . — ： 

c 4F01D030E 2787786 

4 

3 

0 

F 

7 4FAC0F006E0000FE 
6 IF 440290 D 40000 F0 


0 0 6 6 
3 0 D 0 


c 590 A 9909 CEO 
F 71008 F 03370 


C0A 6510 ECFF05E00 
38067100 FI 08710 c 


^0407602044600 


JBCADE35DDE87 


DC2929F9080A0FA2 
7F0253E 301800133 


>F 3001813 E 00833 

F04F00EA^EFF 00800 
F01F 000403470566 

C980C90A 04049 D75 
FF20F 70008413133 

3501580003 FBFF00 
140694000 1F63F77 


>E 9279503 < 


26270 D 2040 B0000D 
AD27D 57050222222 


*156020444444 


^00056040444044 


)BF 5906750022222 

1112205 A 50047247 
1111106750044444 


E 460E4602E 000000 B 
E 3ABA3AB 960000004 


00CQ300B 00000000 C 
222422220000000c 


122222200000009 


*044440000008 


4591 DB300 
0F0D39E00 


0 

^20000000 

0486CC700 

8D369CE00 

51EEEEE00 
E 60000000 

0F 0000000 
8F 0000000 

> 0000 ¢ 

3 7 0 0 0c 


F8EEEE000* 
204000100 


B 6F756ED9E4B 29541 
D B6A6F59A1C55BCA8 
5 

0 . 


2F03FFB 910 C9EC4A 
9EB0A 025301552 F0 


1556 E 05184 A 
BAC9DE 45203 


9082AFA000A 
F 0207180008 

1007 D0D 806 D 
4D1 60207060 

860006029 C0 
20020209 F 00 

X 0 o1IX 0 

03000000460 

02809 C80E09 
09E03FC0007 

1D4CA 430780 
60104120672 


4 7Tx 
F 8 C 


904B 888857 F8988D 

A 73609 D23EC1DC34 
AB 89088988886 D89 


> c B 8 8 8 6 8 

853223352260 B 
EC 88898898905 


AB8383 


783D2500F322A513 
7F 88894488888 CF8 

E c 7 丨 
8 8 6 - 


4 148 FA32AC 
1 09128 B3D5 


872206826 

F9880DF89 

CA8A7ACC6 

87EAB886B 


F 22CB8A22B 
E 88CEE8886 


6 72DDB730EE0BD25A 
8 A799D684D0A 63338 
D 


丄 130FFD 03300 C 

2 2EA105CC06AC 401 c 
7 404674400 D 601760 

4 00C66F50C66E 098 c 
F 30000 F 7030030762 

E 50E72FEF6AA0C0D0 
0 60067 F 4296407000 

D 0A0C6F 45636 C6C0C 
F 6C070D 87000 F0F0F 


7CCDE83B 7 IF 9595 c 
5CDC71C3DD096ECA 

C2CA 050044 A0A17F 
F0F 0000000000000 

4F4E 022002 E1E601 
1610038025060 D05 

BB0090F4020A027F 
004030 F8C 0000001 

C0000EF 28706062 E 
700033 F 086060 D03 

66c 92004 c 0959286 
00F3B 40484303006 

9 Ac 4023081 AA3A 471 

8 60130504 E 4353666 

B 6E0C 0211 F 020 A 472 

9 03040080 F4C0D000 


F 

E 

c 

6 

7 

c 

9 

F 
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B9 82 FI 00 8C 
95 D4 82 B5 82 
82 AA 96 B3 8C 
82 B7 00 8C 4A 
D4 82 B5 94 D4 
CC 8E 77 92 E8 
A0 82 E8 82 DC 
FI 00 8C 4A 82 

82 B5 94 D4 8D 
8E 77 92 E8 82 
8C F8 82 C5 82 
49 83 4E 83 5E 
75 82 CC 94 D4 
AA 82 A0 82 E8 
B9 82 FI 00 83 

83 5E 815B 83 


0F80 

0F88 

0F9C 

0F98 

0FA0 

0FA8 

0FB0 

0FB8 

0FC0 

0FC8 

0FD0 

0FD8 

0FE0 

0FE8 

0FF0 

0FF8 


SUM ： 

1000 

1008 

1010 

1018 

1020 

1028 

1030 

1038 

1040 

1048 

1050 

1058 

1060 

1068 

1070 

1078 


SUM ： 

1080 

1088 

1090 

1098 

10A0 

10A8 

10B0 

10B8 

10C0 

10C8 

10D0 

10D8 

10E0 

10E8 

10F0 

10F8 


SUM ： 

1100 

1108 

1110 

1118 

1120 

1128 

1130 

1138 

1140 

1148 

1150 

1158 

1160 


SUM ： E3 84 0E 5A 46 0314 02 


0F48 

0F5O 

0F58 

0F6O 

0F68 

0F70 

0F78 


delay： equ 
llne_max : 


equ 


* 文字列がどれ位長くなったら 
* ひとまず送るか • g 安 <96-200> 


* インフォメーションテーブル * 

拿 》»»»**« 拿拿拿拿拿拿拿拿 $** 拿拿拿本***拿拿拿拿***** 


1168 

1170 

1178 


SUM ： 

1180 
1188 
1190 
1198 
11A0 
11A8 
11B0 
11B8 
UC0 
1108 
11D0 
11D8 
11E0 
11E8 
11F0 
1 1F8 


SUM ： 

1200 

1208 

1210 

1218 

1220 

1228 

1230 

1238 

1240 

1248 

1250 

1258 

1260 

1268 

1270 

1278 


SUM: 


1280 

1288 

1290 

1298 

12A0 

12A8 

12B0 

12B8 

12C0 

1208 

12D0 

12D8 

12E0 

12E8 

12F0 

12F8 


SUM: 

1300 

1308 

1310 

1318 

1320 

1328 

1330 

1338 

1340 

1348 

1350 

1358 

1360 

1368 

1370 

1378 


ZMUSIC. FNC 
PROGRAMMED BY Z.NISHIKAWA 


spd : 


.include 
.include 
.text 

equ 3l 

equ li 

equ 1: 

equ 1 


iocscall.nac 
doscall.mac 


音長 16*19216 小®分 
* 柽験的迅 9 の目安 


* 振幅 

*apeed 


20 

21 


25 

26 
27 


30 

31 

32 

33 


SUM ： 

AA 

9A 

0E 

A5 

0D 

F7 

96 

7A 

17F3 

I380h~ 

H77F h は 0 で埋める 





1780 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1788 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1790 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1798 

00 

00 

00 

00 

00 

00 

00 

00 

00 

17A0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

17A8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

17B0 

00 

〇〇 

00 

00 

00 

00 

00 

00 

00 

17B8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

17C0 

00 

00 

00 

00 

00 

00 

00 

04 

04 

17C8 

00 

04 

00 


00 

(M 

00 

04 

10 

17D0 

00 

04 

00 

04 

00 

04 

00 

04 

10 

17D8 

00 

04 

00 

2A 

00 

04 

00 

0E 

40 

17E0 

00 

04 

00 

06 

00 

2A 

00 

08 

3C 

17E8 

00 

08 

00 

06 

00 

0(s 

00 

28 

3C 

17F0 

00 

0A 

00 

12 

00 

08 

00 

06 

2A 

17F8 

00 

24 

00 

Of ； 

00 

OB 

00 

06 

36 

SUM ： 

00 

46 

00 

56 

00 

4A 

00 

56 9170 

1800 

00 

10 

00 

AC 

00 

0A 

00 

68 

2E 

1808 

00 

C4 

00 

06 

00 

16 

00 

08 

E8 

1810 

00 

10 

00 

34 

00 

06 

00 

1A 

64 

1818 

00 

2C 

00 

10 

00 

06 

00 

06 

48 

1820 

00 

06 

00 

0A 

00 

30 

00 

06 

46 

1828 

00 

50 

00 

16 

00 

0E 

00 

44 

B8 

1830 

00 

0A 

00 

7A 

00 

0C 

00 

0A 

9A 

1838 

00 

0E 

00 

0C 

00 

12 

00 

0A 

36 

1840 

00 

42 

00 

1C 

00 

1H 

00 

1A 

90 

1848 

00 

1C 

00 

12 

00 

08 

00 

28 

5E 

1850 

00 

06 

00 

90 

00 

0E 

00 

52 

F6 

1858 

00 

1C 

00 

OH 

00 

24 

00 

08 

50 

1860 

00 

18 

00 

08 

00 

3C 

00 

0A 

66 

1868 

00 

21 •: 

00 

10 

00 

24 

00 

08 

6A 

1870 

00 

1A 

00 

1C 

00 

2C 

00 

18 

7A 

1878 

00 

06 

00 

06 

00 

18 

00 

42 

66 

SUM ： 

00 

64 

00 

9C 

00 

7E 

00 

F6 E77C 

1880 

00 

18 

00 

28 

00 

1C 

00 

10 

6C 

1888 

00 

06 

00 

0C 

00 

0E 

00 

76 

96 

1890 

00 

4C 

00 

1C 

00 

14 

00 

0E 

8A 

1898 

00 

1A 

00 

3E 

00 

10 

00 

0C 

74 

18A0 

00 

0A 

00 

0A 

00 

06 

00 

18 

32 

18A8 

00 

08 

00 

06 

00 

10 

00 

06 

24 

18B0 

00 

06 

00 

16 

00 

20 

00 

08 

44 

18B8 

00 

1C 

00 

0E 

00 

16 

00 

04 

44 

18C0 

00 

04 

00 

04 

00 

04 

00 

04 

10 

1808 

00 

04 

00 

04 

00 

04 

00 

28 

34 

18D0 

00 

04 

00 

04 

00 

04 

00 

04 

10 

18D8 

00 

04 

00 

04 

00 

04 

00 

04 

10 

18E0 

00 

04 

00 

04 

00 

04 

00 

04 

10 

18E8 

00 

04 

00 

04 

00 

04 

00 

04 

10 

18F0 

00 

04 

00 

04 

00 

04 

00 

04 

10 

18F8 

00 

04 

00 

04 

00 

04 

00 

04 

10 

SUM ： 

00 

D8 

00 

E2 

00 

BA 

00 

0E 963C 

1900 

00 

04 

00 

04 

00 

04 

00 

04 

10 

1908 

00 

04 

00 

04 

00 

04 

00 

04 

10 

1910 

00 

04 

00 

04 

00 

04 

00 

04 

10 

1918 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1920 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1928 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1930 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1938 

00 

00 

00 

00 

00 

»(! 

00 

00 

00 

1940 

00 

00 

00 

00 

00 

0() 

00 

00 

00 

1948 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1950 

00 

00 

00 

00 

00 

00 

00 

00 

eo 

1958 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1960 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1968 

00 

00 

00 

00 

00 

0 0 

00 

00 

00 

1970 

00 

00 

00 

00 

00 

00 

00 

00 

00 

1978 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM ： 

00 

0C 

00 

0C 

00 

0C 

00 

0C ADEF 


► カードプ〇グラムがたくさん出てきますね。とってもうれしいです。萵校野球も終わっ . 
て，プロ野球もほぼセ . パともに決まってしまいました c 編堪部の皆さんは，どこのファ 特集 ZMUSICFNC 
ンが多いですか？ちなみに僕は巨人です。 笹山克己 （ 16 ) 石川斟 


リスト日 ZMUSIC . S ソースリスト 


28C 552224 C 33322 E 
8G6C9888DCB 88884 

C 22286 A 95260 B6C3 
D898E8AB 989058 D8 

2AC82D2286A71D29 
84CF 8888 E8AB8884 


F 4037D2ECFD 60620 D 
F C48FED1C9C7FAA74 
D 


F 22C 83729 C 01227 A7 
A 88CF898BCAF989AB 

B 852C 7589222 C 8122 

5 EC8866E 8888 CE888 

D 223337206 A9220C5 
7 98BB 89808 AB8806C 

4 78260 EB1D 2260122 
D 7F8904AF8887AF98 

3 EC7A 731248 C222C8 
c 88BAB898DED 888 CF 

1 c 32222 A 94227 A92C 

6 CB9886AB9989AB88 

0 260c 532267812263 

3 8906c 88847 E8887B 

B 5A7229AC0E20CC26 

4 7AB 988 CD 98806 D89 


6 220c 8222 c 89222 CC 
8 880CF888CE 88856 D 

7 c 012 C7A9220C 5322 
B 7AF88BAB 8806 C898 

4 322C3222A0122BC8 
3 8887B988CAF985CE 

D 3A9360CC 722 c 8122 

1 9AB 8906 D 988 CF 888 

A 3223A7229A92CC80 
A 8889AB98BAB8846A 

A 5CC 322 C8922A 3332 

8 66D888CE888CB888 

3 3225 c 5220 CC760BA 

2 89866 C8806D9905A 

9 0C 8322301229 A 712 
1 0CE898BAF98BAB88 


JB74CF4D, 


9 12C9A7206AC25 

2 8800 BAB 808 久 D89 

1 c 839220122209 
0 46B888AF9887B 

A 33606522 C4C19 
c 88 9 08 C88C8A88 

B 0BA7D2A9252F9 

3 05AB88AB8986C 

D 1122482209712 
0 F888DF887BB88 

A 22C54C0C19206 
7 856C987D 88808 

B 93226312 F9D72 
A B8984B886CBB9 

0 2BC 806081212 c 
c 85CF990E 8898 c 


86BE2066D505ABFA 

9DC47E107D438C85 


8 3 D 5 817 
5 2 B D 5 A A 


A 7 2 2 2 0 8 
A B 9 8 8 0 E 

2 2 c 8 A 7 2 
8 8 c E A B 8 

8 c 2 2 2 2 0 

E D 8 9 8 8 A 

2 2 E 7 8 c 2 
8 8 6 7 E D 8 

B 8 1 E 2 2 A 
E E 8 8 8 8 A 

c 2 D c B 8 2 

8 8 6 c E E 8 

9 0 12 c 2 E 
c A 8 8 8 8 6 

2 2 0 6 9 0 1 
8 8 0 8 c A 8 


e k I 

t t alii 
indserbb 
nunyrtoo 
iresboyy 

11111111 

ccccccco 

dddddddd 


fo 

n 


E c 8 
B 7 1 

2 0 9 
8 7c 

8 2 2 
E 8 8 

2 0 8 
8 0 E 

0 12 
A F 9 

2 2 7 
8 8 7 

A 9 E 
A B 8 

2 2 c 
8 8c 

4 c 2 
8 D 8 


4 8C 262278 C2C2F903 
A ED 89887 ED 8886 CA8 

4 22068 CE22B 902220 
7 887BED8886CA8880 

A B 81522 CB 822208 A7 

5 EE 8988 CEE8880E AB 

3 C2FCB82C278A 7222 
7 886CEE8889EAB 988 


0 2561DF0D7E66FC35 

2 220312 D12E 91775 D 
4 

3 . ... 

6 C28C90F 22222 DB02 

6 88BCCAC 88988 DEB8 

7 90F2220E478CFCA9 
0 CAC8880DC7EDC8B2 

4 220E0A742E22A900 
F 880D4ABC8888BCB2 

4 8A 74622 D57B8B270 
9 EABC988DBBEED8B2 

6 222D08CF22C286D8 
0 988D7EDC8988B8B2 

A 78CF722AE990F220 
D 7EDC988BCBCAC 982 


22CC 


B8BEC289C8 

EED888BCCE 


A 7 4 2 4 
A B c 8 c 


D 04B81F2AEC2F257A 
8 C350B29C372E9EE6 


: C884FA4C 


22EF222EB 2205515 
AADC988DD880BE4B 


〕 BADEDCB8AB 8988 


>EDB 815 E8C 5225 
>ADEE9ADED 9889 


4B 8008000 C 


DC 30200600000 00^ 
CA 8980000000000 C 


)000000 



































35 ： 

36: 

37 ： 

38 ： 

39 ： 

40 ： 

41 ： 

42: 

43 ： 

44: 

45: 

46 ： 

47: 

48 ： 

49 ： 

50 ： 

51: 

52 ： 

53 ： 

54: 

55 ： 

56: 

57: 

58 ： 

59 ： 

60: 

61 ： 

62 ： 

63 ： 

64: 

65: 

66 : 

67 ： 

68 : 

69 ： 

70: 

71 ： 

72: 

73 ： 

74: 

75 ： 

76: 

77: 

78: 

79 ： 

80: 

81 ： 

82 ： 

83 ： 

84 ： 

85 ： 

86： 

87 ： 

88： 

89 ： 

90: 

91 ： 

92 ： 

93 ： 

94 ： 

95 ： 

96: 

97 ： 

98 ： 

99 ： 

100: 

101： 

102： 

103 ： 

104 ： 

105 ： 

106 ： 

107 ： 

108: 

109: 

110： 

111： 

112： 

113 ： 

114 ： 

115: 

116 ： 

117 ： 

118: 

119 ： 

120： 

121： 

122: 

123 ： 

124: 

125 ： 

126 ： 

127: 

128 ： 

129: 

130: 

131: 

132 ： 

133: 

134 ： 

135 ： 

136 ： 

137: 

138 ： 

139 ： 

140 ： 

141 ： 

142 ： 

143: 

144 ： 

145 ： 

146: 

147 ： 

148 ： 

149: 

150: 

151 ： 

152: 

153 ： 

154 ： 

155: 

156: 

157 ： 

158: 

159 ： 

160: 

161: 

162: 

163 ： 


拿 L の値をワ-クにセット 


• dc 

• do 
.ds 


token_tbl 

param 

exec_adr 

20 


dc,b 

dc.b 

even 


dc. w 
even 


， ra 一 trk2 , ，$⑽ *夕 

f m switch 1 ,$00 
$00 


mtrk2_p 

$0004 

$0008 

$8001 

$0004 

$8001 


窣 1 バイト符号無し整数 
* 文字列 

* 4 バイト符号付き整数《戻 0 


clr.b 
move. 1 
auba, 1 
IOCS 
movea.1 
move.l 
IOCS 
cmpa.1 
bcs 

move * 1 
rta 

clr_err_flg: 

clr.1 
rta 

run: 

ctr し d: 

lea 

lea 

lea 


mtrk 
m_awitch 

out_flg 

#$ 0000 eif 0 f dl 

&1 »al 
B INTVCS 
d0,al 

#$OO0001f0,dl 
_B 一 INTVCS 
#$OOfe0000 y al 
clr err_flg 

,err_flg 


本 al= 設定的の処理アドレス 


声 opmdrv 未登緑です • 


oh_work,a0 
lfo_wk r a3 
laat_kf,a4 


拿チヤンネルワーク 
本 lfo work 

拿 last key fraction 


moveq.1 #8-1,d0 


move.l 
move.1 
move.1 
move,1 
move .w 
dbra 
clr.b 
rta 


#$00306a00 f (aO)-f 
*$03000100, (a0) + 
#$000f0003,(a3)4 - 
参 $00030000, (a3}+ 
#-1, (a4) + i 

dO,init_lp 
opn_flg 


拿 set default 

本 set default ,lfosw,sgn,droy 
拿 set default lfo parameters nl ， spd，dly 

laat_kf_flg 


end: 
break: 
system: 
yobi: 


move.l 

bar 

movea.1 
move.1 

move•1 
bar 

move.X 

tat .b 
beq. s 
bar 
bra • 8 

opmout: 

moveq,1 
IOCS 
tat.l 
bne 

ext_mtrk2: 

clr.1 
bar 
clr.l 
rts 

com_chk : 


ap,svsp 
err? 

$0016(a7) 9 al 
$00Cc(a7) # d2 



本スタックを save 


拿文字列のスタートアドレス 
»トラック番号 


♦ マク a コマンド ® 理 / 




buffer,a2 
_work , a3 
at_kf,a4 
o_wk f a5 


lal.b 


adda.1 
100 p_chk: 

move.b 

move.b 



(al}+,dl 

dl,d0 


andi*b #$df f dO 


拿 buffer 先頭アドレス 
* チャンネルワーク 
拿 last key fraction 
拿 ifo parameters 


<a4=laat kf wk+2»ch_n 


< d 0= ch_numtparm 
拿 ci 0 = lfo のハ • ラメータ 

*d7=d7*2^wk_az 2 

本 d 7=7 ••ク 1： ブト雨の本 • インタ 


本 d0=dl 

* 大文字小文字変換 


cmpi.b 
bcs « s 
ompi,b 
bis 


cmpi«b 
beq 


# ， A，,dO 
chk mcom 
# ， G 7 ,d0 
modulation 


参， K ， t d0 
detune 



の值 をワークにセット 

拿 d6=l 

*dl であることに注意！ 


ft をワークット 

拿 •• 

*d6=2 

寒 ®V の ft をワーク \ZtvY 


寒モシ*ユレ-シ驗ンハ • ラメータ tvb 


*aet lfo switch 

拿分コマン!^はスキッフ * 


* マクマン !^ がない場合は単に： ! ヒ •- 
本 al=buffer 


寒 8ave default value 


♦write default length 


*= のみならスイ•ノチ反転 
*1 以上なら on,0 なら off 


♦reverse lfo_sw 


(a3) 9 d0 拿 default kf 

本 y=y 拿 4 (0-252) 


拿 default 
拿 which ? 


本 aaive default #v 


Oh!X 1990.10. 


► X 68000 が届いた。黒いボディが 6 畳 1 間の 2 人部屋に映えるぜ。しかしうちの部屋は最 
近， ゲームセンターに なりつつあるのであった。 信太徹 （20) 神奈川県 









293 

294 

295 

296 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 

310 

311 

312 

313 

314 

315 

316 

317 

318 

319 

320 

321 

322 

323 

324 

325 

326 

327 

328 

329 

330 

331 

332 

333 

334 

335 

336 

337 

338 

339 

340 

341 

342 

343 

344 

345 

346 

347 

348 

349 

350 

351 

352 

353 

354 

355 

356 

357 

358 

359 

360 

361 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 

377 

378 

379 

380 

381 

382 

383 

384 

385 

386 

387 

388 

389 

390 

391 

392 

393 

394 

395 

396 

397 

398 

399 

400 

401 

402 

403 

404 

405 

406 

407 

408 

409 

410 

411 

412 

413 

414 

415 

416 

417 

418 

419 

420 

421 


d4 f (a4) 
return 


tat .b 
bne 

move.b 
move.b 
move.b 
bar 

move.b 

bra 

caae_tie : 

move•w 
bra 


mod_main: 


mod_lp ： 


oveq.l 
ove. b 


#O,d0 
6(a3),d0 


chk_nxt: 


bsr 

wrt_kcd 

move.w 

d5 f d7 

beq. & 

do calc b 

and!.b 
bne • 8 

#7Td7 

do_calc_b 

bar 
b: 

okuru 

bar 

calc_b 

cmp. w 

ml f d4 

ble • 8 

chk_next 

bra.B 

neg_sg 

cmp, w 

m2 f d4 

bge • a 

next 

neg .b 

dO 

bar 

calc_b 

bar 

calcjb 

dbra 

move.b 

rt8 

d5,mod lp 
d0,6(a3) 

拿 > dl= 

key code 

move.b 
lal.w 
move.b 

d0 f dl 
#8 f dl 
*$20, dl 

move.b 

(al) f d2 

cmpi.b 

参， # ， ,d2 

bne. 8 
move.b 

chk nxt 
i 9 + T 9 d2 

bra. a 

install 

cmpi.b 

参， f d2 

beq. 8 
cmpi•b 

in8ta 丄 JL 
# ， - ， f d2 

bne • a 

exit_getj 

move•b 

d2 v dl 


bsr okuru 

move«w dly_num,d0 
beq.s start_mod 
move.b 参 ’®’ ， <a2>+ 
move . b # , (a2)-f 

bsr num_wrt 


bsr 

move.b 
atart^nod : 

move•b 
move.b 
move.b 

move.b 
move.b 


wrt_kcd 
# ， & T ,(a2 い 

# ， Q ， ， (a2) + 
# ， L ， •(a2)+ 
# , l , f (a2)+ 

#， I • • (a2) + 
# ， •• ，，（ a2 卜 


move.w number,d5 
aub.w dly_num,d5 
bmi mod_err 

move.u 2(a5),d2 
181 .w #2 t d2 

crop.w d2,d5 
bos.s mijikai 

< 音長 

andi.l #$ffff,d5 
divu d2,d5 
move.w d5,d0 
bar nura_wrt 

move.i d5,-(sp) 
move.w d2,d5 
subq.l #1,d5 
bar mod_main 

move.b #* : 1 ,(a2) + 
move.b #’|’ ，（ a2 い 

move.1 (8p}+,d5 

swap d5 
tst.w d5 
beq.8 exitjaod 



subq.l #1 f d5 
bar mod_main 

move.b # 1 : # ,(a2)+ 
move.b # 1 | 1 »(a2)+ 

exit_mod : 

tst.b tie^flg 
bne.s case_tie 

本 case not tie 

move.b # , y , ,(a2) + 
move.b Q f , (a2) + 
move.b # 1 , 1 , (a2) + 
moveq.l #0 v d0 
move.b ch_num,d0 
bar num wrt 


move.b 
move.b 
move.w 
bar 

bra • w 


n(a2) + 
#*V f ,(a2>+ 
d4,d0 
num_wrt 

loop_chk 


rood—p—set: 

bar 



al,lwk 
dl,dwk 

#0,d5 
3(a3) f d5 
non_op 

get_ko 

getting 

tic^flg 

non_op 

d5,number 
non_op 

* ， • ， •(a2>+ 
# f L f ,(a2) + 

number,d0 
num wrt 
dl,d0 
#8 f dl 

dl f (a2)-f 
»$20 9 d0 


moveq • 】 
move.b 
beq • a 

bar 

bar 

tst.b 
bmi. 8 

aub. w 
bmi . a 

move.b 
move.b 

move.' 
bar 
move • 
lar • w 

move.b 
cmpi«b 
beq .b _r 
move.b d0, (a2)4- 


move.b 

move.b 

move.b 

bsr 

move.b 

bar 
bra 

roovea.1 
move•1 
bra 


参 , # , , (a2>+ 
fL 1 , (a2) + 
3(a3) t d0 
num_wrt 
# ， R ， • （ a2>+ 

okuru 
100 p_chk 

lwk f al 
dwk,dl 
juat_wrt 


modulation: 

tat .b 
beq 

moveq 

moveq 

moveq 

moveq 

moveq 

clr .b 


bar 

addq•b 
move•1 


5(a3) 
atq 一 op 


move.1 
divu 

move•w 
cmpi.w 
beq. b 
clr. w 
bra. b 


ml_m2 : 


oot_flg 

get_kc 

dl 9 d0 
where 
*2,d4 
d4,d6 

0(a5) f d5 
2<a5> ， d4 

getting 

d5 ， d3 

d4,d3 

(a4),d4 
#-l,d4 
new_kf 
dly_nun 
m し m2 

#0,d4 
(ad) 9 d4 


#0 9 d0 

(& 3) t d0 拿 d0=default kf 


* K 字じやない 
拿 d3=width 


♦ save 振幅 

拿 skip ’，’ 


*spd が（ 1-16> の範囲でなければ err! 


拿 d4=17-apd 

拿 akip •• ， 

*d3=delay 

拿 too bi|{ 

本 too small 
拿 delay:(0-7) 

本 save delay 

拿 return to main loop 


拿叫 =0 な 6 関係無 l 
拿 dl.w=kc 


ttie なら H 係無 l 


拿 dl=kc 


拿 write 0Q length 
* 休符 


拿モジュレーション 
*lfO_BW 力 《 Off なら • • 


霉 reset octave flag 


* 卜か 6 数値 
*wl=wl+2 
拿 d6=wl 

td5=nl 

*d4=8pd 


*d3=nl 

*d3=nl/apd=a 


、変換 


*d4=bsatart kf 
*last kf が - 1 なら新たに 
拿 default kf 去セット 


d0 , ml 
d5 9 ml 


dO f m2 
d5 v m2 


拿組 l=nl+kf 


拿 m2= ： -iil+kf 


422 

423 

424 

425 

426 

427 

428 

429 

430 

431 

432 

433 

434 

435 

436 

437 

438 

439 

440 

441 

442 

443 

444 

445 

446 

447 

448 

449 

450 

451 

452 

453 

454 

455 

456 
467 

458 

459 

460 

461 

462 

463 

464 

465 

466 

467 

468 

469 

470 

471 

472 

473 

474 

475 

476 

477 

478 

479 

480 

481 

482 

483 

484 

485 

486 

487 

488 

489 

490 

491 

492 

493 

494 

495 

496 

497 

498 

499 

500 

501 

502 

503 

504 

505 

506 

507 

508 

509 

510 

511 

512 

513 

514 

515 

516 

517 

518 

519 

520 

521 

522 

523 

524 

525 

526 

527 

528 

529 

530 

531 
632 

533 

534 

535 

536 

537 

538 

539 

540 

541 

542 

543 

544 

545 

546 

547 

548 

549 

550 


► 9 月号の LIVE in’90 のラジオ体操，やりますねぇ。歌詞にいきなり背伸び 123 万 4567 回だ 
もんなあ。体操やり終えて気づいたけどこれは 123 万 4567 回でなくて 1, 2, 3 ， 4, 5, 6, 7, 
なんだよ。え，みんな知ってたの，ひどいなあ，教えてくれてもいいじやないか。足の琪 
から血が出たよ。ビュツ！ 杉山弘師 （ 18 ) 広岛県 


>d5=length counter 
拿 too short 


#d2 = spd*4 ( 披形の调期） 


♦loop counter 


* 周期分，波形を生成 
拿 dbra 用 


*loop end 

>d5.w = あまり 
< 丁度びったしの時 •• 
拿 dbra 用 

拿 loop: 1 
拿 dbra 用 


*loop end 


拿 if tie then. 


td0=iq 


拿 save last kf 

* 掃還処理へ 


拿 d0:8g 

* 音符を書く 
* ラストなら改行しない 

拿文字列が長くなつたのでひとまず送る 

拿 b=b+GL 拿 Bg 

拿 if b>ml or b<m2 then.•• 


lb=b-fa*ag>2 

♦save d0 


拿 dl=kc(capitnl} 


本 space 
調号？ 


拿 aet ♦- to ko 


特集 ZMUSIC. FNC 107 


) 2 2 0 2 
4 aad t a 2 
a n(( » r(n 
(g r I ») w I r 
flu— » 3 T u 
lft®L amRt 
i le, , {u, e 
# crr 参 # 3n# r 






55 r 

552 

553 

554 

555 

556 

557 

558 

559 

560 

561 

562 

56.3 

564 

565 

566 

567 

568 

569 

5.70 

571 

572 

573 

574 

575 

576 

577 

578 

579 

580 

581 

582 

583 

584 

585 

586 

587 

588 

589 

590 

591 

592 

593 

594 

595 

596 

597 

598 

599 

600 

601 

602 

603 

604 

605 

606 

607 

608 

609 

610 

611 

612 

613 

614 

615 

616 

617 

618 

619 

620 

621 

622 

623 

624 

625 

626 

627 

628 

629 

630 

631 

632 

633 

634 

635 

636 

637 

638 

639 

640 

641 

642 

643 

644 

645 

646 

647 

648 

649 

650 

651 

652 

653 

654 

655 

656 

657 

658 

659 

660 

661 

662 

663 

664 

665 

666 

667 

668 

669 

670 

671 

672 

673 

674 

675 

676 

677 

678 

679 


clr.b 
bra .a 

tfyaku : 

cmpi•b 
bcc • 8 
move.b 
clr.b 

yonbai : 

add .w 
lea 

move.b 

move.b 

cmpi.b 

beq.s 

move.b 

exit_wrtkcd: 

movem•1 
rta 


calc_b: 


tat.b 
bpl.8 


aub.w 
bra. a 

case_pluB: 

add.w 


rtB 


portanent : 

clr.b 
clr.b 
moveq•1 

move.b 

bar 

beq 

move.b 
lal.w 
nove.b 
move.b 
cmpi.b 
bne.a 
move.b 
bra.B 

chk_pm: 

cmpi.b 
beq.B 
cmpi.b 
bne.a 
torikomi : 

move.b 

move.b 

non_torikomi: 

move.b 

bar 

beq 

move.b 
lsl «w 
move.b 
move.b 
cmpi.b 
bne • a 
move.b 
bra.B 

chk_pm2: 

cmpi.b 
beq.B 
cmpi.b 
bne .8 
torikomi2 ： 

move.b 
addq.1 
non torikomi2 ： 


bar 

cmpi.b 
seq. b 
bne. b 
addq.1 

no し tie: 

move.w 
bar 
move.1 
move.w 
bar 

cmpi.b 
bne.a 
aub. b 
bra. a 

一 up? •• 

cmpi.b 
bne • s 
add.b 

_nxt ： 

move.b 
sub.b 
tat.b 
bmi .a 

moveq.1 
bra.s 

sg_minu8 

neg .b 
moveq•1 



and!•w 

mulu 

add.w 


oct__: 

yonbi 


fig 


#14 ,ci6 
yonbai 

oct_flg 

d6,d6 <d6=d6t2 

kc_tbl 3 ,a0 

0(a0,d6.w) f (a2) + 
l<a0»d6.iO t d0 
#$20 ， d0 

exit_wrtkcd 拿 space 出 l 

d0 t (a2)t 


きたら終わり 


(8p)+,d0/d4/d6 


d3 t d4 

exit_calc 胃 b 


and_flg 
oct fig 
#0,dl 

(al)+ t d 0 

moji^chk 

err_in_macro 

d0 f dl 

*8 v dl 

#$20 t dl 

(al)^ f d2 

#•#•,d2 

chk pm 

•，令，， d2 

torikomi 

f d2 

torikomi 

• し 、 d2 

non_torikomi 


(al)+,d0 
moji_chk 
err in macro 
de f d5 
#8 v d5 
t$20,d5 
(al)^,d4 
I 1 # 1 ,d4 
chk_pm2 

torikomi2 

* ， +•,d4 
torikomi2 

，し， 

non_torikomi2 

d4.d5 

*l,al 


num_chk 


num^get, 

霧 mux,d3 

し err in^roacro 
#l,d3 

し macro 
i 


terror! 

寒 dl=kcl(capital) 


零 space 
* 調号？ 


第1，-に « 号を取り込む 

dl=ko,eg 


ふの kc 1 Kd 2 には" 


error! 

d5:kc2 


apace 

« 号？ 


♦ 第 2，- 

td5=kc, 


-に調母を取り込む 



拿この！}点で al は length を指している 

拿 d3=lentfth 
拿 too long ! 

靠 too short ! 


d3 | number 

skip npc 
# ， &••(al) 
tie_flg 
not tie 
#1,al 

dl,d0 

where 

d4 f d6 

d5,d0 

where 

参 •>•.d2 

•up? 

#12,d4 

_nxt 

毒 ， <•.<12 

_nxt 

•12 v d4 


拿 save length 


拿この時点で al は次を拿•ィパ 

拿 d6=wl 

拿 d4:w2 

本オクタスイッチ H 


拿すクター 7 * スイ，チ ft 


(a3) t dl 拿 dl=bend start 
d6,d4 


• l 9 d2 

caic_ranne 


参拿 00ff,d4 

*63 f d4 


caBe_plus 

d2=Btf:l 


aba(d4) 

d2=-l 


d4=d4*63 
d4=bend end 


680 

681 

682 

683 

684 

685 

686 

687 

688 

689 

690 

691 

692 

693 

694 

695 

696 

697 

698 

699 

700 

701 

702 

703 

704 

705 

706 

707 

708 

709 

710 

711 

712 

713 

714 

715 

716 

717 

718 

719 

720 

721 

722 

723 

724 

725 

726 

727 

728 

729 

730 

731 

732 

733 

734 

735 

736 

737 

738 

739 

740 

741 

742 

743 

744 

745 

746 

747 

748 

749 

750 

751 

752 

753 
764 

755 

756 

757 

758 

759 

760 

761 

762 

763 

764 

765 

766 

767 

768 

769 

770 

771 

772 

773 

774 

775 

776 

777 

778 

779 

780 

781 

782 

783 

784 

785 

786 

787 

788 

789 

790 

791 

792 

793 

794 

795 

796 

797 

798 

799 

800 
801 
802 

803 

804 

805 

806 

807 

808 


► アルバイト方 • 年，ついに挫折！日中 45 でを越える職場に m 労動の熱処理工場は，あま 
くなかった。これでまた X68000 君購入は，夢となったのであった。残念！ 

坊尨诚 （ 19 ) 福井県 


addq • 

exit_get_kc: 

rta 

getting : 


bar 
beq • s 
bar 

cmpi.b 

num_chk 

getld_l 

tease no number 

num get 
•192 f d3 

拿 d3:length 

bhi 

tat.b 

1 err in mac 
d3 

3ro 拿 too short 

beq.B 
move.1 

_384 

#192 v d0 

*0 なら 2 倍全&符 

divu 

d3 f d0 

td0=192/L 

move•w 

d0 v d3 

*d0=d3= 絶対 & ft 

bra. 8 

exit.gl 





exit 一れ 



拿 d3:d3/8 
拿 d3 拿 dly 


non_®q: 
ext 一 eq 


move•b 

#-l,q_fl8 



bar 

skip ape 



cmpi.b 

nTuu 



aeq.b 

tie.flg 



bne. 8 
addq.1 

jql 
#1,al 

• skip 

， «t ， 

bra. s 

ext 一 0q 



move.w 

d3 t dwk 



moveq.1 
move.b 

#0 v d0 

3(a3) 9 d0 



beq. a 
sub. w 

extjq 

d0,d3 

tease 

0q=O 

beq.B 

non^q 



ami .b 


ラ-なら q_flK = - 

bmi • b 
rta 

non_§q 



move.w 

dwk v d3 




< d3=d0=length 

< al^atr point 

> d3=calcuLated length 

> al 二 next str 
X d0 



wrt_kcd: 


d4=bb 

拿 < d6swl 

movem.1 d0/d4/d6,-(ap) 
moveq.1 #0 9 d2 


♦実限に音符を 1 


tat .w 
bmi .a 

plus^lp: 

cmpi•w 
ble.a 
Bubi.w 
addq.b 
bra.s 
minuB_lp: 

tat. w 
bpl .a 
add!•w 
subq.b 
bra • 8 

wrtkcdl : 

move•b 
moveq.1 
add.b 
bsr 

move.b 


d4 

minus.lp 

#63 f d4 

wrtkcdl 

*63,(14 

#l,d2 

plua^lp 

d4 

wrtkcdl 
#63,(14 
#1 f d2 
minua^lp 

# ， y 、 U2) + 
#48,d0 
ch_nuro,d0 
num wrt 
# , , 7 .(a2) + 


move.b d4,d0 
lal.b t2,d0 
bsr num_wrt 

add.b d2 t d6 
andi.w t$ff ,d6 
move.b oct_flg,d0 


拿 dOsbb 
仆 f:kf 拿 4 
拿 write kf 


cmpi 

bhi • b 

cmpi 

beq. a 

move 

move 

bra. 

cmpi 
bes. 8 
cmpi 
beq. a 
move ' 
move 
bra.B 


tet .b 

beq.s 

cmpi.b 

bne.a 

cmpi.b 

bla.a 

move.b 


«1,d6 
o 一 up? 

modosu? 
# ， >.,(a2 い 
#’ >• t oct_f1« 
yonbai 

tl4 f d6 

modosu? 

modoau? 

#•<* f (a2)4 
# • く ， ,oot_flg 
yonbai 

d0 

yonbai 
参 • パ， d0 
gyaku 
#l,d6 
yonbai 
#»< # , (a2) + 


Oh!X 1990.10. 


• i i •ei 6 
r a- r pi p B a : V d V 
Beamhmlrlon 0 
bbbebebb lma:m 
t g 
1 n 
f 1 









809 

810 

811 

812 

813 

814 

815 

816 

817 

818 

819 

820 

821 

822 

823 

824 

825 

826 

827 

828 

829 

830 

831 

832 

833 

834 

835 

836 

837 

838 

839 

840 

841 

842 

843 

844 

845 

846 

847 

848 

849 

850 

851 

852 

853 

854 

855 

856 

857 

858 

859 

860 

861 

862 

863 

864 

865 

866 

867 

868 

869 

870 

871 

872 

873 

874 

875 

876 

877 

878 

879 

880 

881 

882 

883 

884 

885 

886 

887 

888 

889 

890 

891 

892 

893 

894 

895 

896 

897 

898 

899 

900 

901 

902 

903 

904 

905 

906 

907 

908 

909 

910 

911 

912 

913 

914 

915 

916 

917 

918 

919 

920 

921 

922 

923 

924 

925 

926 

927 

928 

929 

930 

931 

932 

933 

934 

935 

936 

937 


d6 

prp3 
#ll,d6 
參， > 、 U2 卜 

*U t d6 



* ， • ， ,(a2) + 
# , L , l (a2)+ 
L_work,d0 
num_wrt 

number,d0 

«l 9 d0 

d0 f d7 

d5，dl 

Mffff ,dl 

dd.dl 

dl f d4 

d4 

flffff,d4 

#8 f d4 

d0 t d4 

d4 v d0 

d0 

d0 

calc a 
#1,d4 

d2 v dl 
L_work,d5 
#0,d0 


#l,d5 
non wrt 



d4,d0 

inc^y 

d2,d3 


dl,d3 

d7,-(sp) 
non orlf 
参 7,37 
non_crlf 
okuru 

(sp)+ f d7 
d7,port_lp 

#-l,(a4) 

tie^flg 

wr^«L 

and_flg 
k_off_.com 
•1 ， a2 

#.y ，，（ a2 い 
# ， 8, ， （ a2>+ 
#\\(a2) + 
#0,d0 
oh_num f d0 
num_wrt 



dl f d5 

decide_^L 

d5 


#1tL_work 

Iexp r d3 

prepare 

d3,d0 

«l,dO 

caae_3? 

#192,d5 

caae_3? 

#2,L_work 

#-1 ,and_flg 

prepare 

d3,d0 
f$ffff,d0 
»3,d0 

#$ffffO000,dO 

caae_4? 

#128,d5 
case_4? 

#3,L^work 
#-1 ， and 一 fig 
prepare 


sub. w 
bpl• a 
neg.b 
decide_«L ： 

move.w 
cmpi•w 
bis. a 


move 
andi 
bne. a 
cmpi 

bcc • B 

move 
move 
bra • s 

move 

andi 

divu 

andi 

bne. a 

cropi 

bcc. 8 

move 

move 

bra. a 


case_4 ?： 


prp2: 


prp3 : 


move 

andi 

bne • s 

cmpi 

bcc. a 

move 

move 

(: 

bar 

move 
tst.b 
bpl.a 
subq 
add • b 

cmpi 
ble • a 
sub • b 
addq 


tat. b 
bpl• a 
moveq.1 
move•b 

cmpi.b 
ble. a 
moveq.1 

move • b 
move•b 
move•w 
bar 

move•w 
subq.w 
move.w 
move.w 
andi.1 
divu 
move.1 
swap 
andi.1 
lal.l 
divu 
move•1 
swap 
tat. w 
beq • s 
addq.b 

mulu 
move.w 
moveq.1 


port_lp: 


subq.b 
bne • s 
bar 

move.w 


add. b 
bco • a 


inc_y: 


move.w 
beq • a 
andi.b 
bne .a 
bsr 

non_crlf: 

move•w 
dbra 


tat .b 
bne. a 
拿 case not tie 
tst.b 
beq. b 
aubq•1 
bra. a 
k_off_com: 

move.b 
move•b 
move.b 
moveq.1 
move.b 
bar 


move•b 
move.b 
moveq.1 
move.b 


»d5=d5-dl(be-bs) 

Id5=bend range 

ま経黢的処理によつて ® L を決定 • 
• 人工知能だぜ（大うそ） 
•default is 9L1 

ま経験的処理は行わない 


938 


bar 

num_wrt 

939 

return2 



940 


move•b 

oct^flg f dO 

941 


beq .8 

rtn end 

942 


cmpi•b 

# ， > 7 ,d0 

943 


beq .8 

hantai 

944 


move.b 

# ， > ， •<a2>+ 

945 


bra.s 

rtn_end 

946 

947 

hantai : 

move.b 

# ， <• ， （ a2 い 

948 

rtn_end : 



949 


bsr 

okuru2 

950 


bra 

100 p_chk 


*d3=kf 

♦check d2 (ag) 


拿 wl=wl-l 

#d3=63+kf 


•if wl<0 then.. 
twlsll 

•if wl>11 then. 

拿 wl:0 

拿 write •瘡ぃ 


拿 d0= レ 1 

拿 d7=L-l 《後で使う） 


靠 dl=b 

拿 dl=b/( レ 1 )=8 


拿 d4 = 汆り 


拿 d4= 余り拿 256 
*d4=a 


*d4=true a 

*8=8 拿 sg 


<d5=lw 

*n=n+a 

本 case n>256 
*y=y+ag 

*y=y+8 

* ラストならは改行しない 
零文字列が長くなつたのでひとまず送る 


拿 if tie then. 


拿 delete last 

拿 《 L1 な 6 key off com を送る 


951 

952 

953 

954 

955 

956 

957 

958 

959 

960 

961 

962 

963 

964 

965 

966 

967 

968 

969 

970 

971 

972 

973 

974 

975 

976 

977 

978 

979 

980 

981 

982 

983 

984 

985 

986 

987 

988 

989 

990 

991 

992 

993 

994 

995 

996 

997 

998 

999 
1000 
1001 
1002 

1003 

1004 

1005 

1006 

1007 

1008 

1009 

1010 
1011 
1012 

1013 

1014 

1015 

1016 

1017 

1018 

1019 

1020 
1021 
1022 

1023 

1024 

1025 

1026 

1027 

1028 

1029 

1030 

1031 

1032 

1033 

1034 

1035 

1036 

1037 

1038 

1039 

1040 

1041 

1042 

1043 

1044 

1045 

1046 


拿 default #L 


1065 

1066 


* ォクタ-アのつじつま合わせ 


andi.b 
bra .8 


ori .b 

#%00000100 v ocr 

拿 < z 

強制的にハ ^ フ t へ転送 

t nz 

行の ft さをチ ” クしてハ•ヮファへ転送 

movem•1 

d0-d7/a0-a7,-(sp) 

lea 

buffer,al 

beq. a 

do_okuru 

movea•1 

a2,aO • 

auba.1 

al,a0 

cinpa.1 

#line_max,aO 

bcs • a 

exit_okuru2 

clr .b 

(a2 ) 拿 write string 

auba.1 

a 1 1 a2 

move.1 

a2,mj_lng 

move,1 

trk_num,d2 

tst.b 

out_flg 

beq.s 

bar 

tsujou 
file_out 

bra, 8 

exit_okuru 


moveq•1 
IOCS 


#$06, dl 
OPMDRV 


exit_okuru ： 

roovem. 


lea 

rts 


write_kc ： 

move.1 

cmpi.b 
ble. s 
aub.b 
addq.b 

wrkcl : 

tat .b 
bpl• a 
add.b 
subq.b 


拿マクロ:！マンド で生成した mml には 
♦棋りは無いものとする 


(ap) + f d0-d7/a0-a7 
buffer,a2 


(8p)f,dO-d7/a0-a7 


d0,-(sp) 


拿トコ-ドを実限に害く 
拿 push d0 



cmpi.b 
bne. s 

拿 case y=63 

move.b 

lea 

move.w 
addq,b 
add • b 
adda.1 


#•0, ，（ a2 い 

kc tbl2 9 a0 
d6,d 0 
#1,d0 
d0 f d0 
d0, a0 


本 

本 d0=<wl+l)*2 



caae_not_63 : 

move.b 
lal• b 
bar 


1047 

lea 

1048 

move.w 

1049 

add.b 

1050 

adda•1 

1051 

1052 

move.b 

1053 

move.b 

1054 

cmpi•b 

1055 

beq. a 

1056 

move.b 

1057 

1058 

exit_wr_kc: 

1059 

t8t .b 

1060 

beq • 8 

1061 

move.b 

1062 

exit_wr_kcl : 

1063 

move•1 

1064 

rts 



拿 y=y 家 4 (0-252) 


拿 d0zwl 
拿拿 2 


and_f 1« 
exit_wr_kcl 


拿 search kc 


拿❿ LI 以外なら 4 •が必養 


►狭いんです，部屋が！ 4.5畳1問に乂68000,ステレオ，29型 TV ， ビデオテープの山， 
タンスなど……。い一かげん崧るとこがなくなってきた。ど一しよ？ 

安藤弘明（21> 福岛県 
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kfj 
r 一 
e e O d 

r 5 r w n 3 3 3 
o 0 a d a a u 3 6 d d d 6 
d d p » PL »rd Id » 12 Id 
I • e 4 e i u » p »3 3 P3 » 
33r6r4l k 12 r 16 6 r 61 
d # p# p# # o d d p# # # p# # 







#$df,dO 
# f A f t d0 
exit chk mj 
# ， G ，， d0 
exit_chk mj 
d0 


tmako not zero 

< MMM W I ： t # D フ，クセツ I* 


*(al ) が败字かどうかチヱック 


t > z 

not number 


♦ > nz 

number 


拿 X 



cmpi.b 
bcs • a 

exit chk num 


cmpi•b 
bhi • 8 

# ， 9 ， TuiT 

exit chk num 


tst .b 
rta 

©xinum• 

(al)~ 

•make not zero 

ori .b 
rta 

#$ff,cor 

< 強制的に fa フぅクセット 

l^wk^aetl: 



move.b 

dl v (a2)-f 

韋まず，いを書く ••• 

move•1 

al ， - (ap) 


bar 

move.1 

num get 
#192,d0 

td3：length number 

divu 

d3,d0 

td0.w=®L length 

move•b 

d0,l(a3) 

• f ， ン ♦ ル 7 -クに害く 

exit_lwk: 



move•1 

(ap)+，al 


bra 

loop_chk 


skip_8pc: 


尊無酞なスペースカツ 

cmpi,b 

#$20 f (al) 


bne «b 

exit skp spc 


addq.1 

*l t al 


bra.s 

skip^spc 


exit_8kp_8pc : 




rts 

v_wk_8etl : 

move 

move 

bar 

lea 

move 

move 

move 

bra 


wk_set2: 


move 
move 
movem.J 
bsr 

move *b 
movem.1 
bra 


dl, 丨 a2) + 
al,-(sp) 
num_get 
v tbl 9 al 
(al t d3.w) 9 d0 

d0,2(a3) 
(sp)+,al 
Ioop_chk 


dl,(a2}+ 

(al)+,(a2)f 

d7/al t -(ap) 

num get 

d3 v (a3 v d6.w) 

(sp)+ ， d7/al 

loop_chk 


* まず ， V •を害く ••• 
<d3=volume value 
value 

拿チヤン ♦ ル *7 •• ク 1 こ書く 


尊 write 
*write , 1 , 


td3=91entfth number 
# チヤン ♦ ルワ-クに軎く 


move.b 
bsr 
bne • 8 


# , y , ,(a2) + 

num_chk 

num_frm_bf 


moveq,1 #0,d3 
move,b (a3 > f d3 
bra.a do_w 


nuro_frm_bf: 

bar 


cmpi•b 
bhi . w 


家 write y_com 


»d3=number(0-63) 


#63 f d3 

err_in_macro 


do_w : 


move.b 
lsl.b 


•if d3>63 then … 
d3 t (a3) 拿キーフラクシ膽ンの M (0-63) をチヤン本ルワーク ' 

#2 v d3 Id3=d3t4 (0-252) 


moveq. 1 #0 v d0 
move.b ch_num,dO 
#$30,d0 
num_wrt 


add.b 

bsr 


move•b 


，， U 2 卜 


d3 f d0 

num^wrt 


Ireaet d0 
td0=oh num 
td0=(48-55) 


Oh!X 1990.10. 


d0 search kc 
d4 kc number(0-11> 


move.1 aO,lwk 
lea kc_tbl,a0 

moveq.1 #0,d4 
bar wh_lp 
beq .b exit_wh 
lea kc_tbll,a0 

moveq.1 #0,d4 
bar wh_lp 
bne kc_err 

i ： 

roovea.1lwk,a0 
rts 


wh_lp: 


cmp.w (aO )<f ,d0 
beq.a exit_wh_lp 
addq.b #1,d4 
tat.b (a0) 
bne.s wh lp 
andi.b #%111110 11, 
ih_lp: 
rts 


ccr *nz 


mo ji chk : 拿がキーコードかどうかチェック 

拿 < d0 

拿 > 2 not kc 

* > nz kc 

拿〉大文字で出てくる 


1067 

1068 

1069 

1070 

1071 

1072 

1073 

1074 

1075 

1076 

1077 

1078 

1079 

1080 
1081 
1082 

1083 

1084 

1085 

1086 

1087 

1088 

1089 

1090 

1091 

1092 

1093 

1094 

1095 

1096 

1097 

1098 

1099 

1100 
1101 
1102 

1103 

1104 

1105 

1106 

1107 

1108 

1109 

1110 
1111 
1112 

1113 

1114 

1115 

1116 

1117 

1118 

1119 

1120 
1121 
1122 

1123 

1124 

1125 

1126 

1127 

1128 

1129 

1130 

1131 

1132 

1133 

1134 

1135 

1136 

1137 

1138 

1139 

1140 

1141 

1142 

1143 

1144 

1145 

1146 

1147 

1148 

1149 

1150 

1151 

1152 

1153 

1154 

1155 

1156 

1157 

1158 

1159 

1160 
1161 
1162 

1163 

1164 

1165 

1166 

1167 

1168 

1169 

1170 

1171 

1172 
U73 

1174 

1175 

1176 

1177 

1178 

1179 

1180 
1181 
1182 

1183 

1184 

1185 

1186 

1187 

1188 

1189 

1190 

1191 

1192 

1193 

1194 

1195 


110 


1196 

1197 

1198 

1199 

1200 
1201 
1202 

1203 

1204 

1205 

1206 

1207 

1208 

1209 

1210 
1211 
1212 

1213 

1214 

1215 

1216 

1217 

1218 

1219 

1220 
1221 
1222 

1223 

1224 

1225 

1226 

1227 

1228 

1229 

1230 

1231 

1232 

1233 

1234 

1235 

1236 

1237 

1238 

1239 

1240 

1241 

1242 

1243 

1244 

1245 

1246 

1247 

1248 

1249 

1250 

1251 

1252 

1253 

1254 

1255 

1256 

1257 

1258 

1259 

1260 
1261 
1262 

1263 

1264 

1265 

1266 

1267 

1268 

1269 

1270 

1271 

1272 

1273 

1274 

1275 

1276 

1277 

1278 

1279 

1280 
1281 
1282 

1283 

1284 

1285 

1286 

1287 

1288 

1289 

1290 

1291 

1292 

1293 

1294 

1295 

1296 

1297 

1298 

1299 

1300 

1301 

1302 

1303 

1304 

1305 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1314 

1315 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

1324 


t X 
movem. 1 
clr. b 
move.1 
and!.1 

nmw_lp: 

divu 
tat .b 
bne. a 
tat .b 
beq. s 
move.b 

kanarazu_w: 

add.b 

move.b 

no_wrt: 

swap 
andi*1 
divu 
bne.a 
tat «b 
beq. a 
movem.1 
rta 

wrt_zero: 

move.b 
movem.1 
rta 


拿 buffer に败字を醫く 
仙 = 醫きたい ffl(0-65535) 
a2 = 害き込みたいアドレス 
aZ=next addr 


d0/d4 f -(sp) 
(wrt fig) 
#10000, d4 
#$ffff,d0 


<d0=0-65535 


d4,d0 »d0=dO/d4 

(wrt_fl«) 


d0 

no wrt 

#$ff t (wrt.flg) 

#$30 f d0 
d0 t (a2)f 


* 初めてじやないのなら必ず I 
* 初めてのケース 


♦1 文字ラ - 


d0 td0= ^ 〇 

#$ffff,d0 

#10,d4 <d4=d4/10 

nmw_lp 

(wrt_flg) 

wrt_zero 

(apT+,d0/d4 


參， 0 ， •(a2) + 
(sp)+ f d0/d4 


al = 数字列の存在するアドレス 

d3=ffl 

al=next addr 


num_lp: 



>d3=d3tl0 

td3=d34*d0 


• ルをオーブン I 


♦save file handle 


fputo: 


mj.lng,-(sp) 

buffer 

fh t -(ap) 

.WRITE 
T0(ap),ap 
d0 


moveq.1 #13 9 d0 
bar fputc 

moveq.1 #10 # d0 

move.w fhi-(sp) 
move.w d0,-(ap) 
DOS 

addq.1 
rts 


^.FPUTC 
#4 ,ap 


mod_err ： 


err_msg_ael 

moveq.1 #54,d0 
bra.s err_mag_8el 

moveq.1 #53,d0 
bra.a err_mag_ael 

moveq,1 #52,d0 
bra.a err_roag_sel 

move.b dO, er_ky*f 1 
lsr.w #8 9 d0 
move.b d0 f er_ky 

moveq.1 #51 f d0 
bra.8 err_mag_8el 


► “プ ロミストランド”っ ていいですね。あの重苦しい歌声， 
田省吾じやないんですか？ 


あの敝しい歌詞。えつ，浜 
陣山達夫 （ 20 ) 大阪府 


b b b 

• • s • a b b 

d P8 pit 8ji s 
nmcmhatmrt 
acbcbtr lor 







1325 

1326 

1327 

1328 

1329 

1330 

1331 

1332 

1333 

1334 

1335 

1336 

1337 

1338 

1339 

1340 

1341 

1342 

1343 

1344 

1345 

1346 

1347 

1348 

1349 

1350 

1351 

1352 

1353 

1354 

1355 

1356 

1357 

1358 

1359 

1360 

1361 

1362 

1363 

1364 

1365 

1366 

1367 

1368 

1369 

1370 

1371 

1372 

1373 

1374 

1375 

1376 

1377 

1378 

1379 

1380 

1381 

1382 

1383 

1384 

1385 

1386 

1387 

1388 

1389 

1390 

1391 

1392 

1393 

1394 

1395 

1396 

1397 

1398 

1399 

1400 

1401 

1402 

1403 

1404 

1405 

1406 

1407 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

1415 

1416 

1417 

1418 

1419 

1420 

1421 

1422 

1423 

1424 

1425 

1426 

1427 

1428 

1429 

1430 

1431 

1432 

1433 

1434 

1435 

1436 

1437 

1438 

1439 

1440 

1441 

1442 

1443 

1444 

1445 

1446 

1447 

1448 

1449 

1450 

1451 

1452 

1453 


し err 」 n_macro : 

moveq. 1 
bra. b 

err_in_macro: 

moveq.1 
bra • b 

Junbi : 

lea. 
move 
rts 


•50,dO 
err_mBg_8el 


專 length error 


拿 macro error 


modoriohi(pc),a0 
d0 f $0006(aO) 


tat • l 
bpl 

moveq. 

bra 

ext^err? : 

rts 

err^mag^sel : 

movea.1 
move.1 
aubq.l 
asl.1 
movea.1 
moveq.1 
b»r 

move•1 
rta 



err_flg 
ext_err? 

#$09,d0 拿 OPMDRV 未登錄ェラー 

err_mag_sel 


svsp,sp 
d0 f -(a7 ) 

#1 »d0 
#2 9 d0 

err_cd_tbl(pc v d0.1 ),al 
#$ff,d0 
junbi 
(a7 卜， d0 


tempo_err 

trk_num_err 

cmd_err 

aize_err 

mem_err 

channe し err 

diro_err 

iriBt_num_err 

drv_err 


拿 30 

err 
no_tmp_nuii 
tap_num_err 
no_l_num 
no_v_num 
v_num_err 
no_ko_num 
kc_num_er 
inat_num_err 
rnp_kakko_nashi *40 
too_many_keya 


q_err 

rnp_mml_err 

y com err 

_«L_err 

pan_err 

tie^err 

macro_err 

1 一 err 

kc_err_mag 
mod_err_msg 
rv_err_mag 
too_long 一 


1454 

1455 

1456 

1457 

1458 

1459 

1460 

1461 

1462 

1463 

1464 

1465 

1466 

1467 

1468 

1469 

1470 

1471 

1472 

1473 

1474 

1475 

1476 

1477 

1478 

1479 

1480 

1481 

1482 

1483 

1484 

1485 

1486 

1487 

1488 

1489 

1490 

1491 

1492 

1493 

1494 

1495 

1496 

1497 

1498 

1499 

1500 

1501 

1502 

1503 

1504 

1505 

1506 

1507 

1508 

1509 

1510 

1511 

1512 

1513 

1514 

1515 

1516 

1517 

1518 

1519 

1520 

1521 

1522 

1523 

1524 

1525 

1526 

1527 

1528 

1529 

1530 

1531 

1532 

1533 

1534 

1535 

1536 

1537 

1538 



• dc.l 

file_out_err_mag 




1539 

wrt_flg: 






1540 


• da,b 

1 




1541 

tie.fltf ： 






1542 


• da ,b 

1 




1543 

oh_num : 






1544 


.da .b 

l 




1545 

oct 一 fig: 






1546 


• da • b 

1 




1547 







1548 

v_tbl : 






1549 


• dc.b 

85,87,90,93,95,98, 101 ， 103,106,109, 111,1H, 117,119 , 122,125 

1550 

and_flg: 






1551 


.ds • b 

1 




1552 







1553 


• ds .b 

1 




1554 

out_flg: 






1555 


• ds .b 

1 




1556 

opn^flg: 






1557 


• da. b 

1 




1558 

filename 

： 





1559 


.dc.b 

f ZMUSIC.TMP 1 ,0 




1560 


.even 





1561 

lwk: 






1562 


• d8.1 

1 




1563 

dwk: 






1564 


.ds.l 

1 




1565 

kc_tbl : 






1566 


• dc.b 

# C C+D D+E F F+O 

G+A 

A+B 

• 必ず大文字！！ 

1567 






拿 B の f 庚の space! ! 

1568 

ko.tbll ： 






1569 


• dc.b 

•C D-D E-K F G-G 

A 養 A 

B-B 

< 必ず大文字！！ 

1570 






拿 B の後の apace ! ! 

1571 

kc_tbl2: 






1572 


• dc • b 

•C C+D D+E F F+G 

G+A 

A+B 

<C f v 0 9 0 

1573 

kc_tbl3: 






1574 


• dc.b 

f B-B C C+D D+E F 

F+G 

O+A 

A+B C C+ 1 

1575 

number ： 






1576 


• da.1 

1 




1577 

dly^num: 






1578 


.da.i 

1 




1579 

L_work : 








• da. w 

l 





trk^num ： 








• d8.1 

• dc. w 

• dc • w 

• ds.l 

• ds • w 


ml : 
m2: 
avap ： 
fh: 

mj.lng: 

.da •1 

modorichi : 

• dc. b 

• d8 *b 

©rr_flg ： 

• dc •1 

tempo_err: 

• dc.b 


cmd_err: 

.d 

8iee_err: 



• dc.b 

no_rpt_num: 

• dc.b 

rpt_num_err: 

.dc.b 


• do.b 
octv_err: 

• dc.b 

length 一 err: 

• dc.b 



.do.b 


• do.b 
.num ： 

«do.b 

_®w_err: 

• do.b 

no_tmp_num : 

.do.b 

tmp_num_err: 

.do.b 

no_l_naa: 

• dc.b 
no_v_nua: 

• dc.b 

v_num_err: 

• do«b 

no_kc_num: 

• do.b 

kc_num_er: 

• dc.b 
inst_nun_err: 

• dc.b 

rnp_kakko_naahi : 

• dc.b 
too_many_key8 : 

• dc.b 

no_key: 

• do.b 

q.err ： 

• do.b 

rnp_mrol_err •• 
.dc.b 

y_com_err: 

.do.b 

_®L_err: 


pan_err 
tie_err 

• dc.b 

nacro_err: 


• dc.b 

• dc.b 



.even 

wk_sz : equ 

wk_az 2: equ 
ch_work: 

• da *b 


$00,$00,$00 9 $00 f $00,900 

16 ♦return buffer 

$00000000 

テンボの指定が無効です、章〇〇 
トラック番号が無効です 
music cmd error’ > )00 
サイズの指定が無効です 、 $00 
メモリ _« 保できません、拿⑼ 

チャンネル * 守が無効です \ 章 00 
配列の指定に板りがあります 、$00 
音粢用閱数は無効です 
MML の文法に « りがあります 、$00 
[ 1 の中の指定に » りがあります ’，$00 
] がありません 、$00 
« り返しの値が無効です ' 寒⑽ 

«0 适し番号の指定がありません 、$00 
«0 返し番号の指定が無効です ’，《00 
オクターブの # 号がありません 、$00 
オクターブの措定が無効です、 S00 
長さの值が無効です、拿 00 
トラック容量が足りません、章⑽ 

音色番号の指定があ D ません ’ ，聲 00 
® W の値がありません 、$00 
® W の僅が無効です 、$00 
テンポの僅がありません 、$00 
テンポの « が無効です \ $00 
長さの ® がありません \$00 
音置の ® がありません '$00 
音置の值が無効です *,$00 
キーコードの僅がありません • ，聿 00 
キーコードの僅が無効です、《 0 〇 
音色番号が無効です、寒 00 
} がありません ’,$00 
{) の中に音符が多すぎます \ $00 
{ } の中に音符がありません、韋 00 
Q の指定に誤りがあります 、《00 
{ } の中の文法に棋りがあります ’ ， $ 〇 0 
Y の指定にがあります *, $00 
® L の指定に棋りがあります 、*00 
P の指定に誤りがあります 、*00 
タイの指定に » りがあります*,黎扣 
マク D コマン r の使用法に誤りがあります • ，$00 
マク Dnv ン K に対しての音畏指定に » りがあります *, »00 
v>n3v>>* 中に誤つた *- ： i - 卜 * (* 

> が用いられています * ,$ 〇 0 

モシ * ； tl/- シ ■ ンク D37 ンド中に » 〇があります，，寒 00 
相対 1T リユ - ムク D37 ン r 中に棋りがあります 1 ,*00 
«0 返し回数が大きいか、《 0 追しの範囲が広すぎます *, 寒 00 
ファイル作成に失敗しました \ »00 


3 拿ワ ••クサイス**<2 の何乗） 

* format( kf , 0L, 0V , 9Q, lfoaw, 

8*wk_az 


parm: 


equ 

equ 


f parame 
) 何乘か 


laat_kf: 
aub_buf ： 


• da • b 

• end 


parm 拿 8 
8 
8 

1024 


►グラナダをやっていると，吐き気がしませんか？ 
レバー作って！ 


とくに4面あたりで0だれか ループ 
橘正彦 （ 17) 福岛県 


特集 ZMUSIC. FNC HI 









COWBELL 

a, 


E-PIANO 

0» 

AME 


/* こっちで 


1190 /t 

1200 It MELODY 

1210 ハ 

1220 a= M L16| : g<ddddddddd+d+cUd+d+d+d+ d+ffffffffd+d+d+d+d+|ld+d+>:| 
1230 b="L8 =1"10,13, I g al<d2. .c> al& a&vl(3a&_3a&_a&_ar 4 vl2<d&(d f e) 
24&e2 . A (e , e« ) 24L16rdea2&.a8 .g8ede2 . . =0 r®70 v 12pld>a*fag8 . a + agd4 . 

1240 c = M = riO, 13,4 L16gl<tfl d2.&d8.c+ c8 • >a+8 . < f 2&f 8> 

1250 c=c+c 

1260 d="=0 | : 072 o5 vl2 q6 g8g8r8ggr2g8g8ggr8 r |1 070 v!0 o4 q8 f8. 
ffr8:| r4.. 

1270 m - trk2(l, M ®70 vl2 q8 o4 kO^a) 

1280 n 一 trk2(l,”®78 vl2 o5 "+b> 

1290 m—t r k2( 1,475 vl4 o2 k0 pl"+c> 

1300 m_trk2(l f d) 

1310 /t 

1320 /拿 SUB 

1330 /t 

1340 b=°L8 =1"10,14,1 rg al<d2•*c> al& o4v8a4_3a&_a& - ar 4 vl0<d & (d,e) 
24&e2.«t(e,e-)24L16rdea2&a8.g8ede2.. =0 r®70 vl0pld>a+ag8.a+agd4 
1350 d= M =0 | : 076 〇 2 vl3 q4 ^8g8r8ggr2g8g8ggr8 r4 |1 金 70 vllo5 q8 ff 
r8:|r4 

1360 m - trk2(2 f M «76 v9 q8 o2 k8”+a> 

1370 m_trk2(2 f M «78 vl0 o5 "+b> 

1380 m trk2(2, M «75 vl4 o2 kl0 p2"+c> 

1390 n_trk2(2 t d) 

1400 ft 

1410 /• BASS 

1420 /t 

1430 a=..L16|: «71vl4g4vlIggvl2gvl4grgr4. g4vlIggvl4ggrgr8,®77pl<d8,> 

: I 

1440 b= M |：4 071vl4g4vlIggvl2gvl4grgr4. g4vlIggvl4ggrgr8.«77pl<d8,>：| 
1450 c="| : ggggr く g8>grgrg8gaa+ く d+d+d+d+r<d+8>d+rd+rd+8d>a+8 g8<g>gg< 
g>gg く fgcd>gaa+g く d+8<d+>d+d+ く d+>d+d+ く c+d+>g+a+c+d+>d+f : | 

1460 d = M | : g8g8r8ggr4rfdfg8g8ggr8 I 1 r2 ：| vl4gdfg<cdfg 
1470 r^trk2(3," q8 o2 k0 M +a) 

1480 m_trk2(3,b> 

1490 ■ trk2(3 f M 4l71 vl4 
1500 m 一 trk2(3 •“ vl5 o2 

1510 /拿 

1520 /t CHORD & BACKING 

1530 /拿 

1540 a= H L16| : d32&>a32&g&g2..rl：| 

1550 b=" し 16|:4 «77 〇 3 q6 p2 vl3 d4 v】2 p3 <a+r8•araara8•r4 ❺ 72 o5 pi 
vl3 a+r8ararar4 : | 

1560 c= M L16|:rcccrdddrd+d+d+rfff rgggc4rd+d+d+>a+4< d8d4dd2&d d+8d+4d 
+d+2&d+:| 

1570 d="|: «77 oS vl4 c8c8r8ccr2c8c8ccr8 r8.|1070 vllo5 occr8:| rr4 
1580 m_trk2(4 l H «72 vl0 q8 o4 k0 "+a) 

1590 ro_trk2(4, M k0 "+b> 

1600 m - trk2(4 f M «76 v9 o3 "+c) 

1610 m 一 trk2(4 ， d) 

1620 /拿 

1630 tt="L2 v8a&~3a&~a&~a&~a& - a&~a4~a 

1640 b= M L16|：4 977 o3 q6 p2 vl3 g4 vl2 p3 く fr8•ereere8•r4 ®72 o5 pi v 
13 fr8ererer4 : | 

1650 c= H L16| : rdddreeerfffrgM raaad4rfffc4 g8tf4g|{2&g f8f4ff2&f: | 

1660 d="|: «77 o5 vl4 d8d8r8ddr2d8d8ddr8 r8 |1 870 vllo4 a+8a+a+r8:| 
r4. 


o2 

o2 


5," ❺75 
5,b) 

5 •"977 


q8 〇 2 k0 M +a> 


vl2 


o4 


"♦c> 


1670 m_trk2(5 f 
1680 ro_trk2 《 5, 

1690 ro_trk2<5, 

1700 m.trk2(5 t 
1710 /t 

1720 a= M L2 v8dr3dfcm - d4H 

1730 b="L16|:4 977 o2 q6 p2 vl3 g4 vl2 p3<<dr8•orccrc8•r4 872 o5 pi v 
13 dr8crcrcr4:| 

1740 o="L16| : rgggraaara4a+a+<rocc rddd>jg4ra+a+a+f4 a8a4aa2&a a+8a+4a+ 

1750 d= M | : 077 〇 5 vl4 k0 g8g8r8ggr2g8g8ggr8 r |1 ®70 vl0 o4 y 53,20 f8 
•ffr8:| r4.. 

1760 m_trk2{6,"®75 q8 o2 k0”+a> 

1770 m trk2(6 t b) 

1780 m—trk2(6， M ®77 vl2 o4 "+c> 

1790 m trk2(6 v d) 

1800 /t 

1810 パ EFFECTS 

1820 /t 

1830 a= M Ll | : vl3g&vl4g：I 

1840 b= M L16 j:4 brbr <ere>b rbrb b8b8 b8br <eer>b rbbr <eer8> : I 
1850 c = "|: gl<gl d2.&d8.c+ c8 • >a+2 • &a+| 

1860 d= M rl r2L64<caLd&d+&e&f&g&a&b&<c&d&e4f&g&a&b&<cr4 rlrl 
1870 m.trk2(7 f M «74 q8 o3 k0 M +a) 

1880 m - trk2(7 l ,, 079 vl5 o4 ”+b> 

1890 m_trk2{7, M «72 v8 q8 o4 kl0 M +c) 

1900 m—trk2(7," v7 o2 kO "+d> 

1910 /i 

1920 /拿 DRUMS 

1930 /t 

1940 tt= M L16| : •• + bd+"c8" + bd+"r8"+sd+"c8 M + bd+"r” + bd+"rcfc"+bd+"or"+bd + "r" 
+sd+"c8 M +bd+" r 8”+bd+"c8"+bd+"r8"+3d+"c8|l"+bd+"r"+bd+"rc& M +bd+"c"+bd+" 
r M + bdf H r M + 8d + M c8 ,, *fbd+ M r8: | 

1950 a=a+bd+"r”+bd+"rc&”+8d0+"c"+sd0+”r"+Bd+"r"+Bd+"c&"+Bdl+"o"+Bdl+" 
r"+sdl+ M r" 

1960 bl = M | :3 M + bd+ M c8 M + bd+ n r8 ,, +8d+ M c8 ,, -f-bd+ M r M +bd+ M rc4 M +bd + M cr M + bd+ M r , ^ 
3d+ M c8 ,, + bd + 0 r8 M + bd+ M c8 M +bd+ M r8 M 4.ad+ M c8 M +bd^ M r M +bd + ,, rc& M 4-bd+ ,, o M -»*bd+ M r M + 
bd+ M r M + sd+ ,, c8 ,, +bd+ ,, r8: | 

1970 b2 = bd+ M c8"+bd+"r8.. + sd + "c8"+bd + , .r" + bd+”rc&" + bd+"cr"+bd+"r" + Bd+"c8 
••+bd + "r8 ， .+bd+"c8” + sd + "r8" + Bd + "c8"+bd+"r”+bd+"rc&"+Bd0+"c"+ad+"r"+Bdl + " 
r.. + bd+"o& M + ad0 + "c"+sd+“r.. + sdl + "r" 

1980 cl=bd+"c8"+bd+"r8"+Bd+"c8"+bd+” r ”+bd+"rc&”+bd+"cc&"+bd+"c"+Bd+"r 
4 H +bd + ,, c8 M -*-bd**- ,, r8 M + ad+ M c8 M +bd+ M r M +bd+ ,, rcaL ,, -*»bd4- M o M +bd+ M c& M + bd + ,, o M + sd'f- M 
r8 .•+ bd + n r8" 

1990 c2 = bd+ M cr M +bd+ M co M + ad-»* ,, r8 M +bd+ M c M 4.bd+ ,, ce80o6p2vl3a ,, 4bd+ M avl4a ,, -fb 
d+"a”+Bd+”avl5aaGvl27a" ♦bd+"a73o5vl4cr"+bd+"cc"+ad+"r8”+bd+”c"+bd+ M co 
”+bd+"r"+bd+"c”+bd+"c"+ad+”r8"+bd+"cc" 

2000 c3 = bd+ M cr M ^bd+ M cc ,, -f8d + ,, r8 ,, *fbd+ M c M +bd+ ,, c«80o6p2vl3a M ^bd-f M avl4a M 4-b 
d+"a M +Bd+"avl5aaevl27a" +bd+"d73o5vl4cr”+bd+"cc"+ad+"r8"+bd+"o"+bd+"cc 
,, +bd+ ,, r M 4.bd+ M c M +bd+ M c ,, -i-ad+ M r8 M +bd+ M c M +bd+ M o f, 

2010 dl=bd+ M c8 ,, +bd+ ,, r8 M +8d+ ,, c8 M +bd+ M r H +bd+ ,, rc& ,, +bd+ ,, ccaL M 4.bd*f ,, c M +Bd+ M r 
8 l, +bd+ M r8 n +bd+ ,, c8 ,, -fbd + n r8 ,, + Bd+ ,, c8 M +bd+ ,, r M +bd+ ,, roat M +bd+ M c ,, *»*bd4- ,, c& M +bd^ 
••c“+ad+“r8"+bd+”r8" 

2020 d2=bd+"cr"+bd+”cc"+Bd+"r8”+bd+"c"+bd+"cc"+bd+"rc"+bd+"c"+Bd+" r 8" 
+bd+”cc” +bd+"or"+bd+"cc"+ad+"r8"+bd+ M c"+bd+"c" +bd+"c"+bd+"r"+bd+"c”+ 
bd+..c" + BdVr"+sd+"r"+sd+"c"+sd+"c" 

2030 m^trk2(8 t M «73 o5 q8 vl4 kO ,f +p3+a) 

2040 m_trk2(8 f bl)：m trk2(8 f b2) 

2050 m 一 trk2(8,"|:”+cl>:m 一 trk2(8,”|l"+c2+":| H ):m trk2(8 f o3) 

2060 ro-trk2<8,dU :m_trk2 了 8 ， d2> 

2070 for i =l to 8 : m_trk2(i, M [loopJ M ) : next 
2080 in play() 


■ J スト 7 

10 / 本本 t 拿拿拿: l |$ 拿 I 拿:!;本本窣拿拿本 I 拿尊拿拿窣拿零拿本拿拿 $ 拿本本本本 t 拿本零拿搴 ：！ 拿本本拿 I $ 

20 /* 

30 /♦ THE SUPER SHINOBI 

40 ft 

50 /% THE SHINOBI 

60 /拿 

70 ft (C) SEGA / YUZO.KOSH1RO 

80 /拿 

90 ft ARRANGED BY Z.NISHIKAWA 

100 /% 


110 / 本拿拿本拿拿拿拿拿拿拿拿拿本 ♦!： 本本專辜拿拿:！拿本;！窣拿車拿拿 d 拿本本本拿拿拿拿拿本寒拿本本拿窜毒 

120 ra^init() 


130 

dim 

char 

v(4 

10) 








140 

150 

/* 

v={ 

AF 

56, 

OM 

15, 

WF 

0, 

SY 

0, 

SP 

0, 

PMD 

0, 

AMD 

0, 

PMS 

0, 

AMS 

0, 

PAN 

3, 

160 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

170 


26, 

8, 

5, 

7, 

2, 

30, 

3, 

3, 

3, 

0, 

180 


29, 

5, 

4, 

4, 

1, 

30, 

3, 

4, 

3, 

0, 

190 


28, 

4, 

2, 

6, 

3, 

30, 

3, 

1. 

3, 

0. 

200 


3 し 

10, 

3, 

5, 

1. 

0. 

3, 

1, 

3, 

0, 

210 

m vaet(70,v) 









220 

/* 

AF 

0M 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

230 

v=( 

33, 

15, 

0, 

0, 

0, 

0. 

0, 

0, 

0, 

3, 

240 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

250 


31 ， 

20, 

0, 

7, 

5, 

30, 

0, 

7, 

0, 

0, 

260 


31, 

10, 

0. 

7. 

5, 

20, 

0. 

0, 

0, 

0, 

270 


31, 

14, 

0, 

7, 

10, 

23, 

0. 

0, 

0r 

0. 

280 


31, 

31, 

0, 

7, 

0, 

0, 

0, 

0, 

0, 

0. 

290 

m vset(71 

.v) 









300 

/* 

AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

310 

v={ 

58, 

15, 

0, 

0, 

0, 

0, 

0, 

0, 

0, 

3, 

320 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

330 


13, 

14, 

0, 

3, 

1, 

23, 

2, 

1. 

0, 

0, 

340 


13, 

14, 

0, 

10 ， 

15, 

40, 

2, 

7, 

0, 

0, 

350 


14, 

14, 

0, 

3, 

1, 

38, 

2, 

1, 

0, 

0, 

360 


19, 

3, 

0, 

10, 

0, 

0. 

1, 

1. 

0, 

0, 

370 

m vset(72 

,v) 









380 

/* 

AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

390 

V=l 

61, 

15, 

0, 

0, 

0 ， 

0, 

0, 

0 ， 

0, 

3, 

400 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

410 


26, 

10, 

5, 

10, 

10, 

0, 

2, 

14, 

0, 

3, 

420 


31, 

20, 

11, 

15, 

11, 

127, 

1, 

3, 

7, 

1. 

430 


28, 

24, 

10, 

15, 

10. 

2, 

0, 

4, 

7, 

1, 

440 


19, 

21, 

12, 

15, 

11 ， 

0, 

0, 

2, 

7, 

1, 

450 

m vaet(73 

l ， v) 









460 

/* 

AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

470 

V=l 

0, 

15, 

0. 

0, 

0, 

0. 

0, 

0 ， 

0. 

3, 

480 

ハ 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

490 


6, 

5, 

0, 

15. 

3, 

16, 

0, 

0. 

6, 

0. 

500 


6, 

0. 

0, 

15, 

2, 

25, 

0, 

2, 

3, 

0, 

510 


8, 

0. 

0, 

15, 

2, 

26, 

0, 

2, 

3, 

0, 

520 


16, 

4, 

0, 

15, 

3, 

4, 

0, 

0, 

3, 

0, 

530 

m vaet(74 f v) 









540 

パ 

AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

550 

V={ 

44, 

15, 

0, 

0, 

0, 

0, 

0, 

0, 

0, 

3, 

560 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

570 


31, 

0, 

0, 

0, 

0, 

33, 

0, 

8, 

7, 

0. 

580 


16, 

15, 

0, 

6, 

3, 

8, 

0, 

8, 

7, 

0, 

590 


31, 

0, 

0, 

0, 

0. 

24, 

0, 

4, 

3, 

0, 

600 


31, 

15, 

0, 

6, 

3, 

4, 

0, 

4, 

3, 

0. 

610 

m vaet(75 

l,V) 









620 

/* 

AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

630 

V=( 

56, 

15, 

0, 

0, 

0, 

0 ， 

0, 

0, 

0, 

3, 

640 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

650 


16, 

14, 

0, 

3, 

3, 

26, 

0, 

3, 

6, 

0, 

660 


19, 

0, 

0, 

5, 

0, 

25, 

0, 

1, 

3, 

0, 

670 


26, 

0, 

0, 

3, 

0, 

26, 

0, 

1 ， 

3, 

0, 

680 


27, 

0, 

0, 

11, 

0. 

0, 

0, 

1, 

3, 

0, 

690 

m vset(76 

l,v) 









700 

ハ 

AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

710 

V=( 

58, 

15, 

0, 

0, 

0, 

0, 

0, 

0, 

0, 

3, 

720 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

730 


28, 

4, 

0, 

5, 

0. 

37, 

1, 

1. 

7, 

0, 

740 


22, 

9, 

0, 

2, 

0, 

47, 

1, 

12, 

0. 

0, 

750 


29, 

4, 

0, 

6, 

0, 

37, 

1, 

3, 

3, 

0, 

760 


31, 

10, 

0, 

5, 

10, 

0, 

1, 

1, 

0, 

0, 

770 

m vset(77 

,v) 









780 


AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

790 

v=( 

58, 

15, 

0, 

0, 

0, 

0, 

0, 

0, 

0, 

3, 

800 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

810 


20, 

0, 

0, 

6, 

0, 

37, 

0, 

0, 

0, 

0, 

820 


20, 

0. 

0, 

6, 

0, 

47, 

0, 

4, 

0, 

0, 

830 


20, 

0, 

0, 

6, 

0, 

42, 

0, 

0, 

0, 

0, 

840 


14, 

10, 

0, 

8, 

0, 

0, 

0, 

1, 

0, 

0, 

850 

m Vi 

iet(78 

、 v> 









860 

/* 

AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

870 

v=t 

59, 

15, 

0, 

0, 

0, 

0. 

0, 

0, 

0, 

3, 

880 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

890 


31, 

21, 

19, 

6, 

2, 

0, 

0, 

15, 

6, 

0, 

900 


31, 

21, 

12, 

6, 

2, 

35, 

0, 

8, 

6, 

1, 

910 


31, 

21, 

13, 

6, 

3, 

32, 

0, 

7, 

0, 

0, 

920 


31, 

19, 

16, 

9, 

2, 

0, 

0, 

2, 

0, 

0, 

930 

m_vaet(79 

,v) 









940 

ハ 

AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 

950 

V={ 

59, 

15, 

0, 

0, 

0, 

0, 

0, 

0, 

0, 

3, 

960 

/* 

AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

970 


31, 

0. 

0, 

5, 

0, 

12, 

0, 

14, 

0, 

0, 

980 


31, 

10, 

0, 

5, 

15, 

60, 

0, 

0, 

0, 

0, 

990 


27, 

27, 

0, 

10, 

15, 

37, 

0, 

10, 

0, 

0, 

000 


28, 

14, 

0, 

7, 

15, 

0, 

1, 

0, 

0, 

0, 


1010 m V8et(80 f v) 

1020 str al256],b[256],c[256] t d[ 2561 
1030 3tr al[256J,bl[256].cU256],d1[256J 
1040 str a2(256] 2125 6 】， c2 【 256] ， d2 【 256 】 

1050 str x[256) f y[2S6] f z[2S6] 9 b3(2S6) 9 c3[2S6) 

1060 int i 
1070 / 拿 

1080 str bds M y2 f 23 M i sd= f, y2 # 15 M f sd0= M y2,16 M f ad 1= M y2,14 M 
1090 /»str bd=”y2,23” ， sd="y2,21” ， sd0="y2,22",Bdl=”y2,20" 

もいいよ 

1100 str pl = ,, y3 l l M f p2 = M y3 f 2 M ,p3 = H y3 f 3 M 
1110 /» 

1120 for i =1 to 8 ： m_alloc(i» 8000):ro_assign(iii) : next 
1130 ハ 

1 140 m_tempo(112) 

1150 /拿 

1160 for i =l to 8:trk2(i f M [do] M ):next 
1170 /拿 

1180 key 2•”m 一 play()"+chr$U3):key 12,"m_atop() '^chrt(13) 
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Nishikawa Zenji 


西川善司 


いままで作った X - 巳 ASIC のミュージックプログラムは「〇 PM 
ファイル」の形式にしておくと，システム上でいつでも曲の演 
奏ができてたいへん便利です。短いプログラムで変換で吉ます 
から，ぜひ入力して使ってみてください。 


既存の BASIC ミュージックプログラム 
を OPM ファイルに変換するプログラムを 
作成してみました。その名も（べつに凄ん 
で言うまでもないけど）簡易 OPM ファイル 
ジェネレータ 「 OMUSIC . FNC 」。 もうひと 
つ，機械語は嫌いだ！という人向けに 
BASIC 版も用意しました（こちらは多少使 
い勝手が悪い）〇 


J 入力と_ 

リスト1のダンプリストをマシン語入力 
ツール （ 6月号付録デイスクの mac . x な 
ど）から入力するか，またはリスト2のソ 
ースプログラムをエディタから入力しアセ 
ンブルしてください。以下の作業は基本的 
に ZMUSIC . FNC (97 ページ）の場合と同 
じ手順ですので初心者の方はそちらを参照 
してください。ここでは簡潔に示します。 

また， ZMUSIC . FNC と同様 D 0 SCALL . 
MAC をインクルードする必要があります 
のでご注意ください。 

アセンブル，リンクを終了したら生成さ 
れた OMUSIC . X を OMUSIC . FNC にリネ 
ームし，自分のシステムディスクの BASIC 
のデイレクトリへコピーしてください0 
次に BASIC のコンフイギ ユレーシヨン 
ファイルを変更します。エディタで BASIC . 
CNF を読み込んでください。 

画面から， 

FUNC 二 MUSIC 

の1行を削除し，いちばん下の行に， 
FUNC=OMUSIC 

を付け足して〈ださい。これで準備完了で 
す。あとはいつもどおり， 

A > BASIC 

で OMUSIC . FNC を組み込んだ BASIC が 
起動します。 


□ MUSIC . FNC の使い方 


使い方はいたって簡単でず。 OPM フアイ 
ルへ変換したい BASIC のミュージックプ 


ログラムを LOAD し RUN するだけです。 
RUN するとカレントドライブのカレント 
デイレクトリに TEMP . OPM というファ 
イル名の OPM ファイルを作成します。ドラ 
イブの準備ができてぃなかったりすると当 
然のことながらエラーが発生しますからご 
注意。また， OMUSIC . FNC と MUSIC . 
FNC は共存できません。 MUSIC . FxNC が先 
に登録されている場合は OPM ファイルは 
作成されず，通常どぉり音楽が演奏される 
だけです。 

さて，あとは システムへ 帰還し，できた 
TEMP . OPM を，お好みのファイルネーム 
(〜 . OPM ) に変更するなりしてください。 
演奏法はすでにご存じですね， 

COPY ファイルネーム OPM 
です。繰り返い、ぃます力 5 ' OPMDRV . 父が 
デバイスドライバとして登録されているこ 
とが前提です。「デバ、イスドライバってなん 
じやらほい？」なんていっている 「こまっ 
たちやん」は速やかに 「 Human 68 k ユーザ 
ーズマニュアル j の「システムの 構築」 の 


ゲームミュージックなど，ミュージックプロ 
グラムの中には MML の [DO] 〜 [LOOP] を使っ 
て無限ループで演奏するものがあります。いく 
ら素晴らしい音楽でも，聴き飽きてしまったり， 
集中して思考を巡らせたいときなど，演奏を止 
めたいと思うことがあります。こんなときはど 
うしたらよいのでしよう。なんとか OPMDRV. X 
へ演奏制御のコマンドを送ることが出来ないで 
しようか。 

皆さんはシステム予約ファイル 「CONj という 
のをご存じでしようか。これは CONSOLE (コン 
ソール）の略で，キーポードからの入力または 
スクリーンへの出力を指定するときに使用しま 
す。この予約ファイル名を駆使して OPMDRV. X 
へコマンドを送ることができるのです。やり方 
は OPM ファイルを演奏する要領で， 

A > COPY CON OPM 

です。これを実行すると BASIC の INPUT 命令のよ 
うな入力待ち状態となりますので，前の方で説 
明した 「OPM ファイル フォーマツ ト」の コマンド 
を入力してリターンキーを押してください。た 
とえば演奏を止めたいのなら， 


項を開きましようね。 


日 ASIC 版の入力方法と使用法 


さて，次に BASIC 版の説明をします。こ 
ちらは， BASIC を普通に起動しリスト3 
を入力してください。入力を終えたら， 
SAVE @，， MAKER . BAS ” • 

でセーブしてください。 SAVE ◎とは 
BASIC プログラムを行番号なしでセーブ 
する命令です。 

では，前述の OMUSIC . FNC の起動法を 
参考にして 「 MUSIC . FNC を組み込まない 
BASIC 」 の システム を起動してください 
( BASIC コ ンフイ ギユ レーシヨンフアイ 
ルから FUNC 二 MUSIC の1行を削除す 
る）。 MUSIC . FNC が未登録になっている 
か 確認す るには，ダイレクトに， 
m _ init () 

などとすれば， 

関数は定義されていません 
という エラー メ ッセー ジが返つてくるはず 


A > COPY CON OPM 
(s) 

です。 

[BREAK] キーでこの状態を終了します。 
もちろん，演奏再開の 「(c)」 や初めから演奏さ 
せる 「（p)」 なども送ることができますよ。 

私はいちいち COPY 命令を打ち込むのは面倒 
臭いので以下のようにしています。 

(s) 

のように演奏制御命令のみを書いた OPM ファイ 
ルを作成，この OPM ファイルを 「STOP. OPM」 
とし，今度は， 

ECHO OFF 

ECHO 演奏を中断します 
COPY STOP. OPM OPM 
のようなバッチファイルを作って，これを 「E. 
BAT」 とします。これで，演奏を止めたいとき 
は， 

A>E (RETURN) 

のI文字で OK, ほとんど新しいコマンドが增え 
た気分です。同様に「演奏再開」や「演奏開始 j 
も作っておくといいでしよう。 
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です（エラーなしで 「0 K 」 と出て実行でき 
てしまった人は初めからやり直すように）。 

では，好みの BASIC ミュージック プ ログ 
ラムをロードしてください。 

ところで BASIC 版は音楽用外部関数を 
func 〜 endfunc によって作ったユーザー関 
数で代行し，これに出力されたパラメータ 
を OPM ファイルフォーマットに加工して 
ファイルとして出力するものです 0 func 
〜 endfunc 命令で作ったューザー関数は配 
列変数のパラメータを引数として持つこと 
ができません。よって，配列変数を引数と 
する m _ vset 命令はどうしても再現できない 
のです。 

そこで， BASIC 版は，音色設定に使用す 
る配列変数をグローバル変数「 V 」に統一す 
ることによって，むりやり m _ vset 命令をエ 
ミュレートします。そんなわけで OPM ファ 
イル変換対象のミュージックプログラムの 
音色設定用配列変数を 「v (小文字)」に統 
一修正してください。 

具体的には，たとえば， 
dim char oass (4,10) ={•" 

という変数で音色を設定しているならば， 
これを， 

dim char v (4,10) ={ … 

に，また， 

bass ={. 

は， 

v ={. 


に変更してほしいわけです。 

次に， 

search ’， m _ vset ” 

で，プログラム中に使用されている mvset 
命令をリストアップし，パラメータを音色 
番号のみに（配列型の引数は削除）してく 
ださい。たとえば， 
m _ vset (70, voice ) 

は配列変数である voice をカットし， 
m _ vset (70) 

というようにして〈ださい。なお，ミュー 
ジックプログラムのなかには音色設定を行 
わず，プリセットの音色のみを使用してい 
るものもあります。 こういった ものに つい 
ては以上の作業を行う必要はありません。 

今度は，プログラム先頭に o _ open の1行 
を加えてください。多くの場合は， 

1 o _ open () 

でいいはずです。この o _ open は以降のファ 
イル出力に備え， TEMP . OPM というファ 
イルをオープン（新規作成）する関数です。 

ふう一。これでやっと下準備が終わりま 
した（マシン語版 OMUSIC . FNC の場合は 
今までの作業をする必要はありません）。 

では，ミュージックプログラムよりも後 
ろに MAKER . BAS を， 

LOAD ® " MAKER . BAS ”， 行番号 
のようにしてロードします（必ず， 
MAKER . BAS はミュージックプログラム 
よりも大きい行番号でロードしてくださ 


ZMUSIC . FNC を使用したミュージックプログラムのコンバート 


今月発表となった ZMUSIC . FNC を使用したミ 
ュージックプログラムを 0 PM ファイルにコンパ 
一卜する手順を簡単に説明します。 

まず， ZMUSIC . FNC と OMUSIC . FNC の2つの外 
部関数を組み込んだ BASIC を立ち上げてくださ 

い0 

次に， 

m _ switch ( l ) 

を実行してください0このコマンドは ZMUSIC . 
FNC に入っている関数で, m _ trk 2 (同じく ZMUSIC . 
FNC に内蔵の）命令に出力された MML をファイ 
ル出力するかどうかのスイッチ命令です。スイ 
ッチ= I でファイル書き出しモード，== 0で通 
常動作モードです。 

コンバートしたいミュージックプログラムを 
ロードしたらディスクドライブの確認をして 
RUN してく ださい。 「 ZMUSIC . TMPj と 「 TEMP . 


OPM 」 の2つのファイルが作成されるはずです。 
ZMUSIC . TMP は mJrk 2 によって出力された MML 
ですのでこれをエディタなどで TEMP . OPM と結 
合して再セーブします。具体的には， 

A>ED TEMP . OPM 

でまず初めに OMUSIC . FNC で出力されたものを 
ロードしてください 0 m play すなわち「 ( p ) 」を画 
面から探し出しこの上にカーソルを合わせます。 

[ ESC ] + [ Y ] のファイル読み込みコマンドで 
ZMUISC . TMP をロードしてください。うまくフ 
ァイルが結合されたことを確認したら [ ESC ] + 
[ E ] でファイルをセーブ，エディタを終了して 
ください。 

A > COPY TEMP . OPM OPM 
これで曲が鳴り出すはずです。 

BASIC 版のコンバータを使用してのコンバー 
卜も以上の手順と同様に行ってください。 


QPMA や OPMD を使用したミュージックプログラムは 


1989年4月号に発表された 「0 PMA 」 や本誌6月 
号の付録ディスクに収録された 「 OPMD 」 は FM 音 
源と ADPCM (サンプリング音）を同期するドラ 
イバで，これらを駆使したミュージックプログ 
ラムが Oh ! X 紙上に数多〈発表されてきました。 
もちろんこれらのミュージックプログラムも 


OPMDRV . X を使用して演奏されるわけですから 
今月の OMUSIC . FNC などで OPM ファイルへ問題 
なくコンバートが可能です。 

OPMD を使用しているのであれば MIDI 用のミ 
ユージックプログラムであってもコンバートで 
きます。 


ぃ)。 

無事口ードされたことを確認し， ディス 
クドライブの準備をしたら RUN して〈だ 
さい。カレント ドライブの カレントデイレ 
クトリに TEMP . OPM という OPM フアイ 
ルを作成します。 


獅上の ■ 


演奏制御に m _ stat 命令を使用し， while や 
goto で無限ループを構成してあるような 
ミュージッタプログラムをコンバート する 
とファイルサイズが 「〇〇」 になってしまう 
(すなわち永遠にファイル出力を続けてし 
まう）ので注意してください。たとえば， 
こんなやつです。 
while 1 

while m _ stat () 
endwhile 
m_pla ハ ) 
endwhile 

こういったプログラムは， while 文などを 
削除し， m _ play () のみにしてください。 

「0 PM ファイルジェネレータ」は以下の 
命令のみをコンバートします。 
m_alloc 
m _ assign 
m_imt 
m_tempo 
m_trk 
m_vset 
m _ play () 

これ以外の命令，たとえば m _ cont ， m_stop 
はコンパ、一卜しません 0 使用していた場合 
はェラーが発生します。まあ，ほとんどの 
ミュージックプログラムは上記の7つの命 
令で作られているはずですからなんら問題 
もないはずです ( m _ atoi なんて使った人見 
たことないよ，あたしや . )〇 

最後にもう一点だけ注意。ファイル操作 
をするようなミュージックプログラムのコ 
ンバートは避けてください，コンバートに 
失敗する可能性があります（そんなミュー 
ジッタプログラム，あるわけないか）〇 

とりあえず，超短いミュージックプログ 
ラムを 用意しました。リスト 4がそれ です0 
このプログラムを 「 BASIC 版 0 PM ファイ 
ルジェネレータ」でコンバート するために 
下準備処理を施したのがリスト 5,0 PM フ 
ァイルにコンバート した ものが リスト 6で 

す。もちろん機械語版である OMUSIC . 
FNC を使用してリスト 4 を直接コンバー 
卜しても，リスト6と同じものが作成され 
ます。 
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SUM ： 

0D 

4D 

54 

45 

4D 

50 

2E 

4F 2F87 











SUM ： 

E0 

A5 

83 

A2 

84 

9C 

7D 

E7 FEC6 











SUM ： 

25 

ED 

D7 

B9 

AA 

IF 

8A 

F0 2AC4 































0280 

00 

00 

03 

4D 

3F 

39 

00 

00 

C8 

057F H まで 0 で埋める 






0100 

00 

00 

01 

02 

00 

00 

ei 

32 

36 

0288 

03 

00 

FF 

40 

4F 

EF 

00 

0A 

8A 











0108 

00 

00 

01 

62 

00 

00 

01 

CA 

2E 

0290 

24 

5P 

4A 

80 

6B 

72 

4E 

75 

ED 











0110 

00 

00 

01 

F2 

00 

00 

02 

0A 

FF 

0298 

48 

E7 

88 

00 

42 

39 

00 

00 

32 

0580 

00 

00 

eo 

00 

00 

00 

ee 

00 

00 

0118 

00 

00 

01 

AA 

3F 

3C 

00 

20 

46 

02A0 

03 

4B 

28 

3C 

00 

00 

27 

10 

E9 

0588 

00 

00 

00 

00 

00 

00 

00 

00 

00 

0120 

48 

79 

00 

00 

03 

42 

FF 

3C 

41 

02A8 

02 

80 

eo 

00 

FF 

FF 

80 

C4 

C4 

0590 

00 

04 

00 

04 

00 

04 

00 

04 

10 

0128 

5C 

8F 

33 

C0 

00 

00 

03 

00 

El 

02B0 

4A 

39 

00 

00 

03 

4B 

66 

0C 

43 

0598 

00 

04 

00 

04 

00 

0-1 

00 

04 

10 

0130 

5B 

F9 

00 

00 

03 

4C 

IE 

75 

66 

02B8 

4A 

00 

67 

0E 

13 

FC 

00 

FF 

CD 

05A0 

00 

04 

00 

04 

00 

4C 

00 

04 

58 

0138 

42 

39 

00 

00 

0 3 

4C 

FF 

IF 

E8 

02C0 

00 

00 

03 

4B 

D0 

: 3C 

00 

30 

8A 

05A8 

00 

04 

00 

04 

»U 

04 

00 

04 

10 

0140 

4E 

75 

45 

F9 

00 

00 

03 

4D 

51 

02C8 

14 

C0 

48 

40 

02 

80 

00 

00 

DE 

05B0 

00 

04 

00 

34 

00 

04 

00 

04 

40 

0148 

20 

2F 

00 

OC 

2 2 

2F 

00 

16 

C2 

0200 

FF 

FF 

88 

FC 

00 

0A 

66 

D6 

C8 

05B8 

00 

04 

00 

04 

00 

()‘l 

00 

04 

10 

0150 

14 

FC 

00 

28 

14 

FC 

00 

61 

A9 

02D8 

4A 

39 

00 

00 

03 

4B 

67 

06 

3E 

05C0 

00 

0A 

00 

OA 

00 

06 

00 

08 

22 

0158 

61 

00 

01 

3E 

14 

FC 

00 

2C 

DC 

02E0 

4C 

DF 

00 

11 

4E 

75 

14 

FC 

0F 

05C8 

00 

0A 

00 

30 

00 

30 

00 

48 

B2 

0160 

30 

01 

61 

00 

01 

34 

14 

FC 

D7 

02E8 

00 

30 

4C 

DF 

00 

11 

4E 

75 

2F 

05D0 

00 

2 0 

00 

28 

00 

18 

00 

18 

78 

0168 

00 

29 

61 

00 

00 

F6 

60 

00 

E0 

02F0 

70 

00 

61 

04 

70 

0 0 

4E 

75 

08 

05D8 

00 

14 

00 

08 

00 

06 

0 0 

18 

3A 

0170 

01 

80 

45 

F9 

00 

00 

03 

4D 

0F 

02F8 

41 

FA 

00 

30 

21 

40 

00 

06 

D2 

05E0 

00 

14 

00 

0E 

«o 

1A 

00 

48 

84 

0178 

20 

2F 

00 

0C 

22 

2F 

00 

16 

C2 











05E8 

00 

04 

00 

00 

00 

00 

00 

00 

04 











SUM ： 

62 

4B 

E3 

02 

04 

F0 

D8 

56 3F50 

05F0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM ： 

75 

B3 

84 

30 

B5 

96 

CD 

45 BD6B 











05F8 

00 

00 

00 

00 

00 

00 

00 

00 

00 











0300 

4E 

75 

58 

8F 

70 

01 

60 

04 

: 7F 











0180 

14 

FC 

oe 

28 

14 

FC 

00 

6D 

: B5 

0308 

58 

8F 

70 

02 

48 

E7 

80 

00 

08 

SUM ： 

00 

78 

00 

C0 

00 

CE 

00 

E0 7B5F 


リスト2 ソース 



bbbbbbb 1111111 
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119 

120 

121 

122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

•M2 

143 

144 

145 

146 

147 

148 

149 

ISO 

161 

152 

153 

154 

155 

156 

157 

158 

159 

160 

1(U 

162 

163 

164 

165 

166 

167 

168 

169 

170 

171 

172 

173 

174 

176 

176 

177 

178 

179 

180 

181 

182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 




ra_tempo : 


m_trk: 


mtr—lp: 


m 一 play: 




fwrts ： 


nuro_wrt: 


bsr num__wrt 
move.b f••••(a2>+ 
move, b f *0* , (a2)4» 
move.b # *,*,(a2) + 
moveq.1 #55 - 1»d2 


move.b 
bar 

move.b 

dbra 

subq.1 

move.b 

bar 

bra 

lea 

move•1 
move.b 
move.b 
bsr 

move.b 

bar 

bra 


(aO) 4- f dO 
num_wrt 
#•••,(a2) + 
d2 f vet lp 
#1,a2 

• • ド ,(a2)t 
fwrts 
bye_bye 

buffer»a2 
$000c(a7) f d0 
♦ , ( , ,(a2)4 
•'o' t (a2)f 
num wrt 

fwrta 
bye_bye 

lea buffer,a2 
movea.1)0016(a?} f al 
move.1 $O00c(n7),d0 

move.b # 1 (*,(a2)+ 
move.b #.t’ ， <ii2) + 
bar num_wrt 
move.b #* ド •<a2> + 


(a2) + 


move.b (al) 
bne•a mtr_ 
subq.1 #1,a2 

bar fwrta 

bra bye_bye 

lea buffer t a2 

Bove.b #'( r » («2)+ 
move.b I'p 1 ,(a2) + 
move.b # 1 > *.(a2) + 
bsr fwrta 
bra bye_bye 


lea buffer,a2 

move.b 1 •(a2)- 

move.b ,(»2) 

move.b #* ) * •(( 
bar fwrta 

bra byo_by 


2 い 


t8t .b 
bmi 

move.b 
move•b 



傘 v number 
拿 dummy 


• jCet one data 


拿 delete last 


ttempo 


拿 mml data 
拿 track num 


拿 。 r if 

拿 save a2 


♦ buffer に败字を書く 

* < d0=U きたい ® (0-65535) 

* < a2 = 害き込みたいアドレス 
$ > a2：next addr 

拿 X 

movem. 1 d0/d4,-(sp) 


193 

194 

195 

196 

197 

198 

199 

200 
201 
202 

203 

204 

205 

206 

207 

208 

209 

210 
211 
212 

213 

214 

215 

216 

217 

218 

219 

220 
221 
222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 


254 

255 

256 

257 

258 

259 

260 
261 
262 

263 

264 

265 

266 


clr 
move•1 
andi•1 

divu 
tat .b 
bne. a 
tat.b 
beq. s 
move.b 


awap 
andi•1 
divu 
bne • a 
tst .b 
beq. s 
movem.1 
rta 

•o: 

move.b 
movem•1 
rts 

t ： 

moveq.1 
bsr 


lea.1 
move•1 
rtB 

fopen_err: 

addq.1 
noveq.1 
bra • b 



nodorichi : 

.dc 

rtn_buffer: 

• da 
fh ： 

• da • w 
fopen^err^msg : 

• dc • b 


(wrt_flg) 

#10000, d4 

,d0 tdOr0-65535 


d4,d0 td0=d0/d4 

(wrt_flg) 



めてじやないのなら必 
めてのケース 


ず書く 


#$30,d0 

d0, (a2)> U 文字ライト 


d0 拿 d0= 汆 D 

#$ffff,d0 

#l0,d4 td4=d4/10 

nmw_lp 

(wrt_flg) 

wrt zero 

(spT+,d0/d4 


• •0 、 (a2)i 
(8p)-f ( d0/d4 


#O,d0 

junbi 

#0,d0 


modoriohi(pc),aO 
d0 v $OO06(a0) 


#4 f ap 

#l,d0 

err_m8g_Bel 

*err_num 

#4 ,op 
#2,d0 

拿 err_num 

d0 f -(a7) 

#l 9 d0 

#2 f d0 


err_cd_tbl(pc,dO.1),al 

junbi 



(a7)4,d0 


fopen_ei 
fwritej 


) 00 ,$ 00 , 100 ,) 00 ,$ 00 ,$00 

16 拿 return buffer 

1 拿 file handle 

•ファイルのオーブンに失敗しました•，的 0 
，データの塞#込みに失敗しました 
'TBHP.OPM' ,*00 
1 
1 

512 


2 

3 

4 

5 

6 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 


リスト3巳 ASIC 版 

end 

func o_open() 

atr fn[256]="TEMP.OPM" 

fopen{fn,"c ”） 

endfunc 

func m_init() 

fwrites (” ⑴ "+chr$ (13) +chr$ (10),0) 
endfunc 

func m_vset(a;int) 
atr d[256] 
int i,j 

d="<v"+str$<a> + " ,0,，. 

for i=0 to 4 : for j=0 to10:d=d+str$(v(i,j))+"," ： next:next 
d=left$(d,len(d)-l)+")"+chr$(13)+chr$(10) 
fwrites(d,0) 
endfunc 

func m alloc(t ； char,s;int) 
str d[256] 

d= M (ra ,, + 8tr$(t) + ,, f ,, + atr$(s) + ,, ) ,, +chr$(13)+chr$(10) 

fwrites(d,0) 

endfunc 

func m_asaign(c;char,t;char) 
atr d[256] 

d="(a"+atr$(c)+ M ,"+str$(t)+")"+chr$(13)+chr$(10) 

fwrites(d,0) 

endfunc 

func m_tempo(t ； char) 
atr d[256] 

d="(o"+str$(t) + ,, ) ,, +chr$(13)+chr$(10) 

fwrites(d,0) 

endfunc 

func m_trk ( t;char,s;atr) 
fwrites (" (t M + str$ (t) + ,, ) ,t ,0) 
fwrites(s,0) 

fwrites(chr$(13)+chr$(10),0) 

endfunc 

func m_play() 

fwritei( u (p)",0) 

endfunc() 


Oh!X 1990.10. 











リスト 4 サンプ/レミュージック ( mp _ name . bas ) 


リスト5 BASIC 版対応の修正 ( mpnm - cnv . bas ) 


リスト6 OPM フ アイ ル ( mp - name . opm ) 


10 /t/t/t/t/t/t/t/t/x/t/t/x/ 

20 /t MAPPY NAME ENTF 

30 /拿 (C) namco 

40 ft Arranged by Z.Nishikawa 

50 /t/t/t/tft 
60 m 一 init(> 


80 dim char roeiody(4,10 


90 

/*AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

PAN 


100 

56, 

15, 

0, 

0. 

0, 

0, 

0, 

0, 

. 0, 

3, 

<し 

110 

/ 本 AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 

AME 

120 

31, 

0 t 

0, 

0, 

15, 

35, 

2, 

13, 

. 0, 

0, 

0, 

130 

31, 

0, 

0, 

0, 

I5 t 

48, 

2 f 

9, 

.1, 

0. 

0, 

140 

31, 

0, 



15, 

28, 

2, 

1, 

r 0, 

0, 

0, 

150 

28, 

0, 

〇 , 5, 

8, 

0 t 





0) 


160 m__vaet(1,melody) 

170 dim char bass (4,10)= 
180 パ AF OM WF SY SP 
190 61 t 15, 0, 0 9 0 

200 /IAR DR SR RR SL 
210 31, 5, 3, 3,1 

220 31, 8, 7, 5, 3 

230 31, 8, 7, 5, 2 

240 31, 8, 7, 5, 2 

250 ro^vaet(2,bass) 

2G0 dim char harm(4,10)= 
270 /IAF OM WF SY SP 


/ 拿 SOUND NUMBER 


1o^open() パこの lfr を： 0 加 

10 /^/tfX/t/t/t/t/t/t/t/t/t/t/t/t/t/t/t/t/t/ 

20 /% MAPPY NAME ENTRY 
30 /t (C) namco 

40 /t Arranged by Z.Nishikawa 

50 

60 ro 一 init( 


"SOUND NUMBER 2 
PMD AMD PMS AMS PAN 
0, 0, 0 V 0, 3 v 0 9 

OL KS ML DTI DT2 AME 
23• 0 t 1, 3, 0, 0, 

C,1,1. 0, 0,0, 

0,1> 2. 7 f 0, 0, 

e,i 9 し 7 • 0 f o) 

ハ SOUND NUMBER 3 
PMD AMD PMS AMS PAN 


80 

dim char 

V { A , 

10)= 

{ 

/ 霉紀 

列変数は 

V に 

90 

/ 本 AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 1 

100 

56, 

15, 

0. 

0, 

0, 

G, 

〇 , 

0, 

0, 

110 

/ 拿 AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI1 

120 

31, 

0, 

0, 

e. 

15. 

35, 

2, 

13, 

0, 

130 

31, 

0, 

0. 

o, 

15, 

48, 

2 f 

9, 

1. 

140 

31, 

0, 

0, 

0, 

15, 

28, 

2. 

1, 

0, 

150 

28, 

0, 

0. 

5, 

8, 

0, 

し 

1• 

0t 

160 

m_v8et(1) 



/ 

♦ 配列変 « の引 ta そ 

170 

vr | 




/ 

* ここも同 tt ! 

:… 

180 

/ 窠 AF 

OM 

WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 1 

190 

61, 

15, 

0, 

0, 

0, 

〇 , 

〇 , 

0, 

0, 

200 

/ 拿 AR 

DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 1 

210 

31, 

5, 

3, 

3, 

1. 

23, 

0, 

1, 

3, 

220 

31, 

8, 

7, 

5, 

3, 

0, 

1. 

1• 

0, 

230 

31, 

8, 

7, 

5, 

2, 

〇 , 

1, 

2, 

7, 

240 

31, 

8, 

7, 

5, 

2, 

0, 

1, 

1, 

7 t 


3, 0, 
T2 AME 
0. 0, 


0. 

0 } 


250 m_v8et(2) 
260 v=( 


パ配列変 « の 21 K をカツ 
/ 拿ここも v にする … 


0, 

〇 1 


280 

6 f 15 f 

0, 

0, 

0, 

0, 

0, 

0, 

0, 

3, 0, 

270 

/ 拿 AF OM WF 

SY 

SP 

PMD 

AMD 

PMS 

AMS 

290 

ハ AR DR 

SR 

RR 

SL 

OL 

KS 

ML 

DTI 

DT2 AME 

280 

6» 15, 0, 

0, 

,c, 

0, 

, o, 

0, 

0, 

300 

31,0, 

0, 

15, 

0, 

10, 

0, 

6, 

,3, 

0, 0, 

290 

ハ AR DR SR 

RR 

SL 

OL 

KS 

ML 

DTI 

310 

17,18, 

11, 

15, 

0, 

0, 

1, 

3, 

， 0. 

0, 0, 

300 

31 f 0, 0, 

15, 

0, 

10, 

,0, 

6, 

3, 

320 

15 t 20 f 

8, 

15, 

3, 

0, 

1, 

0, 

! 3, 

0, 0, 

310 

17,18,11, 

15, 

0, 

‘I 

.1. 

3, 

0. 

330 

16, 16, 

11, 

15. 

0, 

0. 

1, 

1. 

, 7, 

0, 0} 

320 

15, 20, 8, 

15, 

, 3 f 

0, 

r 1, 

0, 

3, 

340 

m_v8et(3, 

harm) 








330 

16 v 16, 11 ， 

15, 

0, 

0, 

.1, 

1, 

7, 


i>f rr2>q4b4<q 
12 y48 f 0 p3' 

la, 

460 

470 

12 

y49 

24p3, 

♦ai 

480 

11 

y5? 

0 p3. 

4b) 

490 

11 

y51 

24p3. 

4b) 

500 

12 

y52 

0 p3* 

♦c> 

510 

10 

y53 

20p3* 

♦c> 

520 


.1:18rl:|. 

)：next 

530 


350 /t 

360 str a[256] f b[256] # o[256],d[256J 
370 /拿 

400 for i=l to 8:m_alioc(i , 1000 ):m_as8ign(i,i)：n 
ext 

43® /t 

440 m_tempo(130) 

450 a='*L16agf4-gbag+a<c>ba+b<dc>b<c fed+edc>bag8 く 

tf8>g4 

460 b= M L4fgab c8r.rd 
470 。： "L8a く ct>b<bo く。 >d<d> 

480 m trk(l f H #lo4 q4 
490 m trk(2, M «lo4 q4 
500 m trk(3, M ilo4 q4 
510 n trk(4 f M ilo4 q4 
520 m trk(5 f M ilo2 ql 
530 m^trk(6 l ,, §2 o2 ql 
540 for i=7 to 8:m 一 trk 《 

550 /拿 

560 & ="L16| : <de-dc>a8g8r8<c8e-4 de-dc>a8g8r8<c8> 
a4< de-dc>a8g8r8<cef8f -*>8 tfagec8>g8r| I<c>a8g4 : | <e-d 
8c4> 

670 b="L16| : aga<c>a8tf8r8a8a4 aga<c>a8g8r8a8tf4 
aga<o>a8g8r8b<cd8d^8 egec>n8g8r 丨 1<c>a8g4 : |<c>a 

8tf4 

580 c='*L81 ： o. <cl6>c<c>o<c>o<c> o. <cl6>c<o>c<cc> 
o c.<ol6>o<c>c<co>c >tf«<gl6>g<g|l>ggab< : |o<co>o 
590 m 一 trk<1,a) 

606 m_trk(2 t a) 

610 m_trk(3,b) 

620 m.trk(4 f b) 

630 m trk(5 9 c) 

640 m trk(6 f o) 

650 /* 

660 a="L16| : b<c>bag-f8e8r8a8a4 b<o>bag + 8e8r8a8a4 
b<c>batf+8b8r8<c8c4 de-dc>a8a-8g8<g8g4 

670 b="L16 |:!2 + ag+a 2 + 8e8r8a8a4 g + ag + ag+8e8r8a8a4 
tf+atf+ag+8e8r8a8a4 aga<c>a8a-8g8<g8>g4 

680 c=">L8e.<el6>e<e>>a<a>a<a e.<el6>e<e>>a<a>a< 
a e•<el6>e<e>>a<a>a く a g.<gl6>g<g>ggab< 

690 m trk(l f a) 

700 m.trk(2 f a) 

710 m-trk<3,b> 

720 m_trk(4 f b) 

730 m trk(5,c> 

740 m trk(6,c) 

750 /t 

760 a="L16de-dc>a8g ： 8r8<c8e-4 de-dc>a8g8r8<o8>a4 < 
de-do>a8g8r8<cef8f-f8 Katfcc8>g8r<e-d8c4 > 

770 b= N L16aga<c>a8g8r8a8a4 aga<c>a8g8r8a8g4 
aga<c>a8g8r8b<cd8d-f8 6tfec>a8g8r<c>a8g4 
780 c= H L8c.<cl6>c<c>c<o>o<c> c,<cl6>c<c>c<cc>c 
o.<ol6>c<c>c<cc>c >g•<gl6>g<gc<cc>c 
790 m_trk(1 
800 ro_trk(2 
810 m_trk(3 f b) 

820 ro - trk(4,b) 

830 m_trk(5 
840 m 一 trk(6 
850 /拿 

860 q=* rlr2r8b4. 

870 b="rlr2r4d+4 
880 c = * rlr2r4.g8 

890 d~"L32p3{{16p0rl6p3tfpOrp3gpOrp3g 16p0rI6p3gp0r 
p3gp0rp3gl6p0rl6| : 6p3gp0r:|p3gl6p0r16|:6p3gp0r ： |p3 
gl6p0rl6r4. 


900 

m _trk(1, 

u «3 

o3 

q8 

V 1 

1 y48, 

0 p3°+a) 

910 

m 一 trk(2, 

" ❹ 3 

o3 

qH 

vl 

1 y49, 

24p3 M +a) 

920 

m trk(3, 

M «3 

o4 

q8 

V 1 

1 y50, 

0 p3 M +b) 

930 

m trk(4 , 

..»3 

o4 

qH 

V 1 

1 y51, 

24p3 H +b) 

940 

m 一 trk< 5• 

••¢¢3 

o4 

q« 

vl 

1 y52, 

0 p3”+c> 

950 

m_trk(6, 

M d3 

o4 

q8 

V 1 

1 y53, 

24p3"+c> 

960 

m 一 trk(7 • 

n vO»l 

ol _ 

ql 

vl2 y5 

4,0 M +d) 

970 

m__trk(8, 

M v0O)2 、 

o2 i 

ql 

vl0 y55,0 "+d> 


980 

990 a = *'L16de-dc>a8g8r8<c8e-4 de-dc>a8g8r8<c8>a4 < 
de-dc>a8g8r8<cef8f+8 Sagec8>g8r<e-d8c4> 

1000 b=”L16aga<c>a8g8r8a8a4 aga<c>a8g8r8a8g4 
a«a<c>a8g8r8b<cd8d+8 efl[ec>a8g8r<c>a8g4 
1010 c="L8c•<cl6>c<c>c<c>c<c> c.<cl6>c<c>c<cc>c 
.<cl6>c<c>c<co>c >|{«<tfl6>g<gc<cc>c 

+ a 


1020 

m_trk( 

1• "®1 

〇 5 

q4 

vl2 

y4 8 

0 

p3“ 

1030 

ro_trk( 

2 9 "tl 

o5 

q4 

vl2 

y49 

24 

p3” 

1040 

m_trk( 

3, ”®1 

o4 

q4 

vll 

y50 

0 

P3” 

1050 

m_trk( 


o4 

q4 

vll 

y51 

24 

P3” 

1060 

m—trki 

5, "01 

o3 

qi 

vl2 

y52 

0 

p3” 

1070 

m_trk( 

6, ••❾ 2 

o3 

ql 

vlO 

y53 

20 

ip3" 


0 , 01 

340 m^vset(3) ハ配列变数の引数をカット 

350 /» 

360 atr a[ 256 ] , b| 2561, c[ 256 J , d[ 256 ] 

370 /拿 

400 for i=l to 8:m_alloc(i t 1000 ) ： D_assign(i•i)：n 

5Xt 

430 /拿 

440 m_tempo(130) 

450 a= M L16agf+gbag+a<o>ba+b<dc>b<c fed+edc>bag8< 
g8>g4 

460 b= H L4fgab c8r.rd 
470 c="L8a<a>b<bo<c>d<d>frr2>q4b4<ql 


) : next 


;(l t 


o4 

q4 

vl2 

y48 

,0 p3 f 

+a) 

(2, 

••鏺 1 

o4 

q4 

vl2 

y49 

, 24p3 ,( 

+a> 

(3, 

"®1 

o4 

q4 

vll 

y50 

• 0 p3* 

+ b) 

(4, 


o4 

q4 

vll 

y51 

， 24p3. 

+ b> 

(5, 

"•1 

o2 

qi 

vl2 

y52 

，0 p3. 

+c) 

16, 

"•2 

o2 

qi 

vl0 

y53 

， 2Gp3. 

+c) 


I : 18rl: 


540 for is7 to 8:m_trk(i, 

550 /拿 

560 a ： "L16| ： <de-dc>a8g8r8<c8e-4 de-dc>a8g8r8<c8> 
a4< de-dc>a8g8r8<cef8f+8 gatfeo8>g8r|1<c>a8g4 : |<e-d 
8c4> 

570 b ： H L16| : aga<c>a8g8r8a8a4 atfa<c>a8g8r8a8g4 
aga<c>a8j{8r8b<cd8d+8 egec>a8g8r| 1 <o>a8g4 : | <c>a 

8g4 

580 c="L8| ： o.<cl6>o<c>o<c>c<c> c.<cl6>c<c>c<oc> 
o o,<cl6>o<o>c<cc>c >fl.<tfl6>tf<g|l>ggab<:|o<oo>c 
590 n_trk(1,a) 

600 B_trkt2,a) 

610 m 二 trk<3,b> 

620 m_trk(4,b) 

630 m_trk(5,c) 

640 m trk(6 f c) 

650 /i 

660 a="L16| ： b<c>bag+8e8r8a8a4 b<c>bag+8e8r8a8a4 
b<c>bag+8b8r8<c8c4 de-dc>a8a-8g8<g8g4 

670 b=”L16|:g+ag+ag+8e8r8a8a4 g+ag+ag+8e8r8a8a4 
g4agiag>8e8r8a8a4 aga<c>a8a-8g8<g8>g4 

680 c=">L8e.<el6>e<e>>a<a>a<a e.<el6>e<e>>a<a>a< 
a c.<el6>e<e>>a<a>a<a g.<gl6>g<g>ggab< 

690 m trk(1 ，&) 

700 m_trk(2,a) 

710 m.trkO.b) 

720 m_trk(4,b) 

730 m_trk(5,o) 

740 n^trM6,c> 

750 /t 

760 a= M L16de-dc>a8g8r8<c8e-4 de-dc>a8g8r8<c8>a4< 
de-dc>a8g8r8<cef8ff8 gagec8>g8r f <e-d8c4> 

770 b= M L16a2a<c>a8g8r8a8a4 aga<c>a8g8r8a8g4 
aga<c>&8g8r8b<cd8d4>8 egec>a8tf8r<c>a8g4 
780 c="L8c •く 

c.<cl6>o<c>o<cc>c >g.16>g<gc<oc>c 
790 m_trk{1,a) 

800 m_trk(2,a) 

810 m^trkO^b) 

820 m_trk( 

830 m_trk< 

840 m trk(i 
850 /t 
860 a="rlr2r8b4. 

870 b="rlr2r4d+4 
880 C="rlr2r4.g8 

890 d= M L32p3gl6p0rl6p3gp0rp3gpOrp3gl6pOrl6p3gpOr 
p3gp0rp3gl6p0r16| ： 6p3gp0r ： Ip3gl6p0rl6| : 6p3up0r ： |p3 
K16p0r16r4. 

o3 q8 vll 
, M 03 o3 q8 vll 
,"@3 o4 q8 vll 
f M «3 o4 q8 vll 
, M ®3 o4 q8 vll 
t M ®3 o4 q8 vll 
， ” v0«lol ql vl2 y54,i) •• 
f M v0«2 o2 ql vl0 y55 t 0 


c) 


y48 


0 p3. 


24p3 
0 p3 
24p3' 
0 p3. 
24p3* 




900 m_trk(1 
910 m_trk(2 
920 ra.trk(3 
930 m_trk (i 
940 ra_trk(5 
950 m_trk(6 
960 ra_trk(7 
970 m trk(8 
980 /t 

990 a="Ll6de-dc>a8g8r8<c8e-4 de-dc>a8g8r8<c8>a4< 
de-dc>a8g8r8<cef8f+8 gagec8>g8r く e-d8c4 > 

1000 b="L16aga 〈 c>a8g8r8a8a4 aga く C>a8g8r8a8g4 
a«a<c>a8g8r8b<cd8df8 egec>a8g8r<c>a8g4 
1010 c="L8c.<cl6>c<c>o<c>c<c> 
c.<cl6>c<c>o<cc>c >g.<gl6>g<gc<cc>c 


1080 m_play() 


1020 

m_trk(1, 

"ei 

〇 5 

q4 

vl2 

y48 

0 p3' 

+a) 

1030 

ro 一 trk{2 ， 


o5 

q4 

vl2 

y49 

24p3 f 

+ a> 

1040 

m_trk(3 , 


o4 

q4 

vll 

y50 

0 p3 f 

♦b> 

1050 

m_trk(4 , 


o4 

q4 

vl1 

y51 

24p3* 

+ b> 

1060 

m 一 trM 5 • 

M «1 

o3 

qi 

vl2 

y52 

0 p3' 

♦c} 

1070 

m_trk(6, 

•.❷ 2 

o3 

qi 

vl0 

y53 

20p3* 

+c) 


(vl f 0,S6 ff 15,0.0,0,0,0,0,0,3,0^31,0.0,0,15,3S»2,13, 
0,0,0,31,0,0,0, 15,48,2,9, l f 0,i),31,0,0,0,15,2 b ,2,1, 
0,0,0,28,0,0,5,8,0,1,1,0,0,0) 

(v2,0,61,15,0,0,0,0,0,0,0,3,0,31,5,3,3,1,23,0,1,3, 
0,0,31,8,7,5,3,0,1,1,0,0,0,31,8,7,5,2,0,1,2,7,0,0, 
31,8,7,5,2,0,l f l f 7 t 0 f «) 

(v3,0,6,15,0,0,0,0,0,0,0,3,0,31,0,0,15,0,10,0,6,3, 
0,0,17,18,11,15,0,0,1,3,0,0,0,15,20,8,15,3,0,1,0,3 
,0,0,16,16,11,15,0,0,1,1,7,0,0) 

(ml, 1000) 

(al,l) 

(m2, 1000) 

(a2,2) 

(ro3 f 1000) 

(a3 t 3) 

(ro4, 1000) 

(a4,4) 

(ro5 v 1000) 

(a5,5) 

(m6 y 1000) 

(a6 t 6) 

(m7, 1000) 

(a7,7) 

(m^ t 1000) 

(a8 f 8) 

(ol30) 

(tl)91o4 q4 vl2 y48,0 p3L16agf f gbag+a<c> ba*fb<dc>b 
く c fed+edc>bag8<g8>g4 

(t2)dlo4 q4 vl2 y49•24p3L16agf+gbag+a<c>ba+b<dc>b 
<c fed+edc>bag8<g8>g4 

(t3 )tllo4 q4 vll y50,0 p3L4fgab c8r.rd 

(t4)01o4 q4 vll y51,24p3L4fgab c8r.rd 

(t5)01o2 ql vl2 y 52，0 p3L8a<a>b<bc<c>d<d>frr2>q4b 

4 く ql 

(t6)92 o2 ql vlO y53,20p3L8a<a>b<bc<c>d<d>frr2>q4b 
4 く ql 

(t7)| ： 18rl:I 
(t8)| ： 18rl：| 

(tl)L16I : <de-dc>a8g8r8<o8e-4 de-dc>a8g8r8<c8>a4< d 
e-dc>a8g8r8<cef8f+8 gagec8>g8r|1<c>a8g4 : |<e-d8c4> 

(t2)L16| : <de-dc>a8g8r8<c8e-4 de-dc>a8g8r8<c8>a4< d 
e-dc>a8g8r8<cef8f+8 gatfec8>g8r|1<o>a8g4 : I<e-d8c4> 
(t3)L16| : atfa<c>a8g8r8a8a4 aga<c>a8g8r8a8g4 a 

2 a く c>a8tf8r8b<cd8d+8 etfec>a8g8r|1<c>a8g4 : |<c>a8tf4 
(t4)L16| : aga く C>a8g8r8a8a4 aga<c>a8g8r8a8g4 a 

2a<c>a8g8r8b<cd8d-f 8 egec>a8g8r| 1 <c>a8g4 : | <c>a8g4 
(t5)L8| ： c,<cl6>c<c>c<c>c<c> c.<cl6>c<c>c<oo>c o.< 
cl6>c<c>c<co>c >g•<tf16>tf<g|1>gKab< : |c<cc>c 
(t6)L8| : c.<cl6>o<c>c<c>c<c> c.<cl6>c<c>c<cc>c c •く 
cl6>o<c>c<cc>c >g•<gl6>g<g|l>ggab< : |c<oc>c 
(tl)L16| : b<c>bag+8e8r8a8a4 b<c>bag+8e8r8a8a4 b<c>b 
ag+8b8r8<c8c4 de-dc>a8a-8g8<g8g4 

(t2 )L16 | :b<c>bag + 8e8r8a8a4 b<o>bag*f8e8r8a8a4 b<o>b 
ag+8b8r8<c8c4 de-dc>a8a-8g8<g8g4 

(t3)L16 | : g-fag+ag-f8e8r8a8a4 g + agfagf8e8r8a8tt4 + 

ag+8e8r8a8a4 aga<c>a8a-8g8<g8>g4 

(t4)L16| ： 2^ag^ag-f8e8r8a8a4 g + a 2 + ag+8e8r8a8a4 + 

ag^8e8r8a8a4 aga<c>a8a-8g8<g8>g4 

(t5)>L8e.<el6>e<e>>a<a>a<a e•<el6>e<e>>a<a>a<a e.< 
el6>e<e>>a<a>a<a g.<gl6>g<g>gtfab< 

(t6)>L8e.<el6>e<e>>a<a>a<a e.<el6>e<e>>a<a>a<a e•< 
el6>e<e>>a<a>a<a g. <gl6>g<g>ggab< 

(tl)L16de-dc>a8g8r8<c8e-4 de-dc>a8g8r8<c8>a4< de-d 
c>a8g8r8<cef8f+8 gagec8>g8r<e-d8c4 > 
(t2)L16de-dc>a8£8r8<c8e-4 de-dc>a8g8r8<c8>a4< de-d 
c>a8g8r8<cef8f+8 gagec8>g8r<e_d8c4 > 

(t3)L16aga<c>a8g8r8a8a4 Qga<o>a8g8r8a8g4 atfA 

<c>a8g8r8b<cd8d^8 egec>a8g8r<c>a8g4 
(t4 ) L16a«a<c>a8^8r8a8a4 aga<c>a8g8r8a8j{4 aga 

<c>a8g8r8b<cd8d+8 egec>a8g8r<c>a8g4 
(t5)L8c.<cl6>c<c>c<c>c<c> c • く cl6>c<c>c<cc>c c.<ol 
6>c<c>c<cc>c >g.<gl6>g<gc<co>c 

(t6)L8c.<cl6>c<c>c<c>c<c> c.<cl6>c<c>c<cc>c c.<cl 
6>c<c>c<oc>c >tf.<gl6>g<gc<cc>c 
(tU«3 o3 q8 vll y 48,0 P 3rlr2r8b4. 

(t2)«3 o3 q8 vll y49,24p3rlr2r8b4. 

(t3)03 o4 q8 vll y50 f 0 p3rlr2r4d+4 

(t4)93 o4 q8 vll y51,24p3rlr2r4d^4 

(t5)®3 o4 q8 vll y52,0 p3rlr2r4.g8 

(t6)93 o4 q8 vll y53,24p3r1r2r4.^8 

(t7)dl ol ql vl2 y54 f 0 pOL32p3gl6p0rl6p3gp0rp3tfpOr 

p3gl6p0rl6p32p0rp3gp0rp3gl6pOrl6|:6p3gp0r : |p3gl6p0 

rl6|:6p3gp0r ： |p3gl6p0rl6r4. 

(t8)A2 o2 ql vlO y55,0 pOL32p3gl6p0rl6p3gp0rp3gpOr 
p3g 16p0r I6p3gp0rp3gp0rp3g 16p0r 16 I : 6p3gp0r : | p3|<16p0 
rl6| ： 6p3gp0r : |p3g16p0rl6r4. 

(tl)®lo5 q4 vl2 y48,0 p3L16de-dc>a8g8r8<c8e-4 de- 
dc>a8g8r8<c8>a4 < de-dc>a8g8r8<cef8f+8 ga£ec8>g8r<e 
-d8c4 > 

(t2)dlo5 q4 vl2 y49,24p3Ll6de-dc>a8g8r8<c8e-^l de- 
dc>a8KBr8<c8>a4< de-dc>ft8K8r8<cef8f + 8 gagec8>g8r<e 
-d8c4> 

(t3)dlo4 q4 vll y50,0 p3L16atfa<c>a8g8r8a8a4 qu 
a<c>a8g8r8a8g4 aga<c>a8g8r8b<cd8d*f8 egec>a8g8r< 
c>a8g4 

(t4)«1o4 q4 vll y51,24p3Ll6aga<c>a8g8r8a8a4 atf 
a<c>a8tf8r8a8g4 aga<c>a8g8r8b く cd8d+8 egec>a8g8r< 
c>a8g4 

U5)®1o3 ql vl2 y52,0 p3L8c.<cl6>c<c>c<c>c<c> c. 
<cl6>c<c>c<cc>c c,<cl6>c<c>c<co>o >g.<gl6>g<tfc<cc> 
c 

(t6)®2 o3 ql vl0 y53,20p3L8c« <cl6>c<c>c<c>c<c> c. 
<cl6>c<c>c<cc>c c.<cl6>c<c>c<cc>c >g. <gl6>g<gcCcc> 


1080 ra_play{) : end 
ろに ^endi を付けよう！ 
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LIVE スペシヤノ 
WEEN の “Keepe 
Part 2” より “Ris 
しましよう。 HEL 
のお面を付けて… • 
のへヴイメタル バこ 
ついては， ハード t 


/* 


10 
20 
30 
40 
50 
60 
70 
80 

90 key 6 t M wit 
100 key 
110 key 8 f "m 
120 


R i s 
Froi 
ハ P r c 


130 
140 
150 

160 ft 
170 /% 
180 /t 
190 !t 
200 
210 
220 
230 
240 
250 
260 


str pd(99H256] 
int po(256) 


トラックバッファが足りないときは 

CONFIG.SYS T , 

DEVICE = OPMDRV.X #128 
のように指定すること 


m init() 
for k=l to 8 

m_alloc(k• 16000 ) 
ro_assiftn(k 9 k) 
next 

m__tempo(152) 


270 
280 

290 str 
300 str al t a2,a3,a4 »a5 t a6 
310 /t 
320 vdata() 

330 ddat.a() 

340 pdata() 

350 m_play(1,2,3, 

360 end 
370 
380 


»p3,s 
• a7 , a 


390 
400 
A 10 
420 


t’unc trk (t) 
rsO 

while po(r)< > 2 5 5 
m_trk(t,pd(pot r) 


430 

440 endwhiie 
450 return() 
460 endfvine 
470 /t 
480 /倉 

490 func vdata() 
500 /t 
510 char 


520 
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0t 
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720 
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小野 I 



さあ，今月は半期に一度の MUSIC 特集，当然 LIVE もページ拡張さ！てなことで，•今回は 
〇 h!X LIVE SPECIAL 版です。 X 68000 用に3本， XI 用に1本の計4本をどどど一つと 
掲載。へヴィメタあり，ゲームミュージックあり，はだまだイ□モノありとバラエティ豊か 
に揃つだミュージックブ□クラムの数々。今回はリストもわりと短めなので，いままでもの 
おじしていだ人も打ち込んでみては7意外と秋の夜長にピッタ ij 合うかもよ。 


Rise And Fall 


§ 弘。 n 。 


レの 

r 


/ 


1 曲目は， HELLO 
Of The Seven Keys 
;e And Fall” をお送り 
.LOWEEN はカボチヤ 
••失礼しました，ドイツ 
ドです。このパ、 ン ドに 
3ックだよっていう人も 


いますし，スラッシュに近いんでないのっ 
ていう人もいますが，とりあえずへヴィメ 
タルということにしておきましよう。メロ 
ディが美しく，その中にも激しさを取り入 
れた曲を数々聴させてくれます。ジャーマ 
ンへヴィメタルの頂点に君臨しているとい 
っても過言ではないでしよう。 

余談ですが，少年ジャンプに掲載されて 
いる （今は季刊） バスター ドって漫画があ 
るんですけど，ここに出てくる人名•地名 • 

リスト1 Rise And Fall 



呪文名などは，ほとんどメタル関係で占め 
られています c HELLOWEEN もちやん 
と登場しています0この作品を BGM にパ、 
スタードを読んでみたのですが，なかなか 
合っています0ちようどエンドレスになっ 
ていますので，バスタードを持っている人 
は試してみてね。 
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一 HE: 


. O W E E N - 


n Keeper Of The Seven Keys pert2 


560 31 f 1 

570 m vqet < 89 , i t a r ) 
580 /t 

590 char vocal (4,10)= 




600 

60 f 

15, 

0, 

0 9 

0 t 0 9 

0 9 

0. 

0, 

3, 

0, 

r a ra e d by 

Tomohiro 

610 

31, 

n , 

1 f 

1 v 

1, 25 9 

0, 

2, 

7, 

0 9 

o, 



620 

26, 

2 V 

•1 、 

4 , 

1 9 0 f 

0, 

1 9 

3, 

0 9 

0. 



630 

29, 

0 r 

1, 

1 9 

1, ⑽. 


3 , 

7 f 

0 v 

0, 

96:m^stop()«M M 


640 

24 9 

2. 

3, 

4 , 

2, 0, 

0, 

2. 

3, 

0 v 

01 


tempo(200)@M M 
tempo {152)«M #, 


650 m vset(70,vocal) 
6B0 /% 

670 char baas (4,10)= 


730 m vset(71,bass) 
740 /* 


750 

char hdrura( 4,10)=( 



760 

59, 

In, 

0 v 

0 f 

770 

31, 

0, 

0 f 

0 f 

780 

31, 

27 f 

u. 

0, 

790 

31 v 

21 9 

0 f 

o f 

800 

31, 

8 v 

0 # 

, 

810 

m vset(72 t bdrum) 



820 

/ 拿 




830 

char snare(4,10)=1 



840 

60, 

15, 

0, 

0, 

850 

31, 

0, 

2. 

15, 

860 

31 f 

13, 

4 , 

15 t 

870 

31, 

31• 

2, 

15, 

880 

31, 

20 f 

4, 

15, 


890 m vset(73 f snare) 
900 /t 

910 char h i hA t •い I ,10 > : 


920 

60, 

15, 

2 f 

0 , 

0, 

n» 

o 9 

o t 

0 . 

3 

930 

31, 

15, 

H , 

15, 

5, 

(し 

0, 

8 , 

7 , 

1 

940 

31 f 


1«, 

15, 

15 t 

0, 

o t 

ハ 

3, 

0 

950 

31 9 

15, 

8. 

15, 

n f 

0, 

o t 

H f 

7 , 

1 

960 

31 f 

20, 

10, 

15, 

15, 

0 t 

()• 

2, 

3, 

0 


970 m vset(74,hihat) 
980 /♦ 

990 char tom(4,10)=| 
1000 
1010 
1020 
1030 
104 0 

1050 m vset(75,tom) 
1060 1% 


62, 

15. 

0, 

0, 

0, 

0 f 

o f 

o f 

0, 

3» 

31, 

0 v 

し 

0, 

2 V 

0, 

0, 

0 9 

7, 

0 f 

31 f 

1G V 

10, 

t>, 

15, 

0, 

0, 

0 9 

5, 

0 9 

31, 

10 t 

8. 

6, 

12, 

0 f 

o t 

0, 

6, 

0 f 

31, 

13, 

6 f 

b t 

4, 

0 , 

0, 

1, 

1, 

U 9 


1070 

1080 

1090 

1100 


char se(4,10)=I 

60,15 f 
31， 10, 
31• U. 


0 , 0 , 0 , 

4,15, 35, 


7 つの鍵を持て開 I ナ地獄の門 


IMiIAT 


in • ，90 


u O O u U 


OOO0O 
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1120 

31, 

0, 

0. 

A , 







01 

2010 

1130 m vset(76, 

> se > 











2020 

114 ()ハ 












2030 

1150 char gui U 

»r2M , 

,10) = 1 










) ： trk( 

1160 

0, 

15, 

0, 

0, 

0 f 

0, 

O f 

0, 

0, 

3, 

0, 

2040 

1170 

31, 

2, 

0 f 

0, 

0 t 

いハ 

0 9 

0, 

0 v 

U. 

0, 

2O 9 20 t 

1180 

31, 

4 f 

O f 

•L 、 

1, 

30 v 

(), 

1. 

0 v 

0. 

0. 

2050 

1190 

31, 

2, 

0, 

0, 

1 9 

14 9 

0 r 

， i 、 

0, 

0, 

0, 

2060 

1200 

31, 

4 , 

0 f 

2, 

し 

0, 

0 f 

0, 

0, 

0, 

0) 

2070 


2000 pd(35 )： 


*'vl 5o418rc#>b<c#def #g# 
"o412e.b4a.b4 


1,2,3,98,4,5,6,7 


,12, 13, 14,15, 16 ， 17, 18, 19, 


4,5,6,7,4,5,6,5,12,13,38,39,16,17,18,19,22, 
23,24125,26 9 27»28 9 29,30 »31 f 30,31 ,34135,99,255) 


1210 

m_vaet (77, «ui t.nr2 ) 

2080 

/* 



1220 

return() 

2090 

/» 



I2：<0 

/* 

::im) 

/♦ 

e. 

rt.1-2 

me 

/ 窣 

. 

/* 



1250 

func ddata() 

2120 

pd( 

2) 

= **@69vl5plq6o4 | ： e2&e8l16>eeaaee<c#2&c#8>eeff ffee ： | 

1260 

/* 

2130 

pd( 

3) 

= ..0314a . b8< (p#>ba) 2f # . g#B {aK*e} 2 o5c# .d8 (edc#) 2>a . b8 { 

1270 

a="y2,23a":c="«73y2,3a":e="«73y2,9e" : fs"«73y2,14e":g= H @74y 

<c#de)2 



2,65g. 

':h = M «74y2,Ha 

2140 

pdt 

12 

)="vl5o412a.<e4d.e4 

1280 

pl = **y3, l ,, :p2= ,, y3,2 ,, :p3= M y3.3 M ：sl = ,, a75y2,25e M ： 82= ,, «75y2 > 26a 

2150 

pd( 

13 

)="d.c#4>b<e 

••: s3 = . 

*»75y2,27b 

2160 

pd( 

16 

)="o418e2.ed#c#2.c#o# 

1290 

al = "e&d*&e&d#&" :a2 = "d#&d&d»&d& , .: a3 = :a4 = "c#&cfcc 

2170 

pd( 

17 

) = -a2.a#-lb2<c2 

#W 

: a5="c&>b&a*&b&< 

2180 

pd( 

18 

)= M c*2.c»>ba2.ag» 

1300 

a6 = " b & a #& a « Lai » i .. : a7 = ： a8 = ： a9 = " f&e&d# 

2190 

pd{ 

19 

)=* f »2. g 4 gf 2 b 2 

••: al0:"e&cU&d&d<r& 

2200 

pd( 

20 

J = *'o514a.b8< {c«>ba|.«ir8 (agfe| 2 

1310 

return() 

2210 

pd< 

22 

) = "o4 164e2 .&e8&d|t&d&c9&c&>b&a*&a&g«a2.&aB&s»&g&f9&f&e 

1320 

ハ 

& d #& d & c # 



1330 

/* 

2220 

Pd ( 

30 

):"o4i2e.d?4c#..>b4 

1340 

func pdataU 

2230 

pd( 

31 

) = "< a . g < r < lf * g»t 

1350 

/* 

2240 

pd( 

34 

) = M e 2& d #2&16 ld 2 ics l & c 8 i > b & a #& a & K # Vg &. f «& f &^ v 0 

1360 

/* vocal 

2250 

!.. d ( 

3B 

)= M o 412 a .< e 4 d . e 4 

1370 

ハ 

2260 

Pd ( 

39 

)= " d .> g 4 <ep 

1380 

pd(97)r M |d.c.J 

2270 

m t 

rk 

(3,'*y 50,64 r64 f, ) ： trk(3) 

1390 

pd(98)="|coda| 

2280 

1 一、 



1400 

pd(99)="| » 1 

2290 

ハ 



1410 

pd{0)= M y 48,32 r4r4 

2300 

ハ 

e . 

K .2-1 

1420 

pd ( 1 )=" r 1 r 1 r 1 r 1 

2310 

/i 




1-U0 pci 
1450 pd 
1460 pd 


3 ) = •• r2r4@70v 13p 30 518 rc#aa4v 1]rr2rl r4rre*le4 
= •. ⑯ 70vl3o5i4a8ar8bafsf#>r8b8<fr8f>B 

= M eir8&c#c#8e#g« 164f ^8&f&e&dir&d&c#&c&t> b& ： a#i-lvlrvl3<f 


6 ) = M 164a8&Lg#&g&t »&r&e&d#^d&p#l labaaH&r#8rjrr8f?H&e# 

7 ) = ,, e#84er8c5<c#>b8a8164a8A ： g#& ： g^ t r^fA ： eArri?&d& ： c#Hvlrvl3f 


8) = M aabaa8&t^8f»r8>a8<f#8&e#8 

9) = ,, ef84 i c#8c^ei?g#164f# Ur#8&f&e^d#&d&c#«LC&>b&aff< 14r8f#8 


a8a8Atabaaf«r8> f»8< t # 

VLeKciskcikc^Lck 

vlr©7014 

M vl4q6o4a8<a>a8<a>a8<a8>a8<af»8aa8a8 

M q6o4att<a>aB<a>a8<a8>a8<a^i?8ag#HaH 
M o4b8<af#8ab8a8gffrq8@vl22ba 
M o5i8b4 <c#>a&a4r>a<b4 <c^4t>af #4f 9 

M 14<c#d>b&a&f#8&g«•r4l8ba# 

M b1<ci?>a&164a8&«»A ： g^r»&r&o&d^&d&.rir I8r>a<b4<c#>a&f?*1 


= M 14<<c«d>b&La^l6Jg^8&.g^l?&t^eicdff^d&.ci ： ici8vlr«vl22>b< 
= H o514f#4e2rrl 

= M rlr4 18r>g# <t>lb4a 
=•• f»4.ie8&eZrl«77vl5 

= '*©69vl5o6 164"+al+al+al+al +a'J-fai! + aZ + a2+a3+a3*fa3+a3+a 

=a5+a5+a5 + 、， 5” + a6+a6+ati+ft 7+a7+a7+a8+a8 + a8+a ， i+ay+al(H 

- ,t yAH t ^2(gf7i)vlr2r\ \ \ ZoAai^LbL^ckc9^dkd9LekfkroH 

1,2,3,98,4,5, (>,7,8,9,10,11,1^113,14,15,16,17,18,1 


1470 pd 
1480 pd 

1490 pd 
1500 pd 

g 林 

1510 pd 
1520 pd 
>b&a#&a&g 
1530 pd 
1540 pd 
1550 pd 
1560 pd 
1570 pd 
1580 pd 
1590 pd 
r>b 

1600 pd 
gvgtf#e 
1610 pd 
1620 pd 
1630 pd 
1640 pd 
4+a4+a4+a4 
1650 pd(95 
alO 

1660 pd(96 
1670 po=|97 ( 0,1 
9,20,21, 

1680 1,5,6,7,8,9,10,11,12,13,14,15,16,17, 

1690 trk(1> 

1700 /t 
1710 /% 

1720 /♦ e,g.l-l 
1730 /t 

1740 pd(2) = M «69vl5plq7o3| : a2&a8vl2i 1 beeaaeev 15 iir^A f #8v 12eef #f #e 
e ： | 

1750 pd( 3 ) = M vl5o ： U4a.b8< lo?>balZ a . b8< |o»>ba | 2ft. ^ 
#8(ag#e)2 

1760 pd(4 ) = f, o3vl5116aaaavl418aavl3aa\12aavi51 lb<ddddvl41Bddvl3d 
dvl2dd 

1770 pd( 5 ) = M vl 5 〇 4 116c#c#cfcirv 1418circ»v 13circ#vl2c#c*ivl5i 16 > f 
#f#vl4f #8ftf#vl518<c#>ba^{r 

1780 pd(6) = M v1 5 〇 4 i16ddddv1 A 18ddv11ddv13ddv1511b>bbbbv1 A I8bbv11b 
bvl2bb 

1790 pd ( 7 ) = *'v 15o4 i 16c#c#Circ»vH 18c#c#v 13c#c#v 12c4rc^vl5i 16> f #f #f 
#f#vl4f#8f#f#v 1518ag#<c#>b 
1800 pd(l2)= M vl 50412 f#.b4a.b4 
1810 pd(13)= M a.d4c#b 
1820 pd( 14 )= M o4l 1 
#f#f#f#eeee 

"ddddddddddddddddeeeeeeeeeeeeeeee 
H o318a2.agirf^2.fff# 

M <d2.d#4e2t'2 
"f#2.fired2.dc^ 

M >b2.<c4c#2e2 

H o514c#.d8{edc?J2>a.b8<|c^>bfi^}2 

聲 & .d&c 并く a2 林 


•19 ,22.2551 


1830 pd( 15)= 
1840 pd( 16)= 
1850 pd( 17)= 
1860 pd( 18)= 
1870 pd< 19)= 
1880 pd(20)= 
1890 pd(22)= 

1900 pd(23)= 
aaf# f#eec#c# 
1910 pd(24)= 
1920 pd(25)= 
1930 pd(26)= 


•q 2051 16c^c^eeddc#c^> f » t>f(#^^aa<c#c#>e#e#r# t*^g#g#bb 


” f#f ^c ： sg»aa<c«c;r >ddeef ^ f??aaeJ?e#f # l*#^#^^bbaaf #f 霍 eedd 
M c#c#> bbaag»g#pl 

"vl5o5q7164c#26 ： c#8&c&>b&a#&ca&g^^a&.a^&b&.< i 16c 破 & 

d&cir&c&c#&d&d&c#&d&d6&fi&c 孩 &d&d7&d&c#&d&d# 

1940 pd(27 ) = M dAtc»&d^d#>af#a8«ca4&a#8. i 16&ba32&ii 難 ； t 
e# (o#e#ft}4>b&<c4>b32iar32& ： a32 

1950 pd( 28 )= M <e#^fjr8. f&f 116c» 

d#164fir 16&f#&g&g9&a&a#&b&<c&c#^d& ： d#&e^f&i ^ leHd#8le&dc#) 16116 rc^c 
>b 

1960 pd(29)= M a8b8<c#8.>baart>rl32a&a9&b&a9&a&a218>f#ab<c#& 

1970 pd(30)= M o312a.g»lf».e4 
1980 pd(31)= M <d.c«J>b<c# 

1990 pd( 34 蓽 &d&c«&c&>b&a«vt) 


2330 pd(3)r M o3| : a8116aaa8aaa8eeaaeef#8f#i#f#8i>fff#8eet#f»ee：I 
2340 pd(5)= M vl 504116 c#c#o#c#vl418c#c#vl3c#c#vl2c#c#vl5116>f#f#f 
#f#vl4f#8f#f#vl518ag#f#e 

2350 pd( 7 » = M vl 504116 c#c#c#c^vl418c#c#vl3ctrc#vl2c#cfvl5116>f#f#f 
ff#vl4f^8f#f#vl518f^eag^ 

2360 pd(12)= M vl5o31rbaaaaaaaaaaaa く c#c 翁 c#c 皺 ddddddddddddc 霉 c#cdc 参 
2370 pd(13)= M o3bbbbbbbbbbbb<ccccc#c#c#c#o»c#c#c#eeeeeeee 
2380 pd(l6)= M o318a2.ag«r«2.f#f> 

2390 pd(17)= M <d2.d#*le2f2 
2400 pd( i8) = M f^iJ.f#ed2.dc# 

2410 pdl19)= M >b2.<c4c#2e2 

24 20 pd( 22 ) = M 03164 al&.a2.&aH&g«&tg^r#&f^eicd»&d&c# 

24 30 pd( 23 ) = M q2o4116aa<c?c# >bbaaddeef ?rf #aac#c#d^d#e#e#g#g#f #f #d 
dc#c#>bb 

24 40 pd ( 2-1)= M <ddeef#f^aa>bb<c#c<rddf#f #c#c^dffd*e#etM^«#f#f#ddc#c 
#>bb 

2150 pd(25) = ,, aag#g#firf#ee 

2460 pd(26 ) = M vl5p2q 70312 a.g#4fir a e4 

2470 pd(27)= M <d.c#J>b<c# 

2480 pd(30)= M o5r8L16aag#t#eedc#r8>baaal32b&<c&c#tc&>b&<c&c#164c 
#&o&>bl6a81 16mf&f#&fr4 

2490 pd(31)- M o6 { f*g^a^g#f# ^?g^a&.gsf 9 aab&ag# abag«a| 1 <e4 .&d#8> 
b4 • aa 

2500 pd(32)= M b<c#>ba b<c#>ba b<c#>ba {b<ci>bag#}4 abag# abag# a 
bag# abag# 

2510 pd(33»= M t^«#ag# if#«#ag# f#I 4{g#g#ag#f#|4{g#af#eeJ 4f#4fil32 
e&f&f #1618dc#>baf »a 

2520 pd(34 )= ,, >al&l64g?2&g4&r#8&fie&d#&dfiLC«&c&>b&a^vO 
2530 pd(35)r M vl 50318 rag#ab<c#de 
2540 pd(36)= H o312a.<c#4d.c#4 
2550 pd(37)= M >b,<c4c#e 

2560 po=|30,31,32,33,94 ,95,96, 99 ,255) :m^trk(1 f M y48 f 48pl M ) : trk(i 

) 

2570 po={97,0,1,2,3,98,4,5,6,7,4,5,6,5,12,13,12,13,16,17,18,19, 
3, 

2580 4,5,6,7,4,5,6,5,36,37,36,37,16,17,18,19,22, 

2590 23,24,25,26,27,26,27,30,31,32,33,34,35,99,255} 

2600 m trk{4, M y51,48r64 M ):trk(4) 

2610 /i 

2620 ハ 

2630 /* e.g.2-2 
2640 /% 

2650 pd(2> = ”@69vl5p2q6o4 | : e2ice8116>eeaaee<c#24tc«8>eef #f #ee: | 
2660 pd(3)= M o4| : e8J16eee8eee8>eeaaee<cf8c#c#c#8c#c#e#8>eef#ffee 
: I 

2670 pd(ll)="vl 5041 16c#c#c#c#v1418c#c#vI3c#c#vl2c#c#vl5116>f#f# 
f#f#vl4f#8f#f#vl518ag^f# 

2680 pd(12 ) = M y52,3i!®70vl2p3q6o518c#c#f#4c#t #4c#f#df#4df#4f#f# 
2690 pd(13 ) = M dd4dd4ddq8ei!&>b-1r<q6c# 

2700 pd(14)= M c#e4c#e4c#edf#4df#4dd 
2710 pd(l5)= M dd4dd4dde4r2. 

2720 pd( 16 )= M y 5 2 f H0«69vl5p2q6o*118e2.ed#c#2,c#c? 

2730 pd(17)= M a2.a#4b2<c2 
2740 pd(t8)= M c#2.c#>ba2.ag# 

2750 pd(19)= n f>2.glg#2b2 

2760 pd(22)= M o4164el&e2,&e8&d#&d&c#&c&>b&a#&a&g# 

2770 pd(26)= M vl5p2q 70412 e,d#4c#•>b4 
2780 pd(27) = M <a.?it Ifffirs 

2790 pd(31 羃 • 塞 &t&evO 
2800 pd ( 36 ) = M o4 I . g# l 

2810 pd( 37 ) = M f^.g*l«#b 

2820 po=(97,0,1,2,3,98,4,5,6,7,4,5,6,11,12,13,14,15,16,17,18,19 

,3. 

2830 4,5,6,7,4,5,6,11,12,13,14,15,16,17,18,19,22, 

2840 23,24,25,26,^7,26,27,30,31,32,33,34,35,99,255) 

2850 m trk(5 f M y52,80 M ):trk(5) 

2860 /t 
2870 /* 

2880 ft e.b. 

2890 ft 

2900 pd( 2) = * ^71vl5p3o2|:a2&a8116eeaaeef*8eefff«ee : I 

2910 pd(3) = M o2| ： a8116aaa8aaaHeeaaeef#8f#f#8eef#f#ee : | 

2920 pd( \) = M o214aaaa8<c#8dddd 

2930 pd(5)= M o3c#c#c#8cfHc#8&>b8f#f#a8«#8fff8<c#8 
2940 pd ( 6 ) = M o3dddd8c#8：> bbbbHbB 
2950 pd( 7 ) = M o3c4c#cf 8>b8a8«#8f #f #g«8f »BaBgir8 
2960 pd(8)= M o2aaaa<dddd 
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2970 pd( 9 )= ,, o3c#ctc#8>b8a8g#8f#f?a«g#8r#8<c*8 

2980 pd(10) = ,, o3ddd8>aH<d8c»8>bbbb8b8 

2990 pd(11) = ,, o3c? c #c#8>b8a8g#8f#f#a8g#8f*8e8 

3000 pd(12)="o218arrlr4<c#rdrr4r4c#r 

3010 pd(13 ) = ">brr-lr4crc#rr4e2 

3020 pd(14 ) = "o2arr4r4<r^rdrr-lr*lc#r 

3030 pd(15)=">brr4r4<orc#rr4>e2 

3040 pd(16) = ,, o218a<c#ag#f#edc9>f4<c#>f#<r#>f^<c4>f#<c# 

3050 pd(17) = '*df#<dc#>bag#f#ebebfbrb 

3060 pd(lH) = "f#<c#dc#>bafi#adal6.&n#3iJ&.batf#f'#et'# 

3070 pd(19 > = ..g#ab く <?#>bag#ac#g#c#g#>e2 

30H0 pd{22) = M o2a2&164a-l .S.g#&g&f#icl'&e&d#&d&c#d^.&d8&CJf&c&)b&a#&a 

4g#itg4 f # 

3090 pd(23) =" 〇 21 16aaaaaaaa<ddddddddc#c#o9c#c#c#c»c#> 

#f#f# 

3100 pd(24 ) = "<dddddddd>bbbbbbbb<c#c#c#c#c#o#<?#c#f#f«ddc#c#>bb 
3110 pd(25)="aag#«#f#ftee 

3120 pd{26) = M o2116aaaaaaaaaaaag#g#g*g#f#l'#f#f»f#fff#f#f^f#f#f#e 
eee 

3130 pd( 27 ) = M <ddddddddddddc?c#c#c«f >bbbbbbbb<c^c#c»cs>eeee 
3140 pd(34)= M o218y53,32a&y53,28a4y53,24aiy53,20a&y53,16a4y53 r 12 
a&y53,8a&y53,4a&y53,32g)Mr4r2 
3150 pd(35)= M o218ra«#ab<c#de 
3160 pd(36)="o218aaaaaa<c#csddddddc?c» 

3170 pd(37)=">bbbbbb<ccc#c#c#c#e4>e4 

3180 po={97,0,1,2,3,98,4,5,6,7,8,9,10,1l,12,13,M,15,16,17,18,1 
9,3, 

3190 4,5,6,7,8,9,10,11,36,37,36,37,16,17,18,19,22, 

3200 23,21,25,26,27,26,27,26,27,26,27,34,35,99,255} 

3210 m trk(6, *y 53,32 *') :trk(6) 

3220 /* 


3230 
3240 
3250 
3260 
3270 
3280 
3290 
3300 
3310 
3320 
3330 
3340 
3350 
3360 
3370 
3380 
3390 
3400 
34 10 
3.120 


= "©7*2vl5p2oi!14"+p3+a+a+a+ M 8.116"+a+a+n+a + a 
=*'14**+a+H + a + "r M 
= a+"8 L16"+a+a+"r4r4"+a+a + a+a 
=a+ ,, 8116'*+a+a + "r2. 

=•' I16 ,, +a+a+a+a+"18r' , +a+a+a+"r"+a 
= ' , 116"+a+a + a+a + ,, 18r"+a + "14 ,, + a + a 
r M l16*' + a+a+a+a+ , 'r8 M +a+a+a + ,, 4 M +a+a + a+' , B 
= "14..+a + ..rr”+a 
: “l4"+a+"r"+a+..r 
=a+"4r2. 

="116"+a+a+a+a+a+a+a+a+a+a+a+a+a+a+a+n 
="11 6 ,, +a+a+a+a+a+a+a+a+a+a+a+a + n+a+a + "8 


="14 " +a+a4-a+a 

s ._ 1 gj." 

= a + "418r"+a+ ,, r2 


1,3,3,3,1,98,5,5,5,6,5,5,5,6,5,5, 


6|5|5|5|7f 

3430 8,11, 11 ， 11, 11,11,11,11 ， 1 2, 3,3,3,4, 

3440 5,5,5,6,5,5,5,6,5,5,5,6,5,5,5,7, 

3450 14,14,14,14,H,14, 14,16, 11,11,11,11,11,11,11,12,11,10, 

11,11,11,11,13, 

3460 11 ， 11 ,11, 11 ， 11,11,11 ,11 ， 11 ,11 ， 11, 11, 11 ， 11,11 ,12 ,14 ， 1 4, 


15,9 9, 
3470 
3480 
3490 
3500 
3510 
3520 
3530 
3540 
3550 
3560 
3570 
3580 
3590 
3600 
3610 
3620 
e+e+e 


255} 

m_trk( 7 , ..y54,0" ) : trk(7 ) 

/* 

/♦ 

/ * s . d . & hiha t k cymheil & tom k clap 


pd< 0)= 
pd{1)= 
pd(2 )= 
pd(3 )= 
pd(4 )= 
pd ( 5 )= 
pd(6 )= 
pd(7)= 
pd ( 8 )= 
pd(9 )= 
pd(10) 


vl5p2o21Hr' , +p34c+ ,, 4"+s 
o218"+g+e+«+e+g+e+K+f 
l8 , 'fg + e+g + R + , '1 16.. 

I4"«"g+c+c + ” 18'*4g + g 
l‘「. + g+c+e+”8116" 

18"+K+g+e+g+g+g+e+g 
lS'^g+g+e + g + g + f+'^' + f 

18 ., + g + g + e+g + g + f+"4" + g 

14., +e+"rr.. + e 

14 ., fe+ M r ,, +c + "2 

,, 18 ,, +g + p2 + sl+p3+e+ ,, 16 ,, +e + M . ,, + pZ + sl+ M . 116" + p3+e+” 


3630 pd(in = M 18 M + g+e+ H 4"+e+g+e + g + f 

3640 pd(121 = "i8" + g+e+g + e + g+e + ..l 16"+p2+h + h + pl+h+h + p3 
3650 pd(13) = "18 ,, + e+g + , '4" + g + g+e+g + e 

3660 pd(14)=g+"8116"+e+e+e+e+e+e+p2+a2+s2+B2+s2+pl+83+s3+a3+83+ 
p3 

3670. pd(15 ) = ..JL8.. + g + e+g + "116" + p2 + h + pl+h+p3 
.. 3680 pd(I6) = "18'* + g + e+g + " 116"+g + p2 + s2 + s3 + "8116"+s3 + s3 + pl+aH-8l+B 

I + sl-fp3 

3690 pd(17)= M 18"+g+p2+s3+"116"+p3+e+pl+s3+s3+s3+p2+s2+pl+a3+s3 + 
a3 + p2 + Bl + ,, 8" + pl+a3 + a3 

3700 pd( 18)=" L16"+p2+82+pl+s3+s3+a3+p2+92+pl+83+B3+a3+p2+a2+pl+ 
b3+s3+b3+p3+c+"4 
3710 pd(19)="18r M +g+«+g+g+g+g+g 
3720 pd(20)=*C + "418 H +e + g+g+g+e+g 

3730 pd(21 )=g + ,, 418"+e+g + g + "4" + e + ' , 116"+p2 + h+pl+h+p3 

3740 pd(22)=g + "418 ,, +e+g + g+g+e + "4 

3750 pd(23) = "18"+g+e + g + g + e4- ,, 116"+e+e+e + e+e + e 

3760 po= 197 ， 0 ， 1,1,1,2,1,1,1,1>3,3,3,4,98,5,5,5,6,5,5,5,6,5,5,5, 
6 ， 5 • 5 ， 5 ， 7 • 

3770 8,8,8,9,8,8,8,10,11,1,1,12,13,1,1,1,3,3,3,4, 

3780 5,5,5,6,5,5,5,6,5,5,5,6,5,5,5,7, 

3790 20,20,20,21,22,22,20,23,11,1,1,12.13,1,1,1,1,14,1,1,1, 

II 15 , 

3800 1,1,1,12,1,1,1,16,11,1,1,1,11,1,1,1,17,18,19,9 9,2551 

3810 m_trk(8, M y 55,32 **) :trk(8) 

3820 /拿 
3830 return() 


NINJA WARRIORS より PARADOX 

西本芦樹 Nishimoto Hideki 


p し振りの ZUNTATA だよん | 

NINJA WARRIORS より， “PARA 
DOX” をお送りしましよう。丁 AITO ゲー 
ムミユ ー ジックの極みともいえる NIN J A 
WARRIORS では，業界初の津軽三味 
線を使用していた “DUDDY MULK” 


に目を（耳を）奪われがちですが， “ARE 
YOU LADY” やこの “PARADOX” の 
ような名曲もあるんですよ。作ってくれた 
のは，すっかり常連入りした本君ですね。 

曲のほうのデキはよいのです力 ? ，ボスコ 
ニアンのサンプリングと曲との相性が，あ 
まりよくないようで残念です。同封のデイ 
スク にはオリジナルのサンプリングデータ 

U スト2 PARADOX 


が入っていましたが，さすがに掲載するこ 
とはできませんでした。ちなみに，西本君 
ちなみに，西本君は気づいていたのかも 
しれませんが， Oh!X LIVE のリストは横幅 
が 64 文字で打ち出されています。 REM 文を 
入れるときは WIDTH 64 にして画面に入る 
ようにすると，掲載されたときにきれいに 
なりますよ。 
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320 

/* 
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/本 














330 

dim 

char 

V{4,10) = 1 
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340 

/* 

F/A 

OM 

WF 

SYC SPD 

PMD 

AMD 

RMS AMS 

PAN 

90 

/拿 
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0,206, 
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/拿 
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360 

/* 

AR 

DIR 

D2R 

RR D1L 

TL 

KS 

MUL DTI 

DT2 AMSE 

110 

It 














370 


2, 

0 ， 

0, 

7, 0. 

38, 

0, 

2, 0, 

e, e, 

120 

m init() 
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2, 

0, 

0 ， 

7, 0, 

12, 

0, 

2, 0, 

0, 0, 
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0, 
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7, 0, 
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0, 0, 

140 
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Z=1 

to 

8 











400 


2, 

0 ， 

0, 

7, 0, 

6, 

0, 

2, 0, 

0, o) 

150 


n .a8sign(Z t Z) 











410 

m_vset(1 

,V) 
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m_alloc(Z, 1400) 
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e d i o 
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next 
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F/A 

OM 

WF 

SYC SPD 

PMD 

AMD 

PMS AMS 

PAN 

190 

str 

Bl[ 

32] 

,B2[32), 

B3[32] 
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51, 

15, 

2, 

0,206, 

16, 
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1,0, 

3, 0, 

200 

3tr 

Sll 

32] 

,S2[32], 

S3[32] 
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/* 

AR 

DIR 
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RR D1L 

TL 

KS 
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DT2 AMSE 

210 

str 

Rl( 

32) 

,R2[32], 

R3[32] 








470 


31, 

14, 

0, 

7 ， 12, 

49, 

1, 

10, 0, 

0, 0, 

220 

atr 

B[ 

32 】 

,S 【 32], 

CL[32] 








480 


31, 

15, 

Or 

6,14, 

57, 

2, 

9, 0, 

0, 0. 

230 

str 

H[ 

32] 

, M[32], 

L132] 
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31, 

10, 

0. 

6, 0, 

69, 

1 ， 

3, 3, 

0. 0, 

240 

str 

ct 

32] 

, 0[32] 
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31 , 

10, 

0, 

5,13, 

0, 

2, 

1. 7, 

0, 0} 

250 

8 tr 

ZA[ 

256 】 ,ZB[2S6] 
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m vi 

3et (2 

,V) 







260 

dim 
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X(64)[256] 
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/* 
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PAN 


550 


28, 

15, 

2, 

0, 

206, 

16, 

0, 

5 i 

0 ， 

3, 

0, 

560 

/* 

AR 

DIR 

D2R 

RR 

D1L 

TL 

KS 

MUL 

DTI 

DT2 

AMSE 

570 


31, 

0, 

8, 

3, 

4, 

26, 

2, 

2, 

3, 

0, 

0, 

580 


31 ， 

8, 

6, 

10 ， 

4, 

0, 

2, 

4, 

3, 

0, 

0, 

590 


31, 

0 ， 

8, 

3, 

4, 

26, 

2, 

12, 

7, 

0, 

0, 

600 


31, 

8, 

6, 

10. 

4, 

0, 

2, 

2, 

7, 

0 ， 

0) 

610 

m vBet(3 

,V) 
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/* 








S 
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II 

630 

V={ 












640 

/* 

F/A 

OM 

WF 

SYC 

SPD 

PMD 

AMD 

PMS 

AMS 

PAN 


650 


59, 

15, 

2, 

0, 

206, 

16, 

0, 

1• 

0 ， 

3, 

0, 

660 

ハ 

AH 

DIR 

D2R 

RR 

DIL 

TL 

KS 

MUL 

DTI 

DT2 

AMSE 

670 


31, 

10, 

8, 

7, 

8, 

56, 

0, 

0, 

3, 

1, 

0, 

680 


31, 

15, 

0, 

7, 

6, 

32, 

0, 

8, 

7, 

0, 

0, 

690 


31, 

10, 

9, 

7, 

6, 

52, 

0, 

0, 

0, 

0, 

0, 

700 


31, 

10, 

9, 

7, 

6, 

0 ， 

0 ， 

1, 

0, 

0, 

0} 

710 

m vset(4 

,V) 
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/* 
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t h 
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730 

V={ 












740 

/* 

F/A 

OM 

WF 

SYC 

SPD 

PMD 

AMD 

PMS 

AMS 

PAN 


750 


62, 

15, 

2, 

0, 

206, 

16, 

0, 

1. 

0 ， 

3, 

0, 

760 

ft 

AR 

DIR 

D2R 

RR 

DIL 

TL 

KS 

MUL 

DTI 

DT2 

AMSE 

770 


31, 

5, 

8, 

5, 

2, 

42, 

0, 

H, 

0 ， 

2, 

0, 

780 


31, 

6, 

11, 

5, 

1, 

0, 

0, 

1, 

0 ， 

0, 

0, 

790 


31, 

6, 

8, 

5, 

2, 

7, 

0. 

1 ， 

0, 

0, 

0, 

800 


31, 

8, 

9, 

5, 

1, 

4, 

0, 

5, 

0. 

1, 

0) 

810 

m^vset ( 5 

,V) 
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/* 








B 

as 

s I 


830 

v=( 












840 

1* 

F/A 

OM 

WF 

SYC 

SPD 

PMD 

AMD 

PMS 

AMS 

PAN 


850 


34, 

15, 

2, 

0, 

206, 

16, 

0, 

1, 

0 ， 

3, 

0, 

860 

パ 

AR 

DIR 

D2R 

RR 

D1 し 

TL 

KS 

MUL 

DTI 

DT2 

AMSE 

870 


31, 

0, 

0 , 

7, 

0, 

24, 

0 ， 

1, 

1 ， 

0, 

0, 

880 


31, 

0, 

o, 

7, 

0, 

63, 

0, 

0 ， 

3, 

0, 

0, 

890 


31, 

0, 

0, 

7, 

0, 

23, 

0, 

0 ， 

5, 

0, 

0, 

900 


31, 

0, 

0, 

7, 

0, 

0, 

0, 

0, 

7, 

0. 

0} 
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m 一 vset { 6 

,V) 
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/* 

F/A 

OM 

WF 
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PMS 
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PAN 
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58, 

15, 

2, 
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16, 

0 ， 

1, 

0, 

3, 

0, 
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/* 
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RR 
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AMSE 
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31, 

10, 

7, 

8, 

2, 
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0, 

0, 

7, 

0, 

0, 

980 


31, 

8, 

8, 

7, 

> 5, 
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7, 

7, 
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0, 
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31, 

5, 

6, 
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0, 
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0, 
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31, 

8, 

6, 

6, 

， 5, 

2, 
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0, 
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0, 

01 
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m__v8et ( 7 

,V) 
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/* 
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12, 
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/* 
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2, 

0, 
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i 1. 

42, 

0 ， 

8, 

3, 

0, 

0, 
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12, 

2, 

0, 

11, 

, 1, 

0, 

0, 

8, 

3, 

0, 

0, 
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12, 

2, 

0, 

11, 

,1, 

50, 

0, 

8, 

7, 

0, 

0, 

1100 


12, 

2, 








0, 

0) 
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m vset(8,V) 
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V={ 
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/* 
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1150 


4, 

15, 

2, 

0, 

,206, 

16, 

0, 

5, 

0, 

3, 

0, 
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/* 

AR 

DIR 

D2R 

RR 

DIL 

TL 

KS 

MUL 

DTI 

DT2 

AMSE 

1170 


12, 

2, 

0, 

11, 

,1, 

42, 

0, 

4, 

3, 

0, 

0, 

1180 


12, 

2, 

0, 

11. 

， 1. 

0. 

0, 

4, 

3, 

0, 

0, 

1190 


12, 

2, 

0, 

11, 

,1, 

50, 

0, 

4, 

7, 

0, 

0, 

1200 


12, 

2, 

0, 

11, 

,1. 

0, 

0, 

4, 

7, 

0, 

0] 

1210 

m vset(9 

,V) 
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/* 








C 
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r u 
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1230 

v={ 
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/* 

F/A 

OM 

WF 

SYC 

SPD 

PMD 

AMD 
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AMS 

PAN 


1250 


36, 

15, 

^ 2, 

0, 

,206, 

16, 

0, 

5, 

0, 

3, 

0, 
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/* 

AR 

DIR 

D2R 

RR 

DIL 

TL 

KS 

MUL 

DTI 

DT2 

AMSE 

1270 


20, 

6, 

2, 

2 】 

i 2, 

44, 

0, 

8, 

7, 

0, 

0, 

1280 


14, 

5, 

3, 

9, 

, 3, 

2, 

0, 

8, 

7, 

0. 

0, 

1290 


20, 

6, 

2, 
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, 2, 

45, 

0 ， 
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3, 

0, 

0, 
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14, 

5, 

3, 

9, 

i 3, 

1. 

0 ， 

8, 

3, 

0, 

0) 
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m vi 

aet (1 

0,V) 
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/* 












1330 
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D 

r u 
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S 

e t 







1340 ハ 

1350 /本 I Kick ] 

1360 B=”Y2,23" 

1370 B1=B+ M R& M 
1380 B2=B1+ M R&” 

1390 B3=B2+ M R8&" 

1400 /* [ Snare ] 

1410 S:"Y2,15" 

1420 S1 = S+ M R16& ,# 

1430 S2=S+"R8&” 

1440 S3 = S+..R4&" 

1450 /% [ Tom Tom 】 

1460 H="Y2,30" 

1470 /t t Rest ] 

1480 R1= M R16& M 
1490 R2= M R8& M 
1500 R3="R4&” 

1510 ハ [ etc... J 

1520 CL=..Y2,8" 

1530 C=. ， Y2,65 M 
1540 0= u Y2 f 66 H 
1550 /t 

1560 /* Music Data 

1570 ハ 
1580 /* 

1590 /% JL Synth 1 L 

1600 /* 


1610 

X ( 0)= 

•. 较 1 V13 Y 48,20 Q8 

04" 


1620 

X(1)= 

M G+1& G+l 

»3 L8 V13 Y 48,20 05" 

1630 

X(2) = 

"D+4.C+2& 

C+l >G+1 

‘6 く C+16 礼 1 

•• 

1640 

X ( 3 )= 

M Y*18,0l) 

Y48,16D 

V48 f 32D 

Y 48,48 D" 

1650 

X( 4 )= 

M Y48,4D 

Y 48,80 D 

Y 48,96 D 

Y48 f U2D M 

1660 

X(5l = 

， .Y48, 1280 

Y4«, 14 41) Y48,160D 

Y48,176D M 

1670 

X(6l = 

M D16&D4 Y 48,0 L8 

C+1& C+2>G 

1+16<C+16 

1680 

X(7 1 = 

"C+4•>B2& 

B1 E16B16 <@L1" 
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2110 
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2780 
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2810 

2820 

2830 
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/* 

X 
X 
X 
X 
X 

/本 

X 
X 
X 

/拿 

for 

/* 

/* 

/♦ 
X(0 
X(1 
X(3 
X(4 
X(5 
X(6 
X(8 
X(9 
X(10 
X(ll 
/* 

X(13 
X(15 
/* 

X(21 

X(22 

X(23 

X(24 

X(25 

/* 

X(26 

X(27 

X(28 

/* 

for 

/* 


= M Y48 f 0C Y 48,16 C Y 48,32 C Y 48,48 C M 

= M Y 48,64 C Y 48,80 C Y 48,96 C Y48,112C” 

="Y 48,128 C Y48 f 144C Y48 f 160C Y 48 ， 176 C" 
=”C16&C4> Y 48,20 L8 B2& B1 R8" 

= ••1:2 B4.B-4 •く D-l>A-4 F+U F+1:| し 16 03 Q6" 

= M ©4 VI1 P3 |:2 G+D+A+D+ BBRR G+D+A+BR4 :|" 
= ，•丨 ：2 <C-f>A4BG+ A+A+R <C+> A + BG+A+R4 : | 

=X(13) 

=X(14) 

= ••1:2 BG+A+F+ G+ERBG+A+F+ER4 : | M 
= "|:2 A+GG+F GD+RA+ GG+FD+R4 ： | M 
=X(17) 

=X(18) 

= H VU Q8 |:2 @8 ®L1 01 R4D+4G+4 ぐ . 

= ，， Y 48,20 F Y48.41F Y 48,62 F Y 48,83 F" 

="Y 48,104 F Y 48,125 F Y 48 ， 146 F Y 48 ， 167 F" 

= M Y48,188F Y 48,209 F Y 48,230 F Y 48,251 F" 

= M F8. Y 48,20 D+l&D+l&D+l : | L16 M 

=••02 V12 P3 F1&F2.D+FD+F F+1& F+4A+4G+4P+4" 
= M G+1& G+4C+4F+4G+4 Al く C+l" 

= M V12 |：3 D+1& :|D+2." 

=0 to 28 : ra_trk(1 f X(I)) : next 

今 Synth 2 申 

= M ©1 V13 Y 49,24 Q8 04” 

= H B1 El B1 ®3 L 8 V10 Y49 # 32 05 R16" 

= M Y49 f 48I) Y 49,64 D Y 49,80 D Y 4 9,96 D" 

= M Y49 f 1120 Y 49,128 D Y 49,144 D Y 49,160 D M 
="Y 49 ， 176 D Y 49,192 D Y 49,208 D Y 49,224 D” 
= M D16&D4 Y 49,32 L8 C+1& C+2>G+16<C+16" 

="Y 49,48 C Y 49,64 C Y 49,80 C Y 49,96 C” 

二 M Y 49,112 C Y 49,128 C Y 49,144 C Y 49,160 C” 

= M Y49 f 176C Y 49,192 C Y 49,208 C Y 49,224 C" 
= M R16&C4> Y 49,32 L8 B2& B1 R8” 


:”@4 V7 PI 
: X(13) 


1:2 G+D+A + D+ BBRR G+D+A+BR4 : | 


X 

X 

X 

X 

X 

X 

X 

X 

X( 

X( 

It 

X( 

x ( 

/» 

X(21 

X(22 

X{23 

X(24 

X(25 

/t 

X(26 

X(27 

X(28 

/本 

for 

/* 

/* 


: ,, V9 Q8 |:2 @Ll 01 R4D+4G+4 ぐ . 

: "Y 49,40 F Y49,61F Y 49,82 F Y49 f 103F M 
: ,, Y49,124F Y49, 145F Y 49,166 F Y 49 ， 187 F" 

: ”Y 49,208 F Y 49,228 F Y 49,238 F Y 49,248 F" 

: ,, F8. Y 49,40 D+1&D+1& |1 D+l ： |D42. • L16 P3" 

: ”01 V12 P3 F1&F2.D+FD+F F+1& F+4A+4G+4F+4•• 
: ,, G+1& G+4C+4F+4G+4 A1<C+1 V13 M 
'I : 3 D+1& : |D+2. •• 


基 Synth 3 基 

="®1 V13 Y 50,28 Q8 05" 

= H E1 b El @3 L8 V9 Y 50,48 05 R8” 

= n Y50 t 40D Y 50 ， 56 1) Y50,72D Y 50,881)” 

= n Y50, 1040 Y50, 120D Y 50,136 D Y 50,152 D.. 
="Y50 f 168D Y50, 1840 Y 50,200 D Y 50 ， 216 D” 
="D 16^1)4 Y50,^1O L8 (: +1& C+2>G+16 く C+16 
= M Y 50 ， 18 C Y50 ， 64C Y 50 ， 80 C Y 50,106 C M 
= M Y50,110C Y50,118C Y 50,126 C Y 50,134 C” 
= M Y50, 1760 Y50, 1920 Y 50 ， 208 C Y 50 ， 224 C" 
= M R164C4> Y 50,52 L8 B2& B1 R8 M 


： M ©4 V7 
: X(13) 


P2 


1:2 G+D+A+D+ BBRR G+D+A+BR4 : I •• 


:” Q8 1:2 @8 «L1 PI 01 R4D+4G+4 く " 

: ,, Y 50,48 F Y 50,69 F Y 50,90 F Y50,11IF" 

: "Y 50,132 F Y 50,153 F Y50,174F Y 50,195 F M 
: ,, Y 50 ， 216 F Y 50,226 F Y 50,236 F Y 50,254 F” 

: ,, F8. Y 50,52 D+l&D+l&D+l : | L16 M 

: , .02 V10 F1&F2.D + FD+F F+1& F + 4A + 4G*MF+4" 
: ,, G+1& G + 4C+4F+4G+4 A1<C+1 M 
: ,, Vll |:3 D+1& : |D+2" 


m^trk(3 f X(I)) 


分 Synth 


分 


:"@1 V13 Y 55,32 Q8 05" 

: "G+l&G+l @2 Y51,20 05 V12 L8 Q6" 
2>="D+C+>GEC+EG+<C+ | : 2 EC+>GEC+EG+<C+ :|" 
3)="EC+>GEC+BA<C+> | : 4 <D + >BA+G+D+G+A+B : |" 

：8 <C+>A+G+F+C+F+G+A+ ：|<" 

5 い .. Vll L16 @2 o4" 

6 ) = " | : 4 Q+<D+D+>G + <D+D+>G+<D+> : 

7 ) = M | : 4 A+<F+F+>A+ <F+F+>A+<F+> : | " 

8) =X(6) 

9) =X(7) 

0)="V10|：4 BBBE BBEB ：||：4 D+A+A+D+ A+A+D+A+ 

: X(10) 

:"® 8 V5 Ol LI Q8" 

: ”1:2 G+& G+2. .&0+24 & y2,36G+24 & Y2,37a + 244 G+&G+ : | 

: "L16 vllo0 A+1& A+l B1& Bl<" 

: "C+1&. C+l D1 El" 

: "Vll |:2 Y2,37 G+1& |1 G41 : |G+2." 

( 注）トラック 8 です。 

1=0 to16 : m_trk(8,X(I)) : next 

Synth 5 〇 

= M »1 V13 Y 52,36 Q8 05" 

="B1 &B1 @2 Y 52,36 05 V7 L8 Q6 R16" 

="I：4 R1 : | «8 Y 52,40 VI2 02 R16 Q8" 

="I ： 3 d+l& :|D+2 … D+32F+32" 

= ..G+UG+2 … <D+32C+32> A+1&A+2. . .D+32F+32" 
s**G+l&G+2. . . <D+32C+32> A+2 ... B16<C+2D+4 . 01" 


Oh!X LIVE in f 90 121 


















2850 

2860 

2870 

2880 

2890 

2900 

2910 

2920 

2930 

2940 

2950 

2960 

2970 

2980 

2990 

3000 

3010 

3020 

3030 

3040 

3050 

3060 

3070 

3080 

3090 

3100 

3110 

3120 

3130 

3140 

3150 

3160 

3170 

3180 

3190 

3200 

3210 

3220 

3230 

3240 

3250 

3260 

3270 

3280 

3290 

3300 

3310 

3320 

3330 

3340 

3350 

3360 

3370 

3380 


X(9 
X(10 
X(11 
X(12 
X(13 
It 

X(14 
X(15 
X(16 
ハ 
for 
/* 


: ”V8 R8 丨 ：2 ©8 P2 »L101 R4D+4G+ 
: ,, Y 52,40 F Y52,81F Y 52 ， 102 F Y52 
: ,, Y52-, 124F Y 52,145 F Yf 52,166 F Y52 
: , 'Y 52,208 F Y 52,229 P Y 52,250 F Y52 
: ,, F8. Y 52,48 D+UD+l&D+l ： | 01 L 

: "A+1& A+l B1& Bl<" 

： M C-f 1& C+l D1 El" 

: "V12 1:3 G+1& :|G+2" 

1=0 to16 : m_trk{5 9 X(T)) : next 

a Synth 6 a 


123F M 

187F M 

254F” 

6 P2" 


X(0 

X(1 

X(2 

X(3 

X《4 

X(5 

X(6 

X(7 

X(8 

X(9 


X(12 
X(13 
X(14 
X(15 
X(16 
X(17 
X(18 
/* 

X< 19 
X(20 
X{21 
X(22 
X(23 
/* 

X(24 
X(25 
X(26 
ハ 

for r=0 Lo 26 : m^trk(6 f X(I|) 
パ 

ぬ Synth 7 / Bass 


,156D&" 
,28 I>&” 

,156C+&.. 
,28 C+&" 
,156C&" 
,28 C& 

,lf)6B& M 
,28 B&” 

,156A+&” 
,28 A+&” 


V10 Y 53,48 Q8 05 R8 PI" 

B1 &B2. .95 Y 53,20 03 VI1 L32 R1 PI .， 

Y53 f 252D& Y53,220D& Y 53,188 D& Y53 

Y53, 124D& Y 53,92 D«l Y 53,60 D&. Y53 

Y 53,252 C+& Y 53,220 C+& Y 53,188 C+& Y53 
Y 53,124 C+& Y 53,92 C+& Y 53,60 C+& Y53 
Y 53,252 C& Y 53,220 C& Y53,188C& Y53 

Y53,124C& Y 53,92 C& Y 53,60 C& Y53 
Y 53,252 B& Y 53,220 B& Y 53,188 B& Y53 
Y53,124B& Y 53,92 B& Y 53,60 B& Y53 
Y 53,252 A+& Y 53,220 A+& Y 53,188 A+& Y53 
Y 53,124 A+& Y 53,92 A+& Y 53,60 A+& Y53 
Y 53,20 R2. Rl" 

咎 9 VI100 L2 G+A+BCC+D+EF+G+". 

V8 01 L8 |:2 Rl F+A+B<C+* D+E4<El&Elr 
I ：4 Rl : | ©8 V15 02.. 

1:3 d+l& : |D+2... D+32F+32” 

G+1&G+2 … <D+32C+32> A+1&A+2...D+32F+32” 
G+<D+32C+32> A+2 … B16<C+2D+2 01" 

VI1 |:2 袋 8 ❼ LI02 R4D+4G+4 く " 

Y 53,20 F Y53.41F Y 53,62 F Y 53,83 F" 

Y 53 ， 104 F Y 53 ， 125 F Y 53,146 F Y 53 ， 167 F" 

Y 53,188 F Y 53,209 F Y 53,230 F Y 53,251 F" 

F8. Y 53,20 D-f l&D+l&D-fl : | 01 L16 VI ド 

A+1& A+l Blk B1 ぐ . 

C+1& C+l D1 El .， 

V12 |：3 G+1& : |G+2. •• 


ぬ 


"©1 V10 Y 54,48 Q8 05 R8 P2" 

"B1 &B2..05 Y 54,40 03 Vll L32 Rl P2 0L1R L32" 
"Y54,2<36D4 Y 54,204 Di Y54,172D& Y 54 ， 140 D&" 
"Y 54,108 D& Y 54,76 D& Y 54,44 D& Y 54,12 DA" 
"Y 54,236 C+& Y 54,204 C+& Y 54,172 C+& Y54,140C+&" 
"Y54,108C+& Y 54,76 C+& Y 54,44 C+& Y 54,12 C+&" 


3390 
3400 
3410 
3420 
3430 X 
3440 X 
3450 X 
3460 X 
3470 X 
3480 X 
3490 X 
3500 X 
3510 X 
3520 X 


X(6) = "Y 54,236 C4 Y 54,204 C& Y54,172C& Y54,140C&" 

X(7) = '*Y54,108C4, Y 54,76 C&. Y 54,44 Ct Y 54,12 C&>" 
X(8)="Y54,236B& Y 54,204 B& Y54,172B& Y 54,140 B&" 
X(9)="Y 54,108 B& Y 54,76 Bfc Y 54,44 B& Y 54,12 B&" 

(10) = '*Y 54,236 A+4 Y 54,204 A+& Y 54,172 A+& Y54,104A+4" 
<11 い，， Y 54,108 A+& Y 54,76 A+& Y 54,44 A+& Y 54,12 A+t M 

(12) ="Y54,40 R2 R8...8L1RR R1R8" 

(13) = M ®9 V8 00 L2 0+A+B<C+D+EF+Q+4." 

(14) = M 010 V6 01 L8 |:2 RR1 F+A+B<C+ D+E4<E1&E2.,r> 

{15>：：._®7 02 V14 Y54,20" 

(16 ) = " | : 3 Q+1&Q+2. . .D+32F+32 : | 

(17) = "|：2 0+1&Q+2. . .D+32E32 : | 

(18 ) = " | ： 2 G+1&G+2...D+32 |1 G32 :|E32 G+l&G+l" 

(19)="Y 52,40 V12 «6 |:9 G+1&G+1& : | G+1&G+2R8" 


3530 /本 

3540 for 1=0 to19 : m_trk(7,X(I)) : next 
3550 /t 


3560 f* Q Drums & Bass2 Q 

3570 ハ 


3580 X(0)="Y3,3 L16 Y51,20 Q8 @V0" 

3590 X(1)="R1R1" 

3600 X(2 ) = " | ：2 " + B3+R2 + B1+B3 + R1+CL+R3 
3610 X(3)=B3+R2+B1+B3+R1+B3 
3620 X(4)=B3+R2+B1+B3+R1+H+R3 

3630 X(5)=B3+R2 + B1+B3 + R1+R3 + " : | 

3640 X(6)="|：3 "+B3+R2+B1+B3+R1+CL+R3+" :| 

3650 X(7)=B3+R2+B1+R3+R1+CL+R2+CL+R2 

3660 X(8)=X(6) 

3670 X(9)=X(7) 

3680 / 拿 


3690 

3700 

3710 

3720 

3730 

3740 

3750 

3760 

3770 

3780 

3790 

3800 

3810 

3820 

3830 

3840 

3850 

3860 

3870 

3880 

3890 

3900 

3910 


ZA="V14 @6 02" 


ZB=B3+S2+B1+B2+B2+R1+S3 


10) =ZA+ M | ：7 "+B+"0+4&"+S2+Bl+B3+Rl+S3+" : |" 

11) =B3+S2+B1+B3+R1+S2+S1+S1 

12 ) = " | : 3 " + B3+S2 + B1+B3 + R1+S3 + " : |" 
13)=B3+S2+Bl+B3+Rl+Sl+C+Rl+0+R2 
14 ) = " I ： 4 "+B3+S2 + B1+B3+R1+S3 + " : | 


: I" 


15)=7.B+ZB+R3+S2 + B1+B2 + B2+R1+S3 
IB)=B3+S2+B1+B2+B2+R1+ m 1:4 "+S1+" 

17) =X(15) 

18) =B3+S2+Bl+n2+B2+Rl+"|：2 "+S2+" :|" 

19 ) = " | :3"+ZB+": I" 

20) =B3+S2+B1+B2+B2+R1+S2+S1+S1 

21) ="| ： 4 "+B3+S2 + B1+B2+B2+R1+S3 + ” ： I" 

22} = " | :2 R4& M + S2 + B1 + B2 + B2+R1+S3 

23) = " | 1" + B3+S2+B1+B2+B2+R1+S3 

24) =" ： | " + B3+S2 + B1+B2 + B2 

25) = M R16 @V0"+CL+R2+CL+R1+CL+R1 

< 注）トラック 4 です < 

0 to 25 : m_trk(4,X(I)) : next 


for 

/* 

m_play( 


キューピークッキン ^) f 一 7 

小宮山博志 Komiyama Hiroshi 


今月のイロモノ 


I 


キューピー 3分クッキングの オーブニン 
グ テーマを お送りします。この曲は誰もが 
聞いたことあるのではないでしようか。こ 
の作品では オー ケストラヒットを使用した， 


豪華掏爛フルコーラスバー ジョンに 仕上 
がっています。作者の小宫山君によると， 
正しい遊び方が存在しています。 

アンプ 1つ 

ラジカセ 少々 

イコライザ カップ1杯 

を用意してください。 

リスト3キュービー3分クッキング 


さて，準備ができましたら，イコライザ 
の 100 Hz 以下が100%, 500〜 2 kHz が50〜 
60%, 10 kHz 以上を80〜90%にします。 
お好みに合わせて，バスブーストを入れる 
と力％サラウンドにするなど，彩りを添え 
てくださいね。 

聴くときは，左右の スピーカーとの 正三 
角形の頂点より多少遠くの位置でなるべく 
大音量で楽しみましよう。「てけてんてん 
てんてんてん j と口ずさむ と 一層楽しく聴 
くことができます。 

さて，明日はぺヤング ソース 焼き ソバの 
作り方をお送りしましよう（しないって）。 


10 /拿 

20 / 享キュービー . 3 分クッキングの BGM 
30 /# 

40 char v< 4,10 > 


50 

v={ 44 • 

15, 

〇 , 

0 9 

0 9 

0 t 

0 9 

0 9 

0, 

3 t 

0, 

60 

31 • 

0, 

0, 

0, 

0, 

33, 

0 f 

4 f 

3, 

0 f 

0, 

70 

31, 

11, 

0, 

6 r 

6 f 

0, 

1 f 

2, 

3, 

0 f 

0, 

80 

31, 

0, 

〇 , 

0, 

0, 

31, 

0, 

6, 

7, 

0, 

0, 

90 

31 • 

11, 

0, 

6 f 

6 f 

0, 

1 f 

2 f 

7 , 

0, 

0} 


100 m_v8et(70 f v) 

110 m^init() : for i=l to 8:m_alloc(i, 10000 ) : m_aasign(i,i) : next 

120 ft 

130 atr a(20)(256] 

140 ハ 

150 a(0 ) = M t 160©7004116 v 14y3 • 3 ••: a(1)= H r8gggrgrererf r8. r8gggrgr 
c+rc+rdr8. 

160 a(2)= M tl68r8gg grf+r frer d+rdr c+rcr t164>br 8 .<gr8.>br8.< 
grt160gg 

170 a( 3 ) = M er8 .gr8,gr8, r8gg ： fr8.gr8.gr8.r8gg er8 • gr8 .br8 • ar8 • g 
rf+rfrerdrr4gg 

180 a(4)="er8.gr8,gr8.r8gg dr8•br8.br8.r8bb arrrarrr<drrrdrrr 
>grrr>gg+aa+brgrargr 

190 a(5 > = "errrgrrrergrrrgr frrrgrrrf rgrrrgr errrgrrrbrrrarrr 

200 a(6)= M grf+rfrerdrr4gg errrgrrrgrrrrrgg frrrarrrarrr く crrr 

210 a(7)= M errrr4drrrr4 cr>f+gg+aa+b<crrrc4 

220 for i=0 to 7:m_trk(1 f a(i)) : next 


230 /拿 

240 a(0 い " 0 7004116 vllp2rl6y54,10":for i = 0 to 7:m.trk(7 f a(i )):n 
ext 

250 /拿 

260 a(0)="« 7004116 vllplrl6.y55,30":for i=0 to 7:m_trk(8,a(i>): 
next 

270 /* 

280 a(0) = M ©70o4116vl3y4 9 f 40p2 r2y2,45c + ry2,45c + ry2,46drrr r2>y 
2,42b-ry2 f 42b-ry2,43brrr 

290 a(1)= >, vl2<r4rl2grf+rfrerd+rdrc+rcr>brrr<grrr>brrr<grr24 p3 
vl2o3g2e2 b2g2 <c2>e2 b2g2 

300 a(2)= M <c2>g2 b2g2 a2f+2 grrrr2. o4c2>g2 b2g2 <c2>g2 b2g2 < 
c2>g2 a2f2 g2b2 <c2r4e4 

310 for i=0 to 2:m_trk(2,a(i)) : next 

320 /拿 

330 a(0) = "Q70o4116vl0y50,0pl rlrl r4r8 .grf+rfrerd+rdro-frcr>brr 



340 a(1)= M vl5o2q3p314o>g<c>g dgdg <c>g<c>g dgdg <c>g<c>g dgdg 
adad gr2• 

350 a( 2 ) = M o2c>g<cc >gdgg <c>g<cc >gdgg <c>g<cc >fcf f egt^g <c>g 
<cq8c 

360 for i=0 to 2 : m_trk(3,a(i)):next 

370 /拿 

380 a(0)= H @70o3vlll8q6y51,0 M :a(1)= M rlrlrlr2..y2 f 48ry2,48ry2 f 48 
r 

390 a(2)="| : rererererfrfrfrf:Irererere rgrgrgrg rf+rf+rf+rf+ y 


122 Oh!X 1990.10. 


日本音楽著作権協会（出)許諾第9071 289-00 1号 






























2 | 48grr4.y2,48rry2,48r 

400 a(3) = M | : 3rererererfrfrfrf:| y2,45rerey2 , 43rfrfy2,41rererry 
2,41r 

410 for i = 0 to 3 ： m_trk(4 f a(i)) : next 
420 /拿 

430 a(0) = M @70o3vl U8q6p3y51,0 M 

440 a(2)= M | : rcrcrcrc>rbrbrhrb< : |rcrcrcrc| : rdrdrdrd : | drr2• 

450 a< 3 } = •• | : rcrcrcrc> rbrbrbrb< : | | : rcrcrcrc : | rcrc> rbrb< rcrcr 


460 for i = 0 to 3 ： m__trk( 5,a( i )) : next 
470 / 本 

480 a(0 > = M @70o2vl118q6p3y51,0 

‘190 a( 2 ) = '* | : Srgrgrgrg : | rbrbrbrbrararara brr2 . 
500 a( 3 ) = " | : 5rgrgrgt*g : I rarai ara rgrgrgrg rgrgr 
510 for i = 0 to 3 : m_t rk(6 t a(i))：next 
520 m.playU 


| =:: Ma 「 velLand _ 

l 音楽注が高ぃナムコミュージック丨 


ふと気がついたのですが， ナムコの ゲー 
ムミュージックがやたらに載ってるんじや 
ないの？このページって。特に意味はな 
いんですけど。最近のゲームミュージッ 
クでは，やはり ナムコが いちばん出来がい 
いみたいですね。聴いてても楽しいし。こ 


ていますので（要するにシステム2を持っ 
ている），彼の家でコインを気にせずに遊ん 
だものです。さて，作品のほうですが，も 
ともとが短い曲であったこともあり，おま 
けのサブルーチンを含めてみても，短めに 
なっています。入力しやすいのは嬉しいこ 
とですね。音色のほうがイマイチ似ていな 
いといわれてしまいそうですが，ノリは完 
全に Marvel Land になっていますので， 



は30行から140行までで，音色のリストを出 
力するサブルーチンと，各音色のデータを 
ダンプするサブルーチンです。曲を演奏す 
るときには必要ありません力 5 '，この手のサ 
ブルーチンはあると便利ですので，ぜひ入 


の Marvel Land は西川さんが基板を持っ よしとしましよう。おまけのサブルーチン カしましよう。 


(S.K.) 


リスト4 

10 9 Marvel Land 

20 GOTO 150 * It is no nessesary to input 30- 140 . 

30 し ABEL”T0NE LIST 

40 FOR N=0 TO 39 

50 PRINTUSING** N+1 ; 

60 PRINT#© MEM$(&HB000+N 本 10,10); 

70 NEXT 

80 RETURN 

90 し ABE し M 0PMDATA” 

100 INPUT"Tone No, = ;TN :T=TN-1 

110 PRINT#0 ••DATA M ;TN;",";MEM$ 《 &HBO00+1O>T,10} 

120 FOR N=0 TO1 : PRINT M DATA M ； : FOR M=0 TO17 

130 PRINT RIGHT$( m 0 m +HEX$(PEEK(&HB190 + T»364M+N<18) ) ,2) + M ,# ； 
140 NEXT : PRINT : NEXT : RETURN 

150 1 - OPM DATA 一 

160 DATA 12 .Guiter 窣 5 

170 DATA FD 00 45 3143 7128 00 2B 00 IF IF IF IF 08 0A 0A 0A 

180 DATA 08 08 08 08 55 34 34 34 00 00 00 00 00 00 80 00 00 00 

190 DATA 13 ,Trumpet t 1 

200 DATA D2 00 011142 5111IB IB 00 1110 OF 0D 0E 00 00 08 

210 DATA 00 00 00 00 F0 00 00 0A 00 00 00 00 00 00 80 00 00 00 

220 DATA 14 ,Guiter *4 

230 DATA ED 00 33 40 42 711A 38 00 00 IF IF IF 9F 00 06 06 06 

240 DATA 00 IF IF IF 00 F4 F4 F4 00 00 00 00 00 00 80 00 00 00 

250 DATA 17 ,Violin *2 

260 DATA C3 00 45 7143 312F 26 20 00 IF 1212 4F IF IF 03 08 

270 DATA 00 00 03 05 00 00 F0 25 00 00 00 00 00 00 80 00 00 00 

280 DATA 32 ,namco Drum 

290 DATA FE 00 4F 414141 0D 03 00 00 IF IF IF IF 00 OF 07 07 

300 DATA CO14IF IF 0F 6F FF FF 00 00 00 00 00 00 80 00 00 00 

310 DATA 35 ,Guiter *3 

320 DATA CO 00 4210 53 41IB IE IE 00 9F 9F 9F 9F 00 03 03 07 

330 DATA 00 00 03 03 00 F0 F0 A6 00 00 00 00 00 00 80 00 00 00 

340 DATA 36 .Base 本 SI 

350 DATA ED 73 30 713110 IB 70 43 43 9F 5E 5F DF 05 05 09 03 

360 DATA 05 03 04 02 97 45 A6 47 00 00 00 00 00 00 80 00 00 00 

370 DATA 39 ,Snare Drum 

380 DATA FD 00 0C 01 01 01 00 616161IF 5C 5E 9C 00 91118F 

390 DATA CO 00 00 00 01 F8 D9 F7 00 00 00 00 00 00 80 00 00 00 


Marvel し and 


ODKt 

660 

PLAY" 

： I12 L8 05 V12 H7 

R128 [ M ； 


670 

PLAY.’ 

EEF4EC4E 

&EEEG2R 

EEF4E4C4 

Dl" 

680 

PLAY.. 

DDE4D4.D 

&DDEED2 

DDE4D4F4 

El" 

690 

PLAY" 

EEF4EC4E 

&EEEE2R 

EEF4E4C4 

Dl" 

700 

PLAY" 

DDE4D4.D 

&DDEED2 

DDE4D4F4 

El" 


710 P し AY”R1 R1 R1 R1 
720 PLAY'.Rl R1 R1 Rl]"; 

730 • - Guiter 3-2 一 

740 PLAY"： 112 L8 05 V12 H7 R128 ["； 

750 PLAY"CCC4C<G4>C 4CCCC2R CCC4C4<G4 Bl..; 

760 PLAY"BBB4B4.B &BBBBB2 BBB4B4>D4 Cl "； 

770 PLAY"CCC4C<G4>C &CCCC2R CCC4C4<G4 Bl"; 

780 PLAY"BBB4B4.B &BBBBB2 BBB4B4>D4 Cl"; 

790 PLAY..R1 R1 R1 R1 "； 

800 PLAY"R1 R1 R1 R1]"; 

810 1 - Guiter 2 - 

820 PLAY" :135 L16 05 [V14 "； 

830 PLAYSTRING*(6,"C8E8FG>C8<")+STRING$(8,"<G8B8>CDG8 H ) : 

840 PLAYSTRINGS(8,"C8E8FG>C8<")+STRINGS(8,"<G8B8>CDG8 ")； 

850 PLAYSTRING$(2,"C8E8FG>C8<")+"V15 "； 

860 PLAYSTRINGS(4,"<F8A8B>CF8")+STRINGS(4,"C8E8FG>C8<") : 

870 PLAYSTRINGS(3,"<F8A8B>CF8")+ " <F8A-8B>CF8"+STRINGS(2,"<F+8A8B 
>CF8 ")； 

880 PLAY.. <G8> VI6B>C< <G> >C8. <G>D<B>D<G> D<B>D く]，.； 

890 • . . naraoo Drum - 

900 PLAY"： 132 L8 03 V15 S4,1,0,60 =3 【"； 

910 P し AYSTRING$<23,"RRERRRER" い， . RRERRREE16E16]"; 

920 • - Base 

930 PLAY"： 136 L8 03 V15 [ H ； 

940 PLAYSTRING$(3,"CCG>C<CCQ>C< ")+STRINGJ(4,"<GGB>D<GGB>D")+"C 
CG>C<CCG>C く , .； 

950 PLAYSTRINGS ( 3 , ,, CCG>C<CCG>C< " )+STRING$ ( 4 , •，く GGB>D く GGB>D" >+ ..C 
CG>C<CCG>C<"; 

960 PLAYSTRING*(2, "く FF>C<F>FF>C<F"> +STRING$ < 2,"CCG>C<CCG>C <")； 
970 PLAY"<FF>C<FFF>C<F FF>C<FFFA->C <F+F+>DFf<F+F+>DF <GG>DG< 
GG>DG )"； 

980 ’- Snare 


400 DATA 0,0,0,0 

410 » - SET TONE DATA - 

420 READ T r TN$,A$,B$：IF T=0 THEN 460 
430 MEM$<&HB000+<T-1}»10,10>=TN$ 

440 MEM$(&HB190+(T-1)*36,36)=HEXCHR$(A$+B$) 

450 GOTO 420 
460 LABEl/.HS” 

470 TEMPO0 
480 PLAY"T121" 

490 ' - Gutter 1 / Trumpet — 

500 PLAY"R128[I14 L16 05 VI3 "； 

510 PLAY"OBCAFCa8E8C4. GECAFCG8E2 QECAFCQ8E8C4. <0>F<Q>F<G>FE 

520 PLAYSTRING$(3,"D<BF>FD<F>B8D2")+ M <a>G<G>G<G>GF8E2" ； 

530 PLAY"GECAFCG8B8C4. GECAFCG8E2 GECAFCG8E8C4 . <OF<OF<OFE 

540 PLAYSTBING$(3,"D<BF>FD<F>E8D2")+">C<GAB>CCC4.<CDE8 "； 

550 PLAY"V16L 811305 A2&AG+A>C &C24CC<BA G2&OEOC &C1 ’.； 

560 PLAY"<A2&AG+A>C tCl D2&D<AB>C< Bl]" : 

570 , - Violin - 

580 PLAY": 117 L8 04 V16 R128[" ； : V$="EGFAGEFD" 

590 PLAY V$+V$+V$+"D<BGDFGB>C" : 

600 PLAY STRINGS ( 2 , "DFEGFD<B>C" ) +"DFE0FD< AB >CECQCECO'* ； 

610 PLAY V$ + V$+V$ + .'D<BGDFGB>C"; 

620 PLAY STRINGS(2,"DFEGFD<B>C")+"DFEGFD<AB >CECGCECG "； 

630 PLAY"AF<B>CAF<B>C AF<B>CAF<B>A OEFAGEFA QEFAGEFA "； 

640 PLAY..AF<B>CAF<B>C AF<B>CF<A-B>D D<AF+D>D<AFD B>D<BGB>D<BQ> 


990 PLAY" :139 L4 03 V15"; 

1000 PLAY" 【 E]"; »[Tenu：J 

1010 • - Hi-Hat — 

1020 PLAY H ： L8 08 S4,1,14,0 =3 V15 Y 7,49 Y6,0["; 

1030 PLAY STRINGS <190, "E">+”RK 】"； 

1040 , - Guiter 4-1 - 

1050 PLAY" ： L8 04 VI5 S0,0,0,0 rlK0 ["; 

1060 PLAY STRINGS(2,STRINGS{12,"RG")+STRINGS{16,"RF M )+STRINGS ( 4 , 
"RG M ))； 

1070 PLAY STRING$(8, M RF M }+STRINGS(8, 'RG")+STRING$(12,"RF M ) + "RGRG 
RFRF]..: 

1080 ' -:- Guiter 4-2 

1090 PLAY":L8 04 VI5 SO,0,0,0 =1 ~1 K0 ["； 

1100 PLAY STRINGS (2, STRINGS (12, 'RE" )+STRINGS (16 , "RD'*)+STRINGJ ( 4 

1110 PLAY STRINGS ( 8 , •'RC" ) +STRIN0S ( 8 , ,, RE M ) +STRINGS ( 8 , "RC M )+STRIN 
GS ( 8,. RD" )+"].. 

1120 1 r—r—=-=- = —s—=—=—r—s— References —:—=—r 

1130 * » 

1140 'Knight Arms 3D-Sta«e by Nishikawa Zenji (Oh!X *90 葶 06fl い . 

1150 ， PSG Hi-Hat » 

1160 * PSG Parametors * 

1170 ' * 

1180 'Marvel Land / namco (SCITRON) » 

1190 ' Score * 

1200 ' ' 

1210 * — =—s —= —s —r —z —=—= —r —r —= —r —s —r —= —r —= —s —s —r—= —r—=—s—s —s — • 
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PROGRAMMING 


清水和人流 
プログラミング道場 

〔その2〕 


ああ，ピアニスト 

演歌プログラミングで日本人の心を歌つだ清水和人氏が今月はシヨバンにな 
る。さあ君も暇プ□詩人となつてキーボードを白鍵と黒鍵に塗り分け （？）, 
Shimizu Kazuto 珠玉の名演奏を末永<後世に残そ*5ではないか。 


夜，机の前に座っていると，あの感覚が 


ヒタヒタと押し寄せて〈る。夜だけの世界 


がボンヤリとした頭を支配してくる。かす 
かに聞こえる呼び声，それは遠くに，しか 
しハツキリとこう言っている。「さあ ， BA 
SIC を起動するのだ」と。 

そうだ，いまこそ BASIC を起動しなけ 
ればならない。そこに広がる無限大の世界 
を見るために。そ；を自分の世界に変えて 
い〈あの感覚を味わうために。人類の生み 
出した輝かしい新文明，ソフトウェアの世 
界を切り開くために。 


^キーボードをキーボードに 



いつものように口をポカンとあけ， I 暇プ 
ログラミング商店街を散歩していると，指 
がふとタイビング感覚からショパンに変わ 
ってしまった。そういえばピアノもしばら 
〈弾いていないなぁ。そう思うといままで 
やっていたプログラムなど忘れて，指づか 
いはすっかりピアノ。画面もメチャクチャ 
になってしまった。 

これはいかん，と思ってちよちよいのち 
よいと作ったのがリスト1のプログラムで 


• U スト1 


ある。 X 68000 のキーボードを演奏用のキ 
ーボードに変えてしまったのだ。その短さ 
は BASIC マニュアルに載せられるほど小 
さい。20，30, 60行の文字列の初期化がい 
やらしいけど，ビールを飲みながら十分打 
ち込める程度である。 

X - BASIC には FM 音源の コントロール 
をする関数が用意されているのだから ， B 
ASIC マニュアルに載っている MML (音 
楽を記述するための言語）とその例題さえ 
読めば，すぐに音楽演奏が可能である。 

70行はメモリの確^:，80行はメモリをチ 
ヤンネルごとに割り当てている。ここでは 
8チヤンネルのうち6チヤンネルを使って 
いる。あとは，140〜160行で MML を書き 
込んでは FM 音源を鳴らしている。 

20行の ba $ は，キーボードのどれが押さ 
れたかを判断するために使っている（キー 
ボードの配置は鳴らしてみて覚えてね〉。 

それが30行と60行で定義した ca $ の何番目 
というふうに対応していて，お望みの音が 
出るって寸法である。 

噂によると，このままだとピアノだが， 
150行の@1を@15に変えるオルガンにな 
るらしい。この数字と音色の関係は BASI 


10 int f =0 

20 str ba$[46]="zxcvbnra,./qwertyuiop@[asdfghjkl ；： 1234567890-^ 

¥" 

30 str ca$ < 46 > [ 3 ] = {”3c" , "3d" , ” 3e” ， ”3f " • "3g" ， "3a" , 3b” ， "4c" ， "4 
d" , "4e" , "4f" , ，， 4g'., "4a", "4b" , "5c" , "5d" , _ ， 5e.., "5f " , M 5g" , "5a” ， "5b"," 
6c" ， "2b" ， "3c + ","3d+","3e+" ， "3f+” ， ” 3g + " ， "3a+",”3b+",”4c+” ， "4d+" ， " 
4e+" , "4e + ", "4f+" ， . ， 4g + ” ， ，， 4a+" , "4b+" ， "5c+_ ，， "5d+" , ,, 5e + " , "5f+"} 

40 str e$[4] 

50 str aS?"* 

60 ca$(42)="5g+" :ca$(43) = ,, 5a+ , ' :ca$(44) = ,, 5b+" :ca$(45) = M 6c+" 

70 for i =l to 6 : m_alloc(i,2000) : next 
80 for i=l to 6:ra_aa9ign(i,i) : next 
90 a$=inkey$(0) 

100 if a$ = ,,M then goto 90 
110 f=instr(1,ba$,a$)-1 
120 if f =-1 then goto 90 
130 e$ = ,, o ,, +ca$(f) 

140 m_init() 

150 m こ trk<l,"Sl"+e$> 

160 m_play() 

170 goto 90 


c マニュアルの 51 ページ（初代機種の場合 
は116ページ）に載っていること請け合い 
である。最近，小さなキーボードがもうい 
やっていうほどいろいろ出ているけど，音 
色を変えて演奏するだけなら X 68000 で十 
分ってわけだ。 

そうそう，もうひとつ忘れていた。90行 
の inkey 関数に引数0が与えられているが, 
マニュアルには 載っていない。これは，ど 
のキーも押さないでいると押されるまで待 
たずに次へ進むものだ。リアルタイムキー 
入力をするとき必ず使うので覚えておきた 


X - 巳 ASIC の特徴 

ところで，前回は触れなかったが， X - 
BASIC は従来の BASIC とちょっと違うの 
である。これが XI などの BASIC を使って 
いた人が，つい足を止めてしまうひとつの 
原因かもしれない。しかし，リスト1を見 
るとたいして変わらないじゃないかと思う 
人も多いだろう。そう，気にすることはな 
いのである。ただし，一応気をつけること 
はある。たとえば変数の宣言である。これ 
さえやっておけば，どうということはない。 

あと， X - BASIC の特徴を生かしたプロ 
グラムをするなら， goto はできるだけ使 
わないほうがよい。 repeat 〜 until や while 
— endwhile , if 〜 then 〜 else を巧みに使 
い分けるのが重要である。なぜなら，それ 
が構造化プログラミンダってやつだからで 
ある。うっそ 一， 本当は goto などの飛先 
の行番号が renum でリナンバーしたとき 
に変更されないからである。おかげさまで， 
最後のプログラムでは repeat 〜 until を連 
発してしまったのであった。 

いや〜，なんてつたって goto こそがプロ 
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グラムの根本ですよ。皆さんも自分だけの 
ブログラムを作るときは goto をふんだん 
に使っておいしいスパゲッティプログラム 
にしていきませんかあ。だって ， repeat 
〜 until や while 〜 endwhile なんかを使う 
と，頭も使わなくてはならないじゃない。 

1つや2つならいいけど，10組も出てくる 
ともう私の頭は睡眠の準備を始めてしまう 
のだあ。 

しかもである。数値計算の大御所 FOR 
TRAN でも， goto 文はスリリングな命令 
である 0 これを if 〜 then 〜 else や while 〜 e 
ndwhile にすると，どこが終わりなのかわ 
からないような長い分岐の!：きに困るでは 
ないの。 goto のほうがエディット作業も 
楽なのであ一る。 goto 万歳！ 

( 縮だぁ J 

さて，リスト1のあとでなぜ goto を使 
うことを称賛したのか？それは一重にリ 
スト2の言い訳なのである。見よ ， goto 
文が増えて訳がわからなくなってきた。 

いや〜，訳がわからなくてもいいじゃな 
いです力\そりゃ一瞬戸惑いますけどねえ。 
goto 文ならボケーと順番に追いかけるだ 
けで必ず氷解するってもんですよ。 

さて， goto を使うのはもうひとつ巨大 
な理由がある。それは， 

「あとから少しずつ付け加えるプログラム 
に便利だから」 

なのである。最初からプログラムを設計し 
ておいてから作るのではなく，暇にまかせ 
て徐々に機能を加えていくのだ'。そうなった 
b , repeat 〜 until や wnile 〜 endwhue はも 
のすごく不便。これは経験則である。 

しかし，ああ無情にもリスト2のように 
1〇番おきの行番号のなかに177行とか275行 
なんてえのが入ってしまうのである。 

まあ，それでもいいじゃん，という考え 
方もある。人が書いたプログラムが理解で 
きるようになると変な行番号のついている 
ところが密かな楽しみになるのである。 
「フー ム，ここはあとから付け足したな0 
なんでだろう。え一と，そうかこういう勘 
違いをしていたに違いない。ナルホド」 

などと思いを馳せ，あたかもそのプログラ 
マと知り合いになったかのような気持ちに 
なれるのである。あとから行番号をリナン 


パ、一して，その恥部を隠してしまうなんて 
人間が小さいなあ。 

ところで，リスト2には録音の機能が備 
わった。これであなたの奏でる魅惑の旋律 
を地球滅亡のその日まで保存することさえ 
できるのである。さっきまでは，いたずら 
小僧のピアノぶったたきにすぎなかった旋 
律が，再生できることで芸術と化したかも 
しれないのである。その大きな夢を肴に一 
杯やったって，今夜は満足のいく睡眠がと 
れそうではないか。 

そうだ，偉大な芸術家になる方に言って 
おかなければならないことがあった。キー 
ボードの配置は，下段“ Z ” から“/”へ向か 
って ドレミファ ……と上がっていき， ミ ま 
できたら一段飛ばして“ Q ” から右の“[” 
へ向かって ファソラシ ……ときて“ ド” ま 
での3オクターブである。 “ S ” からの段と 
“2” からの段は黒鍵である。慣れればそ 
う難しいことではないが，いやな人は ba 
$を変えれば変更できる。 

•リスト2 


また，判断は英数字の小文字で行うので, 
CAPS キーなどははずしておかねばならな 
い。音は最大100音まで録音でき，それが 
終わるかリターンキーを柙すかすると再生 
する。これらの設定を変えるにはプログラ 
ムをちよいといじるしかない0人のプログ 
ラムをいじって変えるのはもっともよいプ 
ログラム勉強法のひとつである。 

140〜280行が録音する場所。290行以降 
が再生 ルーチン である。リスト1と同様， 
150行，350行を変えれば音色も変わる。配 
列 c $ に入力文字列を，配列 d に キー が押さ 
れたタイミンダを保存しておき，再生部で 
それを参照しながら再生している。190行 
は押した キーを 表示しているところで，な 
くてもよい。370〜400行は音の長さ分だけ 
空回しを行っている。 

このプログラムの欠点のもっとも大きな 
ところは180行である。前に押されたキー 
を続けて押すと音がならないようにしてい 
る。これは X 68000 のキーリピートに対す 


10 dim str c$( 100 ) 

20 dim int d( 100 ) 

30 int j =l:int f=0 

40 str ba$[46]="zxcvbnm,./qwertyuiop@[asdfghjkl; :1234567890-" 

r. 

50 str ca$(46) [3]=( "3c","3d" ， "3e","3f","3g","3a” ， "3b” ， "4c" ， "4 
d" , "4e" ， "4f ” ， "4g M , "4a" , "4b” ， "5c" , "5d ， _ ， ，， 5e" ， "5f " , "5g" , "5a" , "5b" ， " 
6c" , "2b", "3c+" ， "3d+" , "3e + " , "3f + " ， "3g+" ， "3a+” ， ”3b+" ， "4c+" ， ，， 4d+" ， " 
4e+" ， "4e+" ， ”4f+" ， "4g+" , "4a+" ， "4b+" , "5c + " ， "5d+” ， "5e+” ， ,, 5f+"} 

60 str e$[4] 

70 str b$="" 

80 int i=0 
85 int jmax= 100 
90 str a$ =，_" 

100 ca$(42)="5g+" ： ca$(43)="5a+" ： ca$(44)="5b+" : ca$(45)="6c+" 

110 m_init() 

120 for i=l to 6:m_alloc(i,2000) : next 
130 for i=l to 6 : m_a3sign(i,i)：next 
140 /*a$=inkey$ 

150 a$=inkey$(0) 

160 i=i+l 

170 /*if i mod 100 =0 then beep 

175 if a$ = ”，. then goto140 

177 if a$=chr$(13) then jmax=j : goto 290 

180 if a$=b$ then goto140 

190 print a$; 

200 c$(j)=a$ : d(j)=i:b$=a$ 

210 f=instr(1 f ba$,a$)-1 
220 if f =-1 then goto 270 
230 e$="o"+ca$(f) 

240 m_init() 

250 m_trk(l ， "@l"+e$> 

260 m_play() 

270 j=j+l 

275 if j=jmax then goto 290 

280 goto140 

290 for j=l to jraax-1 

300 a$=c$(j) 

310 f=instr(l,ba$,a$)-l 
320 if f =-1 then goto 380 
330 e$="o"+ca$(f) 

340 m_init() 

350 m:trk<l,"«l"+e$) 

360 m_play() 

370 for i=l to d(j+l)-d(j) 

375 /*print d(j+1)-d(j) f d(j+1),d(j) 

380 for k=l to10 
385 /*b$=inkey$(0> 

390 next 
400 next 
410 next 

420 j=l:jmax=100 : goto140 
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る対策である。あるキーを押したままにす 
ると，この180行がなければ，その音が断 
続的に繰り返されてしまう。そこでこの行 
が付け加えられたものである。そのため， 
同じ音が2回続いたとき，2個目が無視さ 
れてしまうのであった。この欠点は今回の 
プログラムでいちばん悩んだところである< 
いずれにしても，巷で売られているメロ 
ディ記憶機能付き電子キーボードの機能は 
この程度であるから，いかに X 68000 が素 
晴らしいかわかってこようというものであ 
る。メモリの量だってこっちのほうが断然 
多いし，欠点といえば，持ち運びにはち 
•リスト3 


ょっと大きすぎるということくらいで'ある。 

さて，こうなって〈るとなんとなくさら 
にその上を目指したくなってくる。しかし， 
慌ててはいけない。ここでじっくり一晚休 
むのがコッである。“急いては事を為損じ 
る”というやつで，次への秘策をよく考え 
たほうがよい。なんでも一気にやってしま 
おうとするとどこかで無理がくるのである。 
だからこその暇プロなのだ。ちょっとずつ 
作って大きくしていく雪ダルマ方式がよい0 
コッコ ッ増やしていく精神はいかにも日本 
的ではない力、そしてまた，ちょっとずつ 
増やしていくためにこそ goto 文があるの 


である（くどいかな）。 

I 多声部への発展 I 

さあ，一晩じっくり寝て次なる目標が決 
まったぞ。複数の音を重ねて鳴らせるよう 
にしてくというのである。まあ， X 68000 
の FM 音源は放っておいても8音までは自 
由に使わせてくれるのだからあまりに当然 
の展開である。 

ところがそこに大きな落とし穴があった。 
その第1番目は，和音を出そうとしても， 
「同時に2つ以上のキーを読むということ 
ができない」 

ということであった。ああ，ここにきてつ 
いに巷のキーボードに負け一てくやしい花 
いちもんめである。 

そこでしかたがないから，各声部ごとに 
メロディを記憶して，あとで一度に鳴らす 
ということにしよう。これはこれで結構使 
えそうである。楽譜を見て1パートごとに 
入力していけば，自然と全体像が見えてき 
てしまうというわけ。よ一し，これに決め 
た。 

第1番目の問題点と書いたが，それでは 
第2番目はなにか？それは作っている最 
中に気づいてしまった究極の難問だった。 

とにかくリスト3を見てもらおう。いま 
までとだいたい同じなのだが，8声まで記 
憶できるように配列 c $ や d が2次元の配列 
に拡張されている。130行では入力する準 
備として FM 音源のチヤンネル No を入力 
させ，1という整数変数に記憶している。こ 
れを用いて132〜295行でリスト2とまった 
〈同様に記憶を行うのである。2次元配列 
は，このように同じようなデータの列を複 
数記憶するのに便利である。参照の仕方さ 
え間違えなければ非常に使えるデータのか 
たちである。 

さて，130行でチヤンネル No の代わりに 
0を入力すると300行へ飛ぶ。ここから420 
行までが，8つまでの音を同時に鳴らすル 
ーチンなのだが，ここにきてハタと困って 
しまったのである。それは， 

「全音同じタイミングで鳴らせる力す，それ 
ぞれ別々のリズムで鳴らすことができな 

い」 

のである。厳密にいうとできないことは 
ない力 ? ，処理が複雑になるのでスピードが 


¥ 


10 dim str c$( 100 f 8 ) 

20 dim int d( 100 t 8) 

30 int j=l,f=0,i=0,io=0,k=0,jmax= 100 ,1=1 

40 str ba$[47]= H zxcvbnra,./qwertyuiop®[asdfghjkl; ： 1234567890- 


50 str ca$ ( 47 > [ 3 ] = {" 3c " , " 3d" ， " 3e" ， " 3f ”，" 3g" 3a" ， " 3b" ， " 4c" ， " 
d" ， "4e","4f" ， ”4g","4a","4b","5c","5d","5e","5f"•"5g" f "5a","5b", 
6c" , "2b","3c + " , "3d+" , "3e+" • "3f+" , "3g + n t "3a+" , "3b+" , "4c+" , "4d+” ， 
4e+" ， Me." ， "4f+" , "4g + ，， ， ，， 4a+" ， "4b+” ， "5c + " ， "5d+" ， "5e+" ， "5f+" } 

60 str cb$(47) [3] = { M h* •• ，， • レ " ，， • ミ " ， " フ t" ， " ソ •. ， " ラ " ，，，シ • ，，， • 卜 -" ， •• レ"， 

， " ファ " ， " ソ "’" ラ " ， •• シ " ， " 卜 •” ，， . レ " ， " ミ "," ファ， ， ， "V"," ラ " ， " シ " ， " ド "," シ " ， •• 卜 *# 
レ #"," フ T" ， " ファ#"，•，ソ ," ラ # ，，，， • 卜 •" ， " ド #" ， " レ #" ，，，ファ ", "77", ， • ファ #._," ソ #，_ 

# " ， " 卜 • ，，，， . 卜 • 拿"，"レ # "，•，フ 了 " ， " ファ#"，"ソ # "," ラ #" ，， . 卜卜 .#" 

70 str cc$(46) [3] = { H h* " ， " レ • ，， " ミ " ， " ファ " ， " ソ " ， " ラ " ， " シ " ， " 卜 -• ，， " レ ，，, 

,"フデ， • "ソ"，"ラ , ，,"シ"，"卜 * •，，"レ，，，"ミ","ファ","ソ”，"ラ"，"シ"，••卜-"，"シ”， " l / b " 
b ，， ，，，フ了， ， ，"ソ b " ,"ラ b ” ，.，シ b " ，•，卜 • •，, " l / b " , "5 b ", ，•ファ"， "77 " ,"ソ b " ，"ラ b .， ，"シ b 
卜 • ,"レピ， ， "ミ b " ，"ファ", " vb " ,"ラ b " ,"シ b " , 卜•”,"レ b " ， •• • " } 

80 str e$(8)[4] t b$="",a$="" 

100 ca$(42) = "5g + " ： ca$(43) = "5a+ , ' ： ca$(44)="5b+" ： ca$(45) = ,, 6c+" 
$(46)= ,, 5r" 

110 m_init() 

120 for i=l to 8 : m_alloc(i,2000) : next 

125 for i=l to 8 ： m_assign(i,i)：next 

128 repeat 

129 repeat 

130 input "channel no.";1 

131 until(1>=0 and 1<=8) 

132 if 1O0 then { 

133 repeat 

134 io=0 

135 repeat 

136 io=i 

140 repeat 

150 a$=inkey$(0) 

160 i=i+l 

175 until a$<>"" 

178 until a$<>b$ or (i-io>14 and i-io<90) or (i-io> 110) 

185 if a$=chr$(13) then jmax=j else 


c$(j,1)=a$:d( j,1)=i:b$=a$ : print "."; 
m_init() 
for k=l to 8 

f=in8tr(1 , ba$,c$(j,k))-1 
if f<>-l then { 

e$(k)= M o M +ca$(f) 
m_trk(k,e$(k)) 

} 

next 
m_play() 

j = j + l 

zjmax 


200 

207 

208 
210 
220 
230 

250 

251 
255 
260 

270 

271 

285 until j 

286 } 

290 j=l ： i=0 
295 until1=0 

300 print : print "Now repeat!" 

302 for j=l to jmax-1 

305 a$=c$(j 1 1) 

306 m_init() 

308 for k=l to 8 

310 f=inatr(1,ba$ic$(j,k))- 

320 if f =-1 then goto 380 

330 e$(k) = ,, o M +ca$(f) 

350 m_trk(k,e$(k)) 

355 next 

360 m_play() 

370 for i=l to d(j+l,l)-d(j,l) 

380 for k=l to10 

390 next 

400 next 

410 next 

420 j=l ： i=0:goto128 
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遅くなってしまったり，逆に同時に鳴らし 
たいところで微妙にズレていってしまうの 
である。 

しかし，それがわかったところでやめて 
しまってはいけない。とにかくやって いる 
うちにアイデアが湧くだろうというのが暇 
プロの精神である。まずは，作ってしまっ 
てそれから考えるのである。それがリスト 
3なのである。 

入力するときも他パートの音が聞きたい 
ので208〜255行が挿入してある。この方式 
だと，入力するパートのリズムで他声部も 
鳴ってしまう。そして130行で0を入力し 
たときはチヤンネル1のリズムで全パート 
が鳴ってしまう。だから全パートが同じリ 
ズムの曲なら問題ないが，ズレがある曲で 
は各声部にダミーの音を入れてやらなけれ 
ばならない。ちなみに休符はスペースキー 
なのでそれを使ってもいいし，もっとも細 
かく動〈パートに合わせて入力してもよい。 

本当はこのプログラムも真面目に改造し 
ていけばかなりいい線までいくはずで，ズ 
レるリズムを鳴らしたり，同時の音をむり 
やり合わせたりすることも，各パートの音 
を見て変更してやればできるはずである。 
しかし，それはあまりにも泥臭い作業なの 
で，もっといい方法を探すためにまた一晚 
じつくり眠るのである。そして，学校へ行 
籲 1 J スト4 


〈人は学校で，会社に行く人は会社で，さ 
らに案を練ってから次の作業に入る。この 
余裕こそが明日のエネルギー源となるので 
ある。とにかく BASIC と長く付き合って 
いくには，こういった精神でいきたい。 

I 深入りしすぎた ^ 

暇プログラミングをやっていると，生ま 
れつきの性分でいつのまにか熱くなり暇が 

でなくなることがしばしばある。今回は 
仕事を忘れ少々深入りしすぎたというのが 
リスト4である。 

なにせ， goto 万歳などといっておきな 
がら関数 func 〜 endfunc を2つも作ってし 
まい，しかも何も値を渡さないサブルーチ 
ンとして使っているのだから大笑いである。 
そのうえ，コメントまでついた日にはイ可を 
かいわんやである。個人のプログラムには 
できるだけコメントをなくしたい （？） もの 
なのに，わざわざ枠で囲ってコメントを書 
いているとは……。やはり速いプリンタを 
持っていない弱みであろう力 1 。 

関数のひとつはメニュー表示の menu で 
ある。これは “ i 叩 ut command ” で入力 
する文字により何が選ばれるかを表示する。 

1〜8:番号で指定したチヤンネルにメ 
ロデイを入力。 


C :入力されたものを MML に変換。 
P : MML を演奏する。なかでチヤ 
ンネルの選択が行える。0なら 
全チヤンネルを演奏 0 

M :入カモードを変える。最初は上 
書きモードだが，一度 M を入力 
すると最後にメ ロディを付け加 
える。 

S :データのセーブ 。 MML でのセ 
ーブと生データのセーブを選ぶ。 
生データならあとでメ ロディを 
付け足せる。 

L :データの ロード。 

K :キーボード配置の表示。 

ホ 

ああ，手当たりしだいにコマンドを付け 
加えたので，コマンドごとに IF 文を作っ 
てしまうという，なんとも単純なプロダラ 
ムになってしまった。しかも結構長い。そ 
の代わり，この先もう少し改造していけば 
楽しみなツールができた。3月号に掲載さ 
れた 「 OPM フアイル -^ MUSIC PRO -68 
K のスコアファイル」などを利用したら楽 
譜の作成もあの面倒な入力作業から開放さ 
れるというものである。 

千里の道も一歩から。慌てず騒がずじっ 
くりと。これが暇プロである。これがアマ 
グラマである。 


10 / 本本拿《本本 * 拿本本拿拿本家本拿本本本拿本本本拿本本拿*本拿本本 

20 /* program for creating MML 本 

30 /* 1990.8 .22 by k.shimizu * 

40 / 本本本拿 * 本本本拿 * 本本本本本本拿本本本本本本本拿 * 拿本！:本寒本 

50 / 本本本拿本本本零本本韋本本本本本 * 本本本*本本本本本本本本本 
60 1 % data initializing 拿 

70 /* 本本 * 本 * 本拿本 * 本 * 拿 ♦ 本本*本本本本本本本家本本本本本 

80 dim atr c$( 100,8 }[ 4 】 ， m$( 100 ， 8 >[ 50 ] , mwork$[ 50 】， mwk$[ 50 ] 

90 dim int d( 100 ,8),jmax(8),jj(8),ipart(8),e( 100 ,8) 

100 int j=l,f=0,i=0,k=0,l=l,iold=0,iinax= ： 0,11=100,ih=4,r,r0, 
rl , irflag=0 , lm=16,dum=0,imode,npart=8 
110 atr ba$[47]= 

"zxcvbnm, . /qwertyuiope[asdfghjkl ； : 1234567890 ノ ¥ " 

120 str ca)<48> 【 4】= {"","3c","3d","3e" ， "3f"•"3g","3a", ，， 3b" ， "4c" 
,"4d_., "4e" ， "4f" • "4g" ， ”4a" ， "4b" ， "5c" ， "5d" , "5e" ， "5f ” ， "5g" ， "5a" ， "5b 
","6c" • "2b" ， "3c+" ， "3d+" , "3e+" ， "3f+" • "3g+" ， "3a+" ， "3b+" , ”4c+" ， ，， 4d+ 
"• " 4e+ " ， "4e+ 4 f + _. ， •_ 4g+ , "4a+ " , " 4b+" • " 5c + " , " 5d+" , " 5e+ M ) 

130 str cb$(47)t3] = {" ,, , ,, h* M , "レ"，"ミ"，"フ t" , ，•ソ••，"ラ，，，"シ"，"卜•”，，•レ"， 

" ミ "•" ファ " ， " ソ " ， " ラ " ， " シ " ， " 卜 . "• " レ " ， " ミ "," フ 7 " ， • ，ソ " ， " ラ "," シ ", ，，卜 . ， •," シ .. ，，，卜 ，# 
", " レ参 "," ファ "," ファ #" ， " ソ #• ，， " ラ #"," 卜， " ， " 卜 * # ，，， " レ #" ， • ，ファ "," ファ "," フ T# ， ' ， " ソ #" 
，，，ラ参 "•" 卜 •" ， " 卜 • 孝 " ， " レ #" ， " フ T " ， " ファ #. 1 ," ソ # ，，， " ラ #"，.. r •• ， " 卜 .#"," •，， j 

140 atr cc$(47>[3 】 = {""， ■， 卜， "，•，レ"，••ミ"，"フ T” ，"ソ"，"ラ"，"シ"， ，•卜 • ，•，••レ"， 

， • ミ " ， •• ファ " ， • ，ソ •• ， " う， • ， •• レ "," 卜，， •," レ . ，，， • ミ， .,• ，ファ " ，， • ソ " ， " ラ " ，， • シ "， "r " レ b" 

，•，ミ b" • .•フ t " ,.，ソ b " ,"ラ b" ，， • シ b" ， " 卜，•，,"レ V ，,"ミ b " ,"フ t" ," ファ，，，•，ソ b" • .，ラ b " ，，.シ b 
• ，， •• ド " ， " レ b" ," ミ b" ," ファ " ， " ソ b" , • ，ラ b" ," シ b • ， • ， • 卜， " ，， • レ b" 

150 ca$<42>="5f+":ca$<43>="5g+":ca$<44>="5a+": 

ca$(45)="5b+" ： ca$(46)="6c+" ： ca$(47)= M 5r H 
160 atr e$(8)[4],b$=" " ,a$="",cl$=" " ,cm$=" " ,fil$,part $ ,dum$,mod 
e)(2 )[ 10]= { "over write","merge" } ,crcl 
170 crcl=chr$( 13)-fchr$(10) 

180 for i=l to 47 : ca$(i)="o"+ca$(i):next 

190 /*> 本本拿拿本韋本拿本 * 拿拿 ** «* 拿 * 家拿拿 * 本本 : t 本拿拿拿拿 

200 /* initialize FM * 

210 / 拿拿本拿 * 本本拿本拿拿本本本本本拿 * 本零本韋拿本拿拿拿本本*本本 

220 m_init( ) 

230 for i=l to 8 ： m_alloc(i,2000) : next 
240 for i=1 to 8 ： m_assign(i , i ) : next 
250 for i =l to 8 ： jinax ( i ) =0 ：next 

260 / 本本 * 拿拿 * 本拿 * 拿拿本本 ** 拿拿拿本本本本本零拿拿 * 木拿！:*拿 

270 /* main loop (ended by " e ") 拿 

280 /*«* 拿拿 * 拿拿拿： 》 本拿拿 * 拿拿拿本本拿 * 拿拿 * 拿拿拿！ : 拿 * 

290 repeat 


300 menu ㈠ 

310 print : print "*** now in the [" ； mode$(imode)；"] mode" 

320 print "♦拿拿 please start at the 5th beep" : print 

330 input "input command" ； cl$ 

340 cl$=strupr(cl$) 

350 l=asc(cl$)-48 

360 /* 拿本本 * 拿本本拿拿 * 家拿本本本拿寒拿本拿本本：！本本拿本本本拿本 

370 /拿 input sound by keyboard * 

380 / 拿本本本本拿本 * 拿拿本 t 本本本本拿拿本本本本拿本本 * 拿拿拿 *** 

390 if 1>=1 and 1<=8 then { 

400 if imode=l then j=jmax(1)+1 ： i=d(jmax(1),1)-11 

410 repeat 

420 jmax(1)=100 

430 repeat 

440 a$=inkey$(0) 

450 i=i+1 

460 if i mod 11/4=0 then beep 

470 if i=ll+ll/4+ll/lm/2-l and j=l then a$= "” 

480 if a$ = "•’ then for k=l to 200 ：next 

490 until a$<>"" 

500 if a$=chr$(13) then jmax(1)=j:d(j,1)=i else { 

510 d(j,l)=i：print "•"; 

520 m_init() 

530 f=instr(l,ba$,a$) 

540 m_trk(1,ca$(f)) 

550 c$(j,l)=ca$(f) 

560 m_play() 

570 j=j+1 

580 | 

590 until j=jmax(1) 

600 jmax(1)=jmax(l)-l:j=l:i=0 

610 print 

620 ) 

630 / 拿本拿拿拿本本本拿本拿拿拿 ** 拿拿本本本本拿拿本 t 拿本本拿拿 t 本 

640 /* create MML from array d,c$ 本 

650 /* 本拿拿 《 « 本拿 * 拿本 $ 拿本本本：！本本本拿*本本本本袁本本 

660 if cl$ = ,, C M then { 

670 print "now creating MML" 

680 for 1=1 to 8 

690 for j=1 to jmax(l)+l 

700 e( j ,l) = int( (d( j ,1)+H/lm/2 ) *lm/ll) 

710 next 
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720 

730 

740 

750 

760 

770 

780 

790 

800 

810 

820 

830 

840 

850 

860 

870 

880 

890 

900 

910 

920 

930 

940 

950 

960 

970 

980 

990 

1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 

1090 

1100 

1110 

1120 

1130 

1140 

1150 

1160 

1170 

1180 

1190 

1200 

1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 

1300 

1310 

1320 

1330 

1340 

1350 

1360 

1370 

1380 

1390 

1400 

1410 

1420 

1430 

1440 

1450 

1460 

1470 

1480 

1490 

1500 

1510 

1520 

1530 

1540 

1550 

1560 

1570 

1580 

1590 

1600 

1610 

1620 

1630 

1640 

1650 

1660 

1670 

1680 

1690 

1700 

1710 

1720 

1730 


next 


for 1=1 to 8 
for j=l to jmax(1) 
r=e{j+l,l)-e(j ( l) 
mwork$=" n 
rl=r/(4*4) 
r=r -rl 拿 4 本 4 

if r=0 and rl>=l then r=16 : rl=rl-l 
irflag=0 ： mwk$=c$(j,1) 

if instr(l,c$( j.D/'r" )00 then c$( j,l) = " " ： irflag=l 
if r=1 then m$(j,1)="116"+c$(j,1) 
if r= 2 then ra$(j,1)="18" +c$(j,l) 
if r= 3 then m$(j,1)="18 M +c$(j,1)" 
if r= 4 then m$(j,1) ="14 "+c$(j,1) 
if r= 5 then m$(j,1)="14"+c$(j,1)+"&116"+c$(j,1) 
if r= 6 then m$(j,1) ="14 M +c$(j,1)+"•" 
if r= 7 then m$( j ,1)= ，， 14 ,, +c$ ( j ,1)+ " • •" 
if r= 8 then m$(j,1)= M 12 M +c$(j,1) 
if r= 9 then m$( j ,1)= ，， 12"+c$ ( j ,1) + "41 16 n +c$ ( j ,1) 
if r=10 then m$( j ,1)= ,, 12"4c$ ( j ,1)+ ,, 4l8 ,, -+c$ ( j ,1) 
if r=ll then m$(j,1)= H 12 n +c$(j,1)+ M &18 M +c${j,1)+ "•" 
if r=12 then m$U ， 1 > = "12"+c ，（ j ， 1)+ ".，. 
if r=13 then m$( j ,1)= H 12 ,, +c$ ( j ,1)+" • 116"+c$ (j ,1) 
if r=14 then m$( j ,1) ="12'*+ 〇 $ ( j ,1)+ H .418"+c$ ( j ,1) 
if r=15 then m$( j ,1)= ,, 12 M +o$( j ,1)+ " .418 M +c$(j f 1). 
if r=16 then m$( j ,1)="H"+c$ ( j ,1) 
mwork$="ll"+c$(j,1) 
if r<>0 then mwork$=mwork$+"t" 


c$(j,l)=mwk$ 

for k=l to rl ： m$(j,1)=mwork$+m$(j,1)：next 
mwork$=" M 
for i=l to 20 

if irflag=l then { 

if mid$(m$(j f 1),i,1)= M 1" then mwork$=mwork$ + "r" 
if mid$<m$( j ， l> ,i,1)<>T then 

mworkS^mworkS+midl(m$(j,1) t i t 1) 

} 

next 

if irflag=l then m$(j,1)=mwork$ 

next 

next 



if 


cl$ = ,, P" then ( 

input "input part number(0 for all part)" ； part$ 
npart=0 : for i=l to 8:ipart<i>=0:next 
for i=l to 8 

if (in8tr(1,part$ t itoa(i)) <>0 or 

instr(l > part$ l "0") <>0 ) then { 
npart=npart+l 
ipart(npart)=i 

) 

next 


print "now playing !" 
m_init() 
for 1=1 to 8 

for j=l to jmax(ipart(1)) 
m_trk(1,m$(j,ipart(1))) 


next 
next 
m_play() 
j=l ： i=0 ： l=0 


ft mode change 



if cl$="M" then { 

print "mode was changed ! 
imode=l-imode 



if cl$= M S" then { 

input "choose m：MML or e：EDIT DATA" ； cm$ 
input "input file name" ； fil$ 

input "input part number(0 for all part)" ； part$ 
npart=0 : for i=1 to 8 ： ipart(i)=0:next 
for i=l to 8 


if (instr(1,part$, itoa( i ))00 or 

inatr(1,part$,"0") <>0 ) then { _ 

npart=npart+1 
ipart(npart)=i 

} 

next 

cm$=left$(8trupr(cm$),1) 
ifil=fopen(fil$,"c") 
fwritea(cm$+crcl,ifil) 
fwriteB(itoa(npart)+crcl,ifil) 
for i=1 to npart 

fwritea(itoa(ipart(i))+crcl,ifil) 
fwritea(itoa(jmax(ipart(i)))+crol,ifil) 
for j=l to jmax(ipart(i))+1 
if cm$="M" then 

fwrites(m$(j,ipart{iH +orcl,ifil) 
if cm$="E" then 

fwritea(c$(j,ipart(i))+crcl,ifil) 
if cm$="E" then 

fwrites(itoa(d(j , ipart(i)))+crcl,ifil) 

next 


next 

fclose(ifil) 

if cm$="M" then print "MML is saved in " ； fi1$ 
if cm$="E" then print "EDIT DATA ia saved in ";fil$ 
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load data 

拿拿拿本拿拿本拿拿本拿 

if cl$="L" then { 

input "input file name" ； fil$ 
ifil=fopen(fil$,"r") 
freads(cm$,ifil) 
cm$=atrupr(cm$) 
freads(dum$,ifil) 
npart=atoi(dum)) 
for i=1 to npart 

freads(dum$,ifil) 
ipart(i)=atoi(dum$) 
freads(dum$,ifil) 
jroax<ipart(i))=atoi{dum$) 
for j=l to jmax(ipart(i))+1 

if cm$ = "M" then freads(dum$ f ifil) 
if cm$="M" then m$(j,ipart(i))=dum$ 
if cm$="E" then freada(dum$,ifil) 
if cm$="E" then c$(j,ipart(i))=dum$ 
if cm$="E" then freads(dum$,ifil) 
if cm$="E" then d<j ， ipart(i|}=atoi<dum$) 
next 
next 

fcloae(ifil) 

if cm$ = ，， M" then print "MML is loaded from ” ； fil$ 
if cm$="E" then print "EDIT DATA is loaded from 
； fil$ 

) 

/* 本拿 * 拿 * 本拿 * 本本拿本本本拿拿拿本拿本本本拿本本*本本本拿本 

/拿 display keyboard 本 

/ 拿本 * 本本本 * ： * 本本拿拿本本 ** 本本 * 本本本本 ** 本拿本拿專*拿 

if cl$="K" then { 
keyboard() 

J 

until cl$="E" 
end 

/ 拿拿本本拿本本《农拿本本本本本拿拿本本拿拿本拿本本拿拿 《 拿;！本拿 

/家 function menu is only for 本 
ft drawing main menu * 


func menu() 
print 
print "拿 
print "拿 
print "拿 
print "* 
print "拿 
print 
print •’窣 
print 
print 
return() 
endfunc 


1-8 : sound input 
c：create MML 
p：play MML 
m : mode change 
8 : save data 
1 : load data 
k : show keyboard 
e : end the system 


/* function keyboard is for 
/* drawing key position 


func keyboard() 
print 

print " 拿ファファ参ソ參ラ # 卜 • ！ ••♦ レ # ファフ t# V# ラ # 卜 ，# 

print ， • 拿 1234567890 

print 

print "拿 rr ソラシ！レ 2 ファソラ シト • 
print "*qwertyuiop@I 
print •’* 

シド # レ # ファフ t# ソ # ラ # 卜 * ド # レ参 7T 
aBdfghjkl ；: 


print 
print 
print "* 

print "本 I ••レ ミフ t ソ 

print " t z x c v b 
print 
return< > 
endfunc 

拿拿拿拿拿 

/拿 the end of the program 拿 

/t <lines below are for debug ) 本 

/» 本拿本本*本尊本拿拿本本拿拿本拿拿拿本本拿*拿本本拿拿本本 》 本 

for i=l to jmax(1) 

print d(i+l,l)-d(i,l) ； c$(i,l)；" 
next 
end 

str dum$,fil$ 

input "input file name " ； fil$ 

ifil = fopen(fil$, ,, r M ) 

repeat 

nfil=freads(dum$,ifil) 
print nfil,"•";dum 拿 ；"，" 
until1=0 




[注意点] 

• BEEP 音が拍子の目安になります。 

• BEEP 音丨回が 4 分音符にあたります。 

• BEEP 音 I 回につき4音まで入力できます。 

• リズムの解像度は16分音符。 

• 5回目の BEEP 音が曲の始めです。4回見送ってください。ここで 
入力がないと休符が入ります（メロディを付け足すときも同じ）。 

• 音を鳴らしたらすぐにキーを離してください。押し続けているとお 
かしくなります。音符は次の音が鳴るまで続きます（音色によって減 
袞する）。休符はスペースキーを押してください。 

• 曲の終わりはリターンキーを押してください。 


128 Oh!X 1990.10. 





ASK 68 K 用辞書管理ユーテ^リティ《後編》 

辞書整備応用編 


辞書用ユーティリティ第2弾。今回は VJE ， 松茸， E 1 などか 
ら単語を持ってきて ASK 68 K の辞書を強化する，というもので 
す0そのほか，大規模テキストデータ用のツールを発表します。 
なお，前回のプログラムが必要ですので注意してください。 


Murata 1 oshiyuki 

村田敏幸 


X 68000 と MS - DOS マシンの両方を持っ 
ている読者がどれだけいるかは疑問だが， 
もしも，あなたがその幸運な人（今日だけ 
はそういうことにしておこう）のひとりで， 
かつ，日本言吾 FEP として VJE -0 か松茸 V 2 を 
使っているのであれば，今回のプログラム 
はかなりおいしい。 MS - DOS マシンなんか 
とは縁がな〈とも，最初の X 68000 用市販ワ 
ープロ EW を買うには買ったがいつのまに 
か WP . X に舞い戻ってしまったという過去 
を背負った人にとってもちよっとだけおい 
しい。 

ASK 68 K の辞書メンテナンス ツール お 
裾分け大会の第2弾は，上記3種のワープ 
口/日本語 FEP の辞書を ASK 68 K に吸い上 
げる “ CONVDIC . X ”， 単語ファイルを 
ASK 68 K の内部コード順にソートする 
“ MSORT . X ”， 複数の辞書を切り替える常 
駐プログ ラム “ CHDIC . R ” の3本立てだ。 
辞書のコンバートについてはもう少しサポ 
一卜範囲を広げるつもりはあったのだが， 
つもりで終わってしまった。 DFJ や FIXER 
や Katana や EG-Bridge や WXR ( WXP ) 
の ユーザーには 申しわけないと思っている。 

VJE ， 松茸， E 1 のユーザーも手放しでは 
喜べないかもしれない。辞書 コンバートに 
は多少の手間と時間が必要だ。辞書ファイ 
ルを直接 ASK 68 K 用に変換するのではな 
〈，まず，各日本語 FEP の辞書ファイルの 
内容を専用の辞書管理ツール（各日本語 
FEP についてくるもの）を利用してテキス 
卜に落としておき，それを GENDIC . X で読 
み込める形式に変換して（これが CONV 
DIC . X の仕事)， GENDIC . X で ASK 68 K の 
辞書ファイルとして構成しなおす，という 
段階を踏むようになっている。すでにある 
プログラムは最大限に利用しようという正 
しい手抜きの精神だったりする。 

今回のプログラム 

辞書コンバートの具体的な手順はあとで 
示すとして，先に各プログラムの紹介をす 


ませておく。 

•CONVDIC.X 

使用法 ： CON VDIC [スイッチ][入カファ 

イ ル] [[/〇]出カフ アイノレ] 

各日本語 FEP 専用の辞書管理ツールが 
出力した単語ファイルを DUMPDIC . X の 
出力形式 （= GENDIC . X や DELWORD.X 
の入カファイルの形式）に変換する0 
CONVDIC . X 実行時には，元となった辞書 
の種類に応じて， VJE からのコンバートの 
場合は/ B ， 松茸からの場合は/ M ， E 1 からの 
場合は / E のスイッチをつける。 

CONVDIC /B VJEB.OUT VJEB . 
ASK 

CONVDIC /M MATU.OUT 
MATU.ASK 

CONVDIC /E El.OUT El.ASK 
同じノリで DICM . X の単語一覧形式から 
DUMPDIC . X 形式への変換もできるよう 
にしてある。このときは / A スイッチを使 
ラ。 

CONVDIC /A ASK.OUT ASK.ASK 

あといくつかのオプシヨンがある力す，そ 
れらについてはソースか， 

CONVDIC /? 

によって表示されるヘルプメッ セージを 参 
照してもらいたい。 

•MSO 闩 T.X 

使用法 ： MSORT [スイッチ][入カファイ 

ノレ [.]] [/〇出カフ ァイノレ] 

単語ファイルを ASK 68 K の内部コード 
順でソートするフイルタ c というよりは， 
そういう付加峰能がついた汎用のテキスト 
ソートフイルタといったほうがよいかもし 
れない。 Human 68 k の SORT . X の機能はほ 
ぼ包含している。辞書とは関係なく， 
SORT . X の代わりにも使ってもらえるだろ 
ラ。 

MSORT . X は単に， 

MSORT 

で起動すると標準入力からの入力をソート 


して標準出力に書き出す。 

MSORT FILE 

のようにファイル名を指定すれば，入力が 
そちらに切り替わる。ファイル名は，複数 
並べてもよいし，ワイルドカードを使って 
指定してもよい。 

MSORT FILE 1 FILE 2 FILE 3 
MSORT *.DAT 

ソート結果をファイルに残したいときに 
は，出力をリダイレクトする力％/0スイッ 
チで出カファイル名を指定する0 
MSORT FILE > OUTPUT 
MSORT FILE /OOUTPUT 

MSORT . X は入カフアイルが巨大でメモ 
リに片又まりきらないときには途中経過を一 
時的な作業用ファイルに書き出し，あとで 
マージする。ファイルがメモリに収まらな 
いと止まってしまう SORT . X に比べればず 
つ と頑丈だ。 

特に指定しないと MSORT . X は5000行単 
位でソートを実行する。メモリにゆとりが 
あるときには / L スイッチで処理する行数 
を大きくしてぉくと若千実行速度の向上が 
期侍できる（一時ファイルを作らずにすま 
せられれば最高速)〇—時フアイルを作成す 
るドライブ（環境変数 temp で指定する）に 
はフロッピーディスタよりもハードデイス 
ク，ハードデイスタよりも RAM デイスク 
を割り当てたほうが望ましいのはいうまで 
もない。力 5 '，一時ファイルを作成するドラ 
イブの空き容量でソートできるファイルの 
最大サイズが決まるということを付け加え 
てぉく。 

実行速度といえば，一時ファイルの入出 
力を行うというハンデがあるにもかかわらず, 
多くの場合 MSORT . X は SORT . X よりも高 
速に動作する0ソートするファイルが大き 
くなるほどその差は広がり， MSORT . X は 
2 M バイト強のファイルを30分かからずに 
ソートする （ GCC でコンパイルし，一時フ 
アイルは ハードディスク 上に作成した）が, 
SORT . X は 1 M バ仆弱のファイルのソートに一 
晚かかる c MSORT . X はなんの工夫もなく 
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クイックソートしているだけなのだが， 
SORT . X はそれに輪をかけて工夫が足りな 
いらしい。 

MSOR 丁 .X にはい く つかの スイッチがあ 
る。辞書に関係あるのが / D スイッチだ〇 /D 
を指定すると入カファイルを単語ファイル 
とみなし，“読み’’のみを比較対象として 
ASK 68 K の内部コード順にソートする。先 
月も触れたように GENDIC . X は入力とな 
る単語ファイルがすでに ASK 68 K の辞書 
内部での順番になっているものと仮定して 
処理を行うから， DUMPDIC . X や DICM.X 
の出力以外のものを GENDIC . X に与える 
ときには，あら かじ め MSORT . XlT / D スイ 
ッチをつけてソートしておくことが望まし 

い0 

残るスイッチについても簡単に触れてお 
く。/ U をつけると同一の行が複数続くとき 
に1行だけを残すようになる。/ M はソート 
をせずに複数ファイ ルの マージだけを行う 
ことを指定する。入カファイルがソート済 
みであれば，マージされて出てきたファイ 
ルも正しくソートされている0入カフアイ 
ルがソートされていないときは，たぶん意 
味のない結果が得られる。あと，/ I ，/ K，/R 
は SORT . X と同じ意味を持つ。 Human 68 k 
の マニュアルを 参照のこと。 

•CHDIC.R 

使用法： CHDIC 辞書ファイル [ …… ] 
複数の辞書ファイルを切り替えて使うた 
めの常駐プログラムだ。辞書のコンバート 
とは直接の関係はない。一度実行するとメ 


どうもライター間の意志の疎通がうまくいっ 
ていなかったようで,先月の中野氏の記事中で以 
前本誌に掲載されたままの ASK 68 K の辞書解析結 
果が掲載されていた。そこで，ここではあの図表 
に対する補足ということで話を進めさせてもら 
う。以下の文中では図の番号は先月号54ページのも 
ので，用語もあそこにあるものを使う。とりあえ 
ず9月号を手元に用意してほしい c 

まず， ASK 68 K の辞書ファイルの大雑把な構造 
だ。図 I ではオフセット IE 00 H 〜 IFFF H がフラグ 
$頁域かもしれないというコメントがあるが，フラ 
グ領域はたぶん IF 00 H 〜丨 FFF H だと思われる。そ 
の計算でいくと，インデックス領域は992ブロッ 
ク分となり，これが ASK 68 K の辞書ファイルの最 
大の大きさとなる。 

フラグ令頁域は丨バイトが見出し語コード（図 
3) のひとつに対応し，そのコードから始まる単 
語が辞書ファイル中に存在すれば 0 I H , なければ 
00 H になる。たとえば，“ダ”で始まる単語が存在 
すればオフセット IFC 0 H が 0 I H になる。ところで， 
00 H ~ IF H で始まる単語は辞書中には存在しない 
はずだから，フラグ領域は IF 20 H 以降と考えるベ 


モリ上に居座り，以後， XF 5 を押すたびに 
メイン辞書を切り替える。もちろん， 
ASK 68 K 上では F 8 キーを押してから辞書 
ファィル名を入力すれば辞書を変更できる 
わけだが， CHDIC . R はその手間を省くこと 
だけを目的としたプログラムなのだ。しか 
も，インチキをしているので， WP . X 上では 
使用できない。ま，半分ぐらいのところま 
では冗談プログラムだと思ってもらったほ 
うがよいかもしれない。 

辞書ファイルの切り替えには ASK 68 K 
の内部ファンクションを使わずに，いわゆ 
る KEY 0 っぽい処理で逃げている。つまり， 
XF 5 が押されると F 8 + 辞書ファイル名が 
入力されたことにしてシステムをだますわ 
けだ。 

当初は ASK 68 K の 内部 フ ァン クシ ョン 
を使って辞書を切り替えていたのだが，ど 
うも効果が現れない。たぶん，メモリ上にす 
でに読み込んであった前の辞書の一部が残 
っていて，その部分についてはディスクを 
読みにいかないのだと思う。 ASK 68 K 内部 
のワークェリアを書き換えるような汚いこ 
とをすればなんとかなるのだろうが，そっ 
ちの方向は避けたかった。で，苦肉の策が 
KEY 0 もどきだ。 

使用感はそれほど悪くはないが，よくも 
ない。 ASK 68 K が辞書ファイル名変更時の 
キー入力部分にウェイトを入れているらし 
く， XF 5 を押してから辞書が切り替わるま 
でに2〜3秒かかる。また，あくまでキー 
入力をシミュレーションしているだけなの 
で，かな漢字変換途中の文字が残っていた 


ASK68K の辞書構造 


きなのかもしれない（そうすると辞書ファイルの 
最大サイズはもう4ブロック分大きくなる）。が, 
DUMPDIC . X や GENDIC . X ではとりあえず安全のた 
め IF 00 H を境界とみなしている （256 バイトとい 
う区切りのよさに屈服してしまったのだ)。 

ちなみに， DICM . X ではこの境界のチエックをま 
ったくしていないようで,辞書を再編成したりマ 
—ジしたりして辞書が大きくなると平気な顔で 
インテックス領域がフラグ領域以下を浸食して 
辞軎を破壊する（おいおい)。 

フラグ領域中，特にオフセット丨 FFF h は ASK 68 K 
の辞畨ファイルのバージョンを示す。 ASK 68 K 
Ver.l .0 用の辞窨では 00 H , Ver .2.0 用の辞書では 
FF H となる。 Ver .2.0 用の辞書では辞書ファイルの 
末尾に 8 K バイトの意味深なデータが追加されて 
いる。たぶん，変換効率を上げるための補助デー 
夕なのだろう。辞書に単語を登録したり削除した 
りしても内容に変化は見られなかった。で，妙な 
ことに DICM . X で辞書を再編成したり，マージした 
りするとこの部分は消えてなくなってしまう（こ 
らこら）。 

続いて辞書の I ブロックの構造（図 2) だ c ほ 


りすると，辞書ファイル名がそのまま変換 
行に流れ込むといったことも起こる。なか 
なかわがままなプログラムになってしまっ 
た。 

慣例に従い， / R スイッチを つける とすで 
に常駐している CHDIC . R があれば，その常 
駐を解除す る。 ただし，安全のため， 
CHDIC . R がフックしたべクタがさら に 別 
の プログラムによって フックされ ている と 
きには常駐解除できないようになって いる。 
常駐プ ログラムは 常駐させたのと逆の順序 
で解放するのが鉄則だ。 

なお， ASK 68 K Ver .2.0 を使っていて， 
辞書ファイルの変更を F 8 以外のキーに割 
り当てている人には プログラムの 一部を 書 
き換えることで対処してもらう。詳しくは 
プログラムの 入力方法の項で触れる。 

辞書コンバートの実際 

では，辞書コンバートの手順を見ていこ 

5 〇 

•ステップ1 

まず，とにかく各日本語 FEP の辞書をテ 
キストファイルに落とす。 VJE の場合は 
VX . EXE ， 松茸の場合は新松の辞書管理メ 
ニュー， E 1 の場合は EDICM . X を使う。細か 
な手順は次のとおり。 

• VJE -/? の場合 

1) VX . EXE を以下のようにして起動す 
る。 

VX - s — gdisp 辞書ファイル名〉出力 
ファイル名 


とんど図2のとおりだが， DICM . X の動作を見てい 
ると，各ブロックの末尾2バイトは000 0 H でなけ 
ればならないことになっているふしがある。ま 
た，ごく一部の特殊な単語に限り品詞コードが2 
バイトになる場合があるようだ。 ASK 68 K はデバ 
イスドライバ本体の中に辞害ファイルとほとん 
ど同じ形式のデータ（主としてひらがなだけの単 
語）数百語分を抱え込んでいて（こらこら），こ 
れが辞書学習の結果サブ辞書ににじみ出てくる 
らしい。 

最後に，図3の見出し語コードでは 90 H 台に以 
下の8つが割り当てられていることがわかって 
いる 0 

98 H 。（句点） 

99 h 「 

9 A h 」 

9 B h 、（読点） 

9Ch •(中点） 

9D„ 一（長音記号） 

9 E h * (濁点） 

9 F „ * (半濁点） 
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2) 画面には何も表示されないが，構わず 
出力開始位置！:終了位置の“読み”を入力 
する（それぞれ最後にリターンキーを押 
す)。 

3) もう一度リターンキーを押すと処理が 
開始されディスタが回り出す。 

4) ディスクが止まるのを待って，リター 
ンキーを押すと VX . EXE から抜ける。 

5) VX . EXE の出力には前後にゴミが残 
つているのでエディタなどで削る。 


•松茸 V 2の場合 


1) 

新松を起動し，メニュ • 

一から “辞書管 

理” 

を選ぶ。 


2) 

“品詞制限”で全品詞を処理対象にして 

おく 

〇 


3) 

“辞書一覧”を選ぶ。 


4) 

サブメニューの “印刷”で以下のよう 

に設定する。 



印刷 

しない 


頁替え 

しない 


テキストフアイル出力 

する 


区切り文字 

半空 


表1 



convdic.x 

msortx 

convdiac 

〇 


elconv.c 

A 


matuconv.c 

A 


vjeconv.c 



msortc 


〇 

wild.c 


〇 

(parseline.c) 

〇 


(strfunc.c) 

〇 

〇 

(misc.c) 

O 

〇 

(vfprintf.s) 

O 

〇 

(mydef.h) 

O 

〇 

(misc.h) 

〇 

〇 

(strfunc.h) 

〇 

〇 

(myerror.h) 

〇 

〇 

(dictools.h) 

〇 


wild.h 


〇 


図1 CHDIC . R の環境別修正点 


•辞窖ファイルの機能を…… 

1 ) ファンクションキー（単独）に割り当てた場合 
00 OE 6 A — 62 + n (n は Fn の n ) 

2) SHIFT + ファンクションキーに割り当てた場合 
000 C 00 -> 70 

000 E 6 A — 62 + n (n は Fn の n ) 

0010 00 — F 0 

3) CTRL + ファンクションキーに割り当てた場合 
000 C 00 - 71 

000 E 6 A — 62 + n (n は Fn の n ) 

0010 00 - FI 

• いつも使っている変換モードが…… 

1 ) 辞窨先読みなしの一括変換の場合 

0017 02 01 

2) 辞害先読みありの一括変換の場合 
変更の必要なし 

3) 逐次変換の場合 
0017 02 — 03 


5) 出カファイル名，出力範囲，出力品詞 
を指定する 
• E 1 の場合 

1) EDICM . X を起動する。 

2) メニューから“拡張機能”，さらに‘‘単 
語一覧”を選択する。 

3) 出カファイル名，出力範囲，出力品詞 
を指定する。 

いずれの場合でも，辞書の全内容をテキ 
ストに落とすと 2 M バイトを越える巨大な 
ファイルが作成される。フロッピーデイス 
ク上で作業を行うときには読みの範囲や品 
詞別に2回以上に分割して出力する必要が 
ある。この場合ステップ2以下の操作は各 
ファイルごとに行い， ASK 68 K の辞書にし 
た時点で DICM . X でマージすること。 

VJE や松茸の場合は，ファイルを X 68000 
に持ってこなければ話にならないわけだが, 
ご存じのように Human 68 k では MS-DOS 
の標準的な5インチ 2 HD デイスクの読み 
書きができるから，基本的にはガッチヤン 
とイジェクトしたデイスタをジーコ ーと 
X 68000 に揷入すればファイルが転送でき 
る。不幸にして，あなたの MS - DOS マシン 
のデイスタドライブが 3. 5インチだったり， 

5インチでも旧型の 2 DD 専用だったりした 
場合は， RS -232 C クロスケーブルで X 68000 
とつないで転送することになるだろう。 
•ステップ2 

上で作成した単語ファイルは各日本語 
FEP 付属 ツールの 独自形式であり，まだ 
GENDIC . X で ASK 68 K の辞書ファイルに 
変換できるかたちにはなっていない。各行 
のフォーマットは異なるし，品詞名も日本 
語 FEP ごとに微妙に違う。そこで，前述し 
たように変換元の辞書に応じて/ V ， / M，/E 
いずれかのスイッチをつけて CONVDIC.X 
により GENDIC . X が読み込める形式に変 
換する。 

•ステップ 3 

CONVDIC . X を通してもなおクリアでき 
ていない問題がある0単語ファイル内の単 
語の順番だ。 MSORT . X で / D スイッチをつ 
けて単語ファイルをソートするのがべスト 
の解決法となる。ただ，単語の順番が多少 
狂ったままでもあとでなんとかできないこ 
ともないから，ソートを省略するという道 
も残されてはいる（あまり勧められない 
が)。 

•ステップ 4 

ここまでくれば，あとは単語ファイルを 
GENDIC . X にかけるだけだ。警告メッセー 
ジがだいぶ出るはずだ力 5 '，気にすることは 
ない。警告は“二重登録”がほとんどで， 


ときおり“無効な品詞名”が混じる程度だ 
と思う。どちらも CONVDIC . X が品詞名の 
つじつま合わせを行った正しい結果だ。 

CONVDIC . X は ASK 68 K に コンバート 
しても意味のない単語には GENDIC . X の 
処理からはずすためにそれなりの印をつけ， 
それが“無効な品詞名”の警告として現れ 
る。また，品詞の種類によっては1語が異 
なる品詞の2語に展開されることがあり， 

その過程で元々辞書にあった単語とダブれ 
ば“二重登録”になる。 

これら以外にも，特に VJE からコンバー 
卜した場合は VX . EXE が出力した単語フ 
ァイルの中に最初から重複があるため山ほ 
ど“二重登録”の警告が出る。 VX . EXE の 
品詞区分は VJE 内部での品詞分類より大雑 
把で，内部では微妙に異なる品詞を同一の 
品詞名として出力していると考えられる。 

さて，ステップ3のソートをサボった場 
合は“単語の並び順が異なる”という警告 
が出ることになる。先月の60ページ3段目 
上から6行目以下に示した方法で対処する 
ように（エラーがな〈なるまで繰り返すん 
だよ）。 

•ステップ5 

コンバートした辞書は X 68 K _ M . DIC に 
DICM . X でマージして使うもよし，単体で 
X 68 K _ M . DIC の代わりに使うもよし，読者 
のアイデア次第でどうにでもなる。ここで 
は2， 3のコツと注意点を挙げるにとどめ 

よう。 

X 68 K _ M . DIC に マージして 使うときには 
ASK 68 K の辞書ファイルの大きさの制限 
に気をつけること。大体 1 M バイトをちよっ 
と越えたあたりに限界がある（怖いことに 
DICM . X は マージ 時に辞書ファイルサイズ 
が上限を越えても教えてくれない）。 

コンバート した辞書を ごっ そり マージす 
るよりは必要な品詞だけを選んで X 68 K _ M . 
DIC に付け足してやるほうが賢いと思う。 
名詞とサ行変格複合名詞，形容動詞複合名 
詞あたりが狙い目だ。話が前後するが，最 
初からこれらの品詞だけを コンバー トすれ 
ば作業の手間と時間の節約にもなる。 

あと，各辞書の癖や傾向を見極めること 
も大切だ。たとえば，松茸の辞書では“強” 
という漢字が“つよい”という訓読みで単 
漢字として辞書登録されている。これはな 
かなか強力だが，うかつにメイン辞書にマ 
ージしてしまうと変換効率を落としてしま 
うことにもなりかねない。 

参考までに僕の辞書が今現在どうなって 
いるか話しておこう。基本的には X 68 K — M . 
DIC と松茸の辞書を合成したものから，単 
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#define _E1 

#define こ MATU 

♦define _VJE 


PACKEDSTR progname = "CONVDIC"; 

PACKEDSTR usagemes = 

"機能：各種日本捃入力 PEP の取語ファイル ¥ 

を DUMPDIC 形式に変換します ¥n¥ 

使用法 ：％ s 【スイッチ】【入カファイル 1 【【 / 〇】出カファイル ] ¥n¥ 
Yt/A¥tASK68K ( DICM.X ) の辞 ® .莧形式から（デフォルト） ¥n¥ 
¥t/E¥t E 1 (EDICM.X) の辞 # 一轚形式から ¥n¥ 

¥t/M¥t 松茸 V2 (新松）の辞 #- ig 形式から ¥n¥ 

¥t/B¥tVJE- 0 ( VX.EXE ) の辞 » • 览形式から ¥n¥ 

¥n¥ 

¥t/H¥t 見出し語を半角カタカナで出力する Yn¥ 

Vt/G¥t 見出し諸を全角ひらがなで出力する Yn¥ 

¥t/K¥t 見出し語を全角カタカナで出力する（デフォルト） ¥n¥ 
¥t/V¥t 実行経過を報告する ¥n"; 

#if _E1 

void elconv( FILE *, FILE 本 
#else 

#define elconv dummy 

#endif 

#if _MATU 

void matuconv( FILE 本 , FILE 本 
#elae 

#define matuconv dummy 

#endif 

#if _VJE 

void vjeconv( FILE *, FILE * ) : 
f else 

♦define vjeconv dummy 

tendif 

static boolean hankaku = FALSE ； 
static boolean hiragana = FALSE; 
boolean verbose = FALSE ； 

static void windup" 

I 

void B_COLOR( int ); 

B_COLOR( 3 )； 


/* 

CONVDIC.X 

単络フアイルレペルでの辞害コンバータ 

convdic.c parseline.c wclass.c 
l elconv.c matuconv.c vjeconv.c ) 
strfunc.c misc.c vfprintf.s 

raydef.h strfunc.h misc.h myerror.h dictools.h 


拿 / 

doslib*a iocslib.a 

♦include 

"mydef.h" 

# include 

<stdio.h> 

# include 

<stdiib.h> 

♦include 

く ctype•h> 

#include 

〈 string•h> 

♦include 

く jfctype•h> 

#include 

<jstring.h> 

#include 

M miac.h M 

#include 

M strf unc • h •• 

tinclude 

"myerror•h M 

♦include 

"dictools.h” 
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static void putword( fp, index, word, class ) 

FILE *fp; 

STRPTR index, word, class ； 

l 

STR index©, word0; 

setindex( indexO, index, hankaku, hiragana ) : 

settab< strcpy( wordO, word ),3*8); 

if ( fprintf( fp, "%sXs%s¥n", indexO, word0, class 

OF ) 

diskfull( fp ); 


static boolean classconv{ class, convtbl 
STRPTR class, *convtbl; 

{ 

for (; 本 convtbl!= NULL ； convtbl++ ) 
if ( !atrcmpt *convtbl++, class ) 

strcpy( class, *convtbl); 
break ； 

) 

} 

return ( 本 class != ’％’ ); 


void xputword( fp, index, word, class, convtbl) 
FILE *fp ； 

STRPTR index, word, class, 本 convtbl; 

{ 

STR indexO, word0; 

STRPTR p ； 

void putword( FILE *, STRPTR, STRPTR, STRPTR 


if ( classconv( class, convtbl)){ 
putword( fp, index, word, class : 
} else { 

for ( p = strtok( class, "/") : 
p != NULL ； p = strtok( NULL, 
sprintf( indexO, p, index ) : 
sprintf( wordO, strtok( NULL , 


/'')){ 

V" ) , word )； 
putword( fp, indexO, word©, strtok( NULL, 


static STRPTR askconvtable[] = { 

#if 0 

" 名剕 ' "形容動詞技合名 PI", 

•，形容词"， 

” ％ s/Xs/ 形容詞 /? 6s サ /Xs さ / 名詞 /Xs ゲ /Xb げ/形容動祠合名 

m 

#endif 

NULL 

\； 

static void askconv( sourfp, deatfp ) 

FILE *aourfp, *destfp : 

{ 

STR linbuf, index t word, class : 
int KEYSNS( void ); 


•VO*; fgets( linbuf, NCHAR, sourfp 


KEYSNS ()； 
if ( verbose 
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14 
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17 
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27 
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58 
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漢字，地名，人名，郵便番号辞書をごっそ 
り削ったものをメイン辞書にしている。力 
さすがに単漢字がないと不便だし，そのほ 
かの部分も必要な場合があるので，これら 
は別の辞書フアイルにまとめ， CHDIC . R で 
切り替えられるようにしてある。単漢字を 
別辞書に分けたのは上で述べた松茸対策だ 
ったのだが， ASK 68 K お得意の“単漢字並 
ベ当て字変換”がな〈なった分，変換効率 
がよ〈なったような気がした。あわててサ 
ブ辞書中の単漢字も全部削ったのはいうま 
でもない。 

入力方法 

CHDIC . R 以外は先月同様 C で分割 コン 
パイルを 前提に記述してある。 コンパイル 
方法については先月号を参照してもらうと 
して，表1に CONVDIC . X と MS 0 RT . X を 


生成するのにどのフアイルが必要かだけま 
とめておく。カッコでく くってあるフアイ 
ルは先月掲載したものだ0ここで，△がつ 

ぃた E 1 CONV . C ， MATUCONV . C ， 
VJECONV . C は必要な人だけ入力すれば 
よいようになっている。自分に関係のない 
日本語 FEP 用の ソースは 入力しなくても 
よい。ただし，その際には CONVDIC . C の 
24〜26行のマクロ定義部分を注釈に示した 
ように変更すること。 

CHDIC . R だけはダンプリストのかたち 
で提供しているので，リスト8を6月号の 
付録ディスクにも収録されたダンプ入カッ 
ール MAC . X で入力する。このとき， ASK 68 
K の Ver .2.0 の ユーザーは 環境設定に応じ 
て，図1に示す該当箇所を修正する必要が 
ある。この図は， 

0017 02 — 03 

とあったら， CHDIC . R の0017 H バイト目を 

U スト1 convdic.c 


02 H から 03 H に変更する，と読む。 

運悪く XC の Ver .2.0 の製品直前版が編集 
部に届いていたので念のためそちらでもコ 
ンパイルで きるかどうか試してみた。なん 
とか コンパイルは できるようだが，動作確 
認、はまだ' していない。なぉ，先月の VFPRINT 
F . S 関係の部分は ver 2.0 では使用できず，必要 
ないので取りはずす。ただし printf がエラー 
を返さないので注意す る こと。 またリスト 
11で二重定義のエラーが出るはずなので12 
〜15行の定義部を削除してほしい。 

* 

先月と今月の ツールを 使えば ASK 68 K 
の辞書はかなり洗練され，充実するはずだ。 
変換効率もだいぶ改善されるだろう。とに 
かく，道具は提供した。あとは，ヒット率 
100%を目指して（絶対無理だけど）少しで 
も自分にとって使いやすいようにあれこれ 
と辞書をいじくり回してみてほしいと思う。 


/ / 
0 0 
/はは 
0*合合 
は場場 
合ぃぃ 
a なな 
いしし 
なをを 
し換換 
を変変 
換のの 
変ら6 
のかか 
ら V 2 CI 
か茸 E- 
S 松 »VJ 
/// 
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"ザ変", 


tinclude 
#include 
tinclude 
# include 
tinclude 
#mclude 
♦include 
finclude 


"mydef.h" 
<stdio.h> 
<atdlib.h> 
Cctype.h> 
〈 string.h> 

<jstring.h> 
••strfunc.h" 
"dictools.h" 


static STRPTR matuconvtable[| 


"力行 5 段” 
"ガ行 5 段"， 
"サ行 5 段” i 


"力五動 W 
"ガ五動詞” 
"サ五動飼" 


76 ： 

77: 


"Xs/Xa/ サ変動祠 /Xs ジ /% B じ/上 • 下一段動辋”， 
"一段（体苗〉"， 

" Xb / Xb / 名詞/ Xs / Xs / 上.下一段動詞"， 

"形容動辆けル，卜型 r , 

"Xs/Xs/ 形容動詞複合名詞 /Xs タル/ Xs たる/連体詞" 

NULL 


void elconvt sourfp, deatfp ) 

FILE ^sourfp, »destfp ； 

{ 

STR linbuf, index, word, dmy, class : 
int KEYSNSI void )； 
extern boolean verbose ； 


LL ； 


* ¥0 1 ； fgets(linbuf, NCHAR, sourfp 


NU 


aa )； 


) 

)； 


KEYSNS ()； 

if ( verbose ) 

fprintf( stderr, "¥033[31mXs¥033 【 m",linbuf ); 

• word = 本 class = * ¥0 *； 

if ( iaspace( »linbuf ) ) { 

sscanf(linbuf, "XsXsXs", word, dmy, class )； 

} else { 

sscanf{linbuf, "X8%s%sXs", index, word, dmy, cla 

I 

if ( !strcmp( word," 來 ")) 
atrcpy( word, index ) : 
strzenkata( index, index ) : 
if ( ! strcmp( word, " 本 " )) 

strcpy( word, index >; 

if ( 拿 index ! = 1 ¥0 1 && 拿 word != *¥0' kk 拿 class != '¥0* 
xputword( deatfp, index, word, claBa, elconvtable 


リスト 3 matuconv.c 


♦include "mydef.h M 

#include <stdio.h> 

#include <atdlib.h> 

#include く ctype•h> 

#include く string•h> 

•include "strfunc•h" 

参 include "dictools.h” 


fprintf{ stderr, ”¥033 [3lm%s¥033 【 m”，linbuf ); 
if ( parseline(linbuf, index, word, class )) 

xputword( destfp, index, word, class, askconvtabl 


static void dummy(){} 

void main( argc, argv ) 
int argc ； 

STRPTR 拿 argv; 

{ 

FILE *sourfp, 本 destfp; 

STRPTR sourfile = NULL ； 

STRPTR destfile = NULL ； 

STR linbuf; 

STR index, word, class : 
boolean dflt = TRUE ； 
void ( 本 convfunc}(> = NULL ； 

for ( ； --argc; ) { 

if ( strchr( SWITCH_DELIMITER, ♦ 本 ++argv ) != NULL 

unsigned int sc; 
sc = 本 ++ 本 argvj 

switch ( tolower( sc ) ) { 
case f ¥0 1 : 

setptr( &sourfile, stdin ) : /*dummy 本 / 
break; 
case 1 a *: 

setptr( ficconvfunc f askconv ) : 
break; 
case 1 e 1 ： 

setptr( &convfunc, elconv ) : 
break ； 
case , m , : 

setptr( &convfunc, matuconv ); 
break ； 
case f b 9 ： 

setptr( &convfunc, vjeconv )； 
break; 
case 1 o 1 : 

setptr( tdestfile, ++ 本 argv ) : 
break ； 
case 1 h 1 : 

setflag( &hankaku ) : 
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199 
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201 
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break ； 
case 1 g 1 : 

setflag( &hiragana ); 
break ； 
case 1 k 1 ： 

if ( hiragana | hankaku 
usage(); 
break ； 
case 1 v 1 : 

setflag( &verbose )； 
break ； 
default ： 

usage(); 
break ； 

1 

else if ( sourfile == NULL )( 
sourfile = 本 argv; 
dflt = FALSE ； 

else if ( destfiLe == NULL ) I 
destfile = 本 argv; 
else { 
usage< }; 


) 

if ( convfunc == NULL ) 
convfunc = askconv; 

resetstdin ()； 
if ( dflt ) 

sourfp = stdin ； 

else if ( ( sourfp = fchkopen{ sourfile f 

fata し error( ROPENERRMES, 
destfp = setstdout( destfile )； 

breakset( windup )； 

{ 傘 convfunc}< sourfp, destfp ); 


fcloae( sourfp )； 
fcloae( destfp ); 


exit{ EXIT_SUCCESS 


U スト 2 elconv.c 


» » 司司 
' k ", 名名 
詞動詞合合 
”••/"，"，"，"，名”’段名技枝 
词词詞詞祠柯合； SU , 合 Ini 祠 
動動動動動動«動下^複動動 
五五五五五五変焚.容詞容容 
タナバマラヮササ上形動形形 

形 

詞"’ " "V 
段.，名詞，，,2 3 
段段段段段5祠非名る詞詞詞 
5 5 5 5 5行»動非が動動» 
行行行行行 T 変変段-容容容 
タナバマラワササ1 I 形形形 


igl" I 

•', 名詞 名 
詞合動"，"， 合 
、"，/•"，"，"•"•"，"，"，”，名裡段}} =, « 

肿詞胂阚祠祠祠祠轲詞胂合 ,, ,詞 " ,一姓名 ,, ,称 詞 
I 動動動動動動動動動動動複字動*下"，名名",, •, 動"， ,, ，捃齬拮'', 
=五五五五五五五五五変変変漠容字.名名名体の！ SJS 容 JSW 尾尾尾 
[] カガサタナバマラワカササ単形数上人人地団物名則形名名接接接数 

e=<lMsssll"llss<lsssrllllltsMllllllllllllssll 
1 

tab- , 


1C 


名詞 

普败曾人地数 


型 " 名名 

.. r 3 区庁，) ,, S ) 通詞通名 

TRlt 行行行行行行行行 S S sRrf 詞”’ » a ( i ( fi(l - 

RP カガサタナバマラワ"，"•名"，動",!: ",()|名名闕(«け拮捃-|§婼捃路 
ST 段段段段段段段段段変変变濩容； S 段"，前名社有名！！£詞邸姐尾尾尾 MS 
C 五五五五五五五五五カササ単形数一姓名地会固代副副接接接接接接 

illltltllllttllltllltlttlttlllltlllaltltlMMflllMtlllftltll 
t 
a 
t 
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” サ変複合名詞”， 

” 形容動詞複合名詞 M ， 
•• 名脚”， 

" 連体詞"， 


NULL 


void vjeconv( sourfp, destfp ) 

FILE 本 sourfp, *destfp; 

{ 

STR linbuf, index, word, class; 

WCHAR c ； 

int KEYSNS( void )； 
extern boolean verbose; 

for ( 本 index = , ¥0 , ; fgets(linbuf, NCHAR, sourfp ) != NU 

LL ； ) { 

KEYSNS ()； 
if ( verbose ) 

fprintf( stderr, M V033[3lm%s¥033[m M ,linbuf )； 
sacanf(linbuf, M %s%s%s M , index, word f class ) : 
strzenkata( index, index ); 
class[6] = ’¥0 ’； 
c = 本 < < WCHAR 本 > word )； 

if ( ( c > 0x84be && c < 0x889f ) || c > 0xeaa2 ) 
strcat( class, / J I S 規格外 文字 "}; 
if ( 本 index ! = && 本 word != 9 ¥0 9 && 本 class != 1 ¥0 9 

) 

xputword( destfp, index f word, class + 2, vjeconv 

table )； 


PACKEDSTR progname = "MSORT .，； 

PACKEDSTR usagemes = 

" 機能：テキストをソートします 

使用法：％ s 【スィッチ】 [ 入カファイルト .] 】【 / 〇出カファイル】 ¥n¥ 
¥t/D¥tDUMPDIC.X 形式の华■語ファイルを見出し jg についてツートする 
¥n¥ 

¥WI¥t 半角英大文字と小文字を区別しない 

¥t/Ln¥t — 度に処理する最大行数の指定（無指定時は 5000 行） ¥n¥ 
¥t/Kn¥t 行の n 文字目以降を比較対象にする ¥n¥ 

¥t/M¥t すでにソート済みの複数ファイルを併合する ¥n¥ 

¥t/R¥t 陴觝に ソー トする ¥n¥ 

¥t/U¥t 里技行を 1 度しか出力しない ¥n¥ 

¥t./V¥t 実行経過を報告する ¥n"; 

static PACKEDSTR GHOSTMES = 

" ファイル [Xs ] がみつかりません（さっきまではあったのに ！ ）" ； 

typedef struct sortdata { 

STRPTR key ； 

STRPTR lin ； 

FLPTR flp ； 

} DATA, 本 DATAPTR; 

static DATAPTR 1intable; 
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#include 
#include 
tinclude 
tinclude 
♦include 
♦include 
#include 


"mydef.h" 
<atdio.h> 

く stdlib.h> 
<ctype.h> 
〈 string.h> 
"strfunc.h" 
"dictools.h" 


"ザ変動詞”， 

''% a /% s / サ変動|司 /%s ジ /% s じ/上.下一段動詞"， 

" 1段名骑"， 

" Xs /% 3 / 名阔 / X 3/% s / 上.下一段動詞"， 

"形容動脚4 " ， 

形容動詞複合名詞/% s タル/ Xs たる/連体詞“， 

’’it y /%8げ/形容動詞枝合名詞ゲ/% 3 気/形容動詞複合名 

"%3 i /% B め/形容動詞枝合名詞 /%s メ /% s 目/形容動詞拽合名 

’ ••かすける接統"， ^ ^ „ 

••%8力/ XS か/サ五動詞/ XS ケ /% S け/上•下一段勧轲， 
"かるける接校”， 

_， Xs 力/ Xs か/ラ五動詞/如ケ / Xs け/上.下一段動詞"， 
"がるげる接統”， ^ ^ „ 

13 ガ /% a が/ラ五動詞 As ゲげ/上.下一段動詞， 

.•ナれる接綾， • 

" Xs / Xs / サ五動詞/ Xs レ/% 3 れ/上.下一段動詞"， 

" せる接娩"， elv sat „ 

•• X 8 セ/% 3 せ/上.下一段動詞上.下一段動詞'， 
"まるめる接続"， „ 

"如マ/ Xs ま/ラ五動詞 / Xs メ /% s め/上 • 下一段動朐， 

"らすれる接枝”， ,„ 

" Xs ラ/ Xb ら/サ五動詞バ s レ/貼れ/上.下一段動詞"， 
"わるえる接綾"， c „ 

"% s ワ / Xs わ/ラ五動詞/% B エ / Xs え/上.下一段動詞 • ， 

••むホ 5接統，， 

••%S/%3/ マ五 fij PJ /%S マ / Xs ま / ラ五動詞”， 
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27 ： 
28: 
29: 
30 ： 
31: 
32 ： 
33 ： 
34 ： 
35: 
36: 
37 ： 
38: 
39 ： 
40: 
41 ： 
42 ： 
43 ： 

44 : 
45 ： 

46: 
47: 
48 ： 
49: 
50: 
51 ： 
52: 
53 ： 
54: 
55: 
56 ： 
57: 
58: 
59: 
60: 
61: 
62 ： 
63 ： 
64 : 


リスト 5 msort.c 


MSORT.X 

テキストをソートするフイルタ 


8: */ 
9 ： 


msort.c wild.c strfunc.c misc.c 
mydef.h strfunc.h misc.h myerror.h 
dos1ib.a iocslib.a 


10 ： 

#xncluae 

"mydef.h M 


11 ： 

#include 

<stdio.h> 


12: 

♦include 

<stdlib.h> 


13 ： 

♦include 

く ctype•h> 


14 : 

tinclude 

<string.h> 


15 ： 

fmcluae 

<doslib.h> 


16: 

#include 

〈 limits•h> 


17 ： 

^include 

"misc.h" 


18: 

♦include 

’’strfunc • h" 


19 ： 

♦include 

M wild.h M 


20 ： 

#include 

’’royerror • h” 


21 ： 
22 ： 

#define 

NLINE 

5000 

23 ： 

tdefine 

LINBUFSIZ 

4096 

24 : 

#define 

NMERGE 

10 

25: 

♦define 

NTEMP 

0x10000000 

26: 

#define 

RSV 

32768 
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void matuconv( sourfp, destfp ) 

FILE *sourfp, 本 deatfp; 

{ 

STR linbuf, index, word, class ； 
WCHAR c ； 

STRPTR p ； 

int KEYSNS( void )； 
extern boolean verbose; 


for 


本 index 


•¥0* ; fgets(linbuf, NCHAR, sourfp 


NU 


LL ； 


KEYSNS ()； 

if ( verbose ) 

fprintf( stderr, "¥033 [3lm%s¥033[m",linbuf )； 

本 word = 拿 class = 1 ¥0 1 ； 

sscanf(linbuf, "Xa%s%a", index , word, class ) : 
if (( 木 word == ，¥"， > 

&& ( p = atrrchr( word, * ¥" 1 ))&.&.( * ++p == ' ¥0 

本 - _p = »¥0,; 

strcpy( word, word + 1 )； 

) 

strzenkata( index, index )； 

if ( ( * index & 本 word & 本 class ) != 0 ) { 
c = 本 （（ WCHAR 本 )word )； 

if ( ( c > 0x84be kk c < 0x889f ) I I c > 0xeaa2 ) 
strcat ( class, " / J I S 規格 外文字 " > ; 
if ( 8trlen( word ) > 2 && jstrchri word ， ' S * ) 

strcat ( class , "/ 松茸特有'’）； 

xputword( destfp, index, word, class, matuconvtab 


U スト 4 vjeconv.c 


I:::i::: 

名名名連 


789012 3456789012345678901 
2 2 2 3 3 3 3333333444444444455 


司 

1 動 

VI-v"v"v 段！ 

1詞詞詞詞詞詞訶詞詞詞詞 一"., , ，飼"，称姓名".. , ,",", 
e [動動動動動動動動動動動下詞名動詞名"’<<*詞”，語字 
bl 五変五五変五五五五五五•動体容容の詞名名字統詞尾澳 
ta 力カガササタナパマラワ上感団形形物数人人数接名接単 


j 

R 


ST 五変五五変五五五五五五段動業動容名数姓名詞枝頭尾澳 
力カガササタナパマラワー惑企形形固助人人数接接接 itl 


司 

名 

合 "， 

枚 

詞"ノ， ■', 姓称 
動 , ,語詞-,詞^名 
容詞尾統詞体名の 
形名接接副連人物 


丨 15•司， 

5 M — 動副詞 "， 
詞詞"，感ド体詞 
動名辞•ァ連' , ,名 
容般尾統ソナ名有 
形一接接コン人固 


134 


Oh!X 1990.10. 


►我が家の X 68000 はタバコのヤニで色が世界で1台の黄灰色になっています。タバコやめ 
ようかな……。 武藤俊哉 （24) 神奈川県 
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96 
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98 

99 
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104 

105 

106 

107 

108 

109 

110 

111 
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113 

114 
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123 

124 
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126 

127 

128 

129 
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131 
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133 

134 
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136 
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static STRPTR linbuf; 
static FILE «destfp ； 
static int ifilectr = 0; 
static int ofilectr = 0; 
static int nline = 0; 
static int keypoB = 0; 
static int (*cmpfunc)(); 

static boolean diemode = FALSE; 
static boolean ignorecaae = FALSE ； 
static boolean mergeonly = FALSE ； 
static boolean revmode = FALSE; 
static boolean uniq = FALSE ； 
static boolean verbose = FALSE; 


static void 9ortC(left, right ) 

DATAPTR left, right; 

{ 

DATAPTR 11,rr ； 

DATA temp ； 

STRPTR mm; 

mm =(left + ( right - left ) / 2 )->key ； 

for (11=left - 1,rr = right + 1；；){ 

for ( ； (*cmpfunc)( mm, (++11 )->key ) > 0; ) ； 
for ( ； (tcrapfunc)( (--rr)->key, mm ) > 0；) : 
if (11 >=rr ) 
break ； 

temp = 本 11: 本 11=*rr ； 本 rr = temp; 


if ( ++rr < right ) 

sortO( rr, right ); 
if (left < --11 ) 

sortO(left,11) : 


static void sort( dataary, n ) 

DATAPTR dataary ； 
int n; 

( 

if ( n <=1) 
return : 

8ort0( dataary, dataary + n -1) : 


static void s_sort( dataary, n ) 

DATAPTR dataary; 
int n ； 

DATAPTR p, q ； 

DATA temp ； 

STRPTR mm; 
int gap; 

for ( gap = n / 2 ； gap > 0; gap / = 2 ) { 

for ( p = dataary + gap ； p < dataary + n ； p++ )( 
temp = *p ； 
mm = p->key ； 
for ( q = p - gap; 

q > = dataary && (*cropfunc){ q->key, mm ) > 0 ； 
q[ gap ] = *q, q -= gap )； 
ql gap ] = temp; 

I 


static STRPTR getindex( str ) 

STRPTR str ； 

I 

STRPTR temp, p; 
if ( diemode ) { 

for ( p = temp = memalloc( strlen( str ) * 2 + 2 )； » 
str > , ¥x2C；) 

*p++ = 本 str++; 

»p = ’¥0 ， ； 

SJIStoASK( temp, strzenkata( temp, temp )); 
p = realloc( temp, strler»( temp ) + 1 )； 

)else if ( ignorecase ) { 

atrtoupper( p = dupstr( atr )) : 

} else { 

p = str ； 

I 

return ( p )； 


static int myatrcmp( si,s2 ) 

STRPTR si,s2; 

{ 

a 1=(strlen( si)< keypos si + keypos : 

s2 = ( atrlen( s2 ) < keypos ) ? "" : s2 + keypos; 
return ( strcmp( 8l,s2 )); 


static int myrstrcmp( s1,s2 ) 
STRPTR al,a2; 

{ 

return( -mystrcmp( si,s2 )) : 


static FLPTR getsflp ； 


static int getstr() 

I 

FLPTR flp ； 
boolean done; 


161 ： 
162 ： 
163: 
164 : 
165: 
166: 
167: 
168 ： 
169: 
170 ： 
171: 
172 ： 
173 ： 
174: 
175 ： 
176 ： 
177 ： 
178: 

179 ： 
180: 
181 ： 
182 ： 
183 ： 
184 ： 
185: 
186 ： 
187 ： 
188: 
189 ： 
190 ： 
191: 
192: 
193 ： 
194 : 
195: 
196 ： 
197: 
198: 
199: 
200: 
201 : 
202 : 
203 ： 
204 ： 
205 ： 
206: 
207: 
208: 
209: 
210 : 
211 : 
212： 
213 ： 
214 ： 
215: 
216: 
217: 
218: 
219: 
220： 
221 : 
222： 
223: 
224 : 
225: 
226: 
227 ： 
228 ： 

229 ： 
230: 
231: 
232 ： 

233 ： 
234: 
235: 
236: 
237 ： 
238 ： 
239 ： 
240: 
241: 
242 ： 
243 ： 
244 ： 
245: 
246 ： 
247 ： 
248: 
249: 
250 ： 
251 ： 
252: 
253: 
254 ： 
255: 
256 ： 
257: 
258: 
259 ： 
260: 
261 ： 
262: 
263: 
264: 

265: 

266: 


KEYSNS () ； 

for { done = FALSE ； !done ； ) | 

if ( ( flp = getsflp ) := NULL ) 
return ( EOF )； 
if < flp->fp == NULL )( 

if ( flp->nanie == NULL ) { 
flp->fp = stdin ； 
if ( verbose ) 

fputs ( "【棟準 入力 ] stderr )； 

} else ( 

memtest( BUFSIZ )； 

if ( flpopen( flp, "r M ) == NULL ) 

fatal_error( GHOSTMES, flp->name )； 
if ( verbose ) 

fprintf( stderr, "Xs¥n", flp->name ) : 


done = ( fgeta( linbuf, LINBUFSIZ, flp->fp ) != NULL 

if ( feof{ flp->fp ))[ 

getsflp = flpclose( flp )； 
free( flp )； 
ifilectr--; 

) 

} 

return ( !EOF I; 


static void setlline( p ) 

DATAPTR p ； 

{ 

p->lin = dupstr( linbuf ); 
p->key = getindex( p->1in ); 


static int readtlle() 

( 

STRPTR temp ； 

DATAPTR p ； 
int linctr; 

if ( verbose ) 

fputs( ••テキストを読み込みます Vn", stderr )； 

for ( p =lintable,linctr = 0 ； 

1inctr < nline && getstr() != EOF ； 1inctr++, p++ ) | 
KEYSNS ()； 
setlline( p ) : 

free( temp = malloc( RSV )); 
if ( temp == NULL ) 
break ； 

} 

return (linctr )； 


static FLPTR tempflp; 

static FILE *createtemp() 

{ 

FLPTR flp ； 

static STRPTR tempnarae = NULL ； 

STRPTR p ； 

if ( tempname == NULL ) { 

tempname = memalloc< NCHAR < 2 )； 
if ( ( p = getenv( "temp" ) ) == NULL ) 

p = 

sprintf( tempname, ” ％ s$1234567", p )； 

tempname = realloc( tempname, strlen( tempname ) + 1 

>； 

) 

if ( ofilectr >= NTEMP ) 

fatal_error( TOPENERRMES )； 

sprintf{ strchr( tempname, ' ¥0 * ) - 7, "%.7X", ofilectr+ + 

) : 

tenpflp = addtofilelist( tempname )； 
merateat( BUFSIZ ); 

if ( flpopen( terapflp, "w" ) == NULL ) 
fatal_error( TOPENERRMES )； 
terapflp->istemp = TRUE ； 
return ( tempflp->fp ); 


static void killtemps() 

{ 

FLPTR flp ； 

for ( flp = getfilelist ()； ofilectr > 0 && flp ! = NULL ； 
ofilectr--, flp = f 】 p->next ) 
killtemp( flp ); 


static void writefile(linctr ) 
int linctr ； 

{ 

DATAPTR p ； 

STRPTR lstlin ； 

FILE 拿 fp; 

if < ifilectr + ofilectr == 0 ) { 
fp = deatfp ； 
if ( verbose ) 

fputs ( "テキストを S き出します ¥n", stderr )； 

} else { 

fp = createtemp(); 
if ( verbose ) 

fputa( "テキストを作業用ファイルに进き出します ¥n" 

I stderr ) : 


►ある日，私が SX - WINDOW をいじっていると母親がきてひと 言， 「あんた ゲーム ばっ か 
りしなさんなよ j だって。 ゲームじ やないんだよ！ 木 下 勝文 （18) 大阪府 
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287 

288 

289 

290 

291 

292 

293 

294 

295 

296 

297 

298 

299 

300 

301 


302 ： 
303 ： 
304 : 
305 ： 

306 ： 
307 ： 
308 : 
309 ： 
310 ： 

311 ： 
312 ： 
313 ： 
314 ： 
315 ： 
316 ： 
317 ： 
318 ： 
319: 
320 ： 
321 ： 
322 ： 
323 ： 
324 : 
325: 
326: 
327 ： 
328: 
329 ： 
330 ： 
331 ： 
332: 
333 ： 
334 ： 
335 ： 
336 ： 
337 : 
338: 
339: 
340 ： 
341 ： 

342 ： 
343: 
344 : 
345: 
346 ： 
347: 
348 ： 
349 ： 
350 ： 
351 ： 
352 ： 
353 ： 
354 : 
355 ： 
356 ： 


lstlin = dupstr("") : 
for ( p =lintable ； linctr--; p++ )( 
KEYSNS ()； 

if ( uniq && !strcmp( lstlin, p->1in 
if ( p->lin != p->key ) 
free( p->lin ); 

} else ( 

free( lstlin ) : 

if ( fputs( p->lin, fp ) == EOF ) 
diskfulK fp ); 
lstlin = p->lin; 

I 

if ( p->key !=lstlin ) 
free( p->key ); 

} 

free( lstlin )； 

fclose( fp )； 

if ( fp != deatfp ) 

tempflp->fp = NULL; 


static void mergefile() 


FILE 本 fp; 

FLPTR flp ； 

DATAPTR p ； 

STRPTR lstlin ； 

int filectr, fileleft; 


0； 


for ( flp = getfileListU ， fileleft = ifilectr; fileleft 


if ( verbose ) 

f puts( ••マージします ， stderr )； 
for ( filectr = 0, p =lintable ； 

flp != NULL && fileleft > 0 && filectr < NMERGE ； 
flp = fIp->next, fileleft--) 


memtest( BUFSIZ )； 

if ( flpopen( flp, "r" ) == NULL > 

fata 1_error( GHOSTMES, flp->name ) : 
if ( fgeti( linbuf, LINBUFSIZ, flp->fp ) 


準入力 1" 


p->flp = flp ； 
set 1jine( p }； 
if ( verbose ) 

fprintf ( stderr, "Xs¥n .，， 

{ flp->name != NULL ) ? flp->name 

filectr ++； 

P ++； 

else ( 

killtemp( flp )； 


"l 棰 


f ( fileleft > 0 ) { 

fp = createterap ()； 
fileleft ++； 
elBe { 

fp = destfp; 


lstlin = dupstr( ）； 

for ( p =lintable; filectr > 0 ； ) { 

KEYSNS(); 

if ( filectr > 1) 

sort( p, filectr )； 

if { uniq kk !atrcrop( lstlin, p->lin ))( 
if ( p->lin != p->key ) 
free( p->lin )； 

)else { 

free(lstlin )； 

if ( fputa( p->lin, fp ) == EOF ) 
diskfulK fp )； 
lstlin = p->lin; 

) 

if ( p->key !=lstlin ) 
free( p->key ) : 

if ( fgets( linbuf, LINBUFSIZ, p->flp->fp 

set11ine< p )； 

} else { 

killtemp( p->flp )； 

P ++； 

filectr--; 


free(lstlin 
fclose( fp )； 


void main( argc, argv 
int argc ； 

STRPTR *argv ； 


357 

( 




358 

boolean 

dflt = TRUE ； 



359 

STRPTR destfile = NULL ； 



360 

int linctr = 0; 



361 





362 

for (; 

--argc; ) { 



363 

if ( 

strchrt SWITCI し DELIMITER, 

蓴拿 ++argv ) != 

NULL )( 

364 


unsigned int sc; 



365 


bc = 



366 


switch ( tolower( sc ))( 



367 


case *¥0 、 



368 


dflt = FALSE ； 



369 


addtofilelistl NULL ) : 


370 


ifilectr++; 



371 


break ； 



372 


case *d 1 : 



373 


setflag( &dicmode 

); 


374 


break ； 



375 


case 9 i 9 : 



376 


setflag( &ignorecase )； 


377 


break ； 



378 


case , k , ： 



379 


setvalue( &keypos f 

++*argv,1,INT_MAX ) : 

380 


break ； 



381 


case 1 1 *： 



382 


setvalue( &nline f 

•f + targv f 100 , 

INT_MAX ) 

383 

' 

break ； 



384 


case , in , ： 



385 


setflag( fcmergeonly )； 


386 


break ； 



387 


case 1 o 1 : 



38B 


setptr( idestfile, 

++*argv ); 


389 


break ； 



390 


case * r f : 



391 


setflag( trevmode 

); 


392 


break ； 



393 


case 9 u f : 



394 


setflag( &uniq )； 



395 


break; 



396 


case 1 v 1 : 



397 


setflag( &verbose 

)； 


398 


break; 



399 


default ： 



400 


usage ()； 



401 


break ； 



402 


} 



403 

} else { 



404 


dflt = FALSE ； 



405 


ifilectr += setfilename( tnrgv ) : 


406 

} 




407 

} 




408 





409 

if ( dflt )( 



410 

addtofilelist( NULL ) : 



411 

ifil 

ectr++; 



412 

} 




413 

if ( ifilectr == 0 ) 



414 

fatal_error( ” 指定のファイルは 

存在しません " 

) : 

415 





416 

aliment ) 

; 



417 

keypos = 

(! diemode &&. keypos > 0 

)? keypos - 1 

: 0 ； 

418 

uniq =( 

diemode ) ? FALSE : uniq ； 



419 

nline = 

(nline == 0 ) ? NLINE : nline ； 


420 

cmpfunc 

=( revmode ) ? myrstremp 

: mystremp ； 


421 





422 

destfp = 

setstdout ( destfile ) ； 



423 

reset8tdln( ) ； 



424 

breakset ( killtemps ) ； 



425 





426 

linbuf = 

memalloc( LINBUFSIZ )； 



427 

lintable 

= roemalloc ( nline t sizeof ( 拿 lintable ) 

)； 

428 





429 

430 

if ( ! mergeonly ) { 

for ( getsflp = getfilelist () , 

newfilelist( ) 

； ifileot 


r > 0 ； )( 




431 


if (( linctr = readfile{ ) 

)== 0 ) 


432 


break; 



433 


if ( verbose ) 



434 


fprintf( stderr, "テキ 

スト行}をソ 

ートしま 


す ¥n", linctr )； 

435: 

436 ： 

437: 

438: 

439: 

440: 

441 ： 

442 ： 

443 ： 

444 ： 

445: 

446: 

447 ： J 


sort(lintable,linctr )； 
writefile(linctr )； 

} 

ifilectr = ofilectr ； 

} 

if ( ifilectr > 0 ) 



if ( verbose ) 

fputa ( "完了しました ¥n", stderr )； 
exit( EXIT_SUCCESS )； 


リスト 6 wlld.c 


1: tinclude 

"mydef.h” 

10 

2: tinclude 

<8tdio.h> 

11 

3: * include 

<atdlib.h> 

12 

4 : #include 

<string.h> 

13 

5 : #include 

<io.h> 

14 

6: #include 

<doslib* h> 

15 

7: tinclude 

M wild.h M 

16 

8: # include 

"miBc.h，. 

17 

9: tinclude 

••myerror.h” 

18 


static FLPTR filelisttop = NULL ； 

FLPTR getfilelist() 

{ 

return ( filelisttop )； 

} 

void newfileliat() 


136 
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NAMECK( buff, &nambuf )； 

for ( fstat = FILES( &filbuf, buff, 0x20 )； fstat == 0; 

fstat = NFILES( &filb 

))( 

sprintf( buff, nambuf•drive, filbuf.name )； 

addtofiielist( buff ); 

ctr++; 

) 

return ( ctr ); 


int setfilename( name ) 

STRPTR name ； 

{ 

struct NAMECKBUF nambuf ； 
struct FILBUF filbuf ； 
int naineckstat ； 

STR temp ； 

FILE *fp ； 
int ctr = 0; 

if ( ( nameckatat = NAMECK( name, &nambuf ) ) < 0 ) { 

fata し error< ILLNAMMES, name )； 

} else { 

sprintf( temp, "%sXb% 8", nambuf.drive f nambuf.name, 
ambuf.ext ); 

if ( nameckatat == 0 && FILES( &filbuf, temp, 0x10 

==0 ) 

atrcat( temp, ); 

else if ( nameckatat == 0xff ) 
strcat ( temp, ”* • 本 , ’ ）； 
ctr += wild( temp ); 

) 

if ( ctr == 0 && nameckatat == 0 ) { 

if ( ( fp = fopen( name, ”r" ) ) != NULL > { 
if ( isatty( fileno( fp ) ) ) { 
addtofiielist( name )； 
ctr++; 

} 

fclo8e( fp )； 

} else { 

fatal_error( ROPENERRMES, name ) : 

} 

} 

return ( ctr )； 


リスト 7 wild.h 


typedef struct _filelist { 
struct _fiielist 本 next; 

FILE *fp； 

STRPTR name : 
short istemp； 

} FILELIST, *FLPTR； 

FLPTR getfiielist{ void )； 

void newfiielist( void ); 

FLPTR addtofilelist( STRPTR ); 
FILE 本 flpopen< FLPTR, STRPTR )； 
FLPTR flpclose( FLPTR )； 

void killtemp( FLPTR ); 

int setfilename( STRPTR ); 


19 ： { 

20: fileliattop = NULL ； 

21：} 

22: 

23 ： FLPTR addtofileliat< name ) 

24: STRPTR name; 

25 ： { 

26 ： static FLPTR flp ； 

27: FLPTR p ； 

28 ： 

29 ： p = memalloc( sizeof( FILELIST ))； 

30: if ( fileliattop == NULL ) 

31: fileliattop = p; 

32: else 

33: flp->next = p; 

34 : flp = p ； 

35 ： flp->next = NULL ； 

36 ： flp->fp = NULL ； 

37 : flp->name = ( name != NULL ) ? dupstr( name ) : NULL; 

38: flp->iatemp = FALSE; 

39 ： 

40: return ( flp ); 

41：) 

42 ： 

43: FILE 拿 flpopen< flp, mode ) 

44 ： FLPTR flp ； 

45 ： STRPTR mode; 

46 ： { 

47: if ( flp->name == NULL ) 

48: return ( flp->fp = stdin )； 

49: else 

50: return ( flp->fp = fopen( flp->name , mode )); 

51：) 

52 ： 

53 ： FLPTR flpclose( flp ) 

54: FLPTR flp ； 

55 ： { 

56 ： if ( flp->fp != NULL ) 

57: fcloae( flp->fp )； 

58 ： flp->fp = NULL ； 

59: free( flp->name )； 

60: return ( flp->next )； 

61:} 

62 ： 

63: void killtemp( flp ) 

64 ： FLPTR flp ； 

65 ： { 

66: STRPTR name ； 

67 ： 

68 ： name = flp->name ； 

69: flpclose( flp )； 

70: if ( flp->istemp &&. name ! = NULL ) 

71 : unlink( name )； 

72: } 

73: 

74 : static int wild( buff ) 

75 ： STRPTR buff ； 

76 ： { 

77 ： struct FILBUF filbuf ； 

78 ： struct NAMECKBUF nambuf ； 

79: int fstat; 

80 ： FILE 家 fp; 

81: int ctr = 0; 

82: 


リスト日（ 1000 バイトでセーブ ) 


0000 

60 

00 

01 

0C 

2F 

43 

48 

44 

6B 

0118 

2A 

49 

41 

E8 

00 

10 

43 

E9 

D8 

0230 

FE 

EC 

FF 

49 

58 

8F 

4E 

75 

DC 

0008 

49 

43 

2F 

00 

00 

00 

6A 

00 

25 

0120 

24 

3E 

93 

C8 

48 

E7 

00 

C0 

AC 

0238 

4A 

1A 

67 

00 

FF 

7E 

7C 

00 

C4 

0010 

00 

00 

00 

00 

00 

00 

00 

02 

02 

0128 

FF 

4A 

4A 

80 

6B 

00 

00 

9E 

1C 

0240 

7A 

00 

41 

ED 

02 

E2 

43 

ED 

BC 

0018 

4E 

F9 

00 

00 

00 

00 

4E 

F9 

8E 

0130 

4F 

ED 

24 

3E 

61 

00 

01 

02 

02 

0248 

00 

00 

74 

07 

61 

5E 

4A 

12 

96 

0020 

00 

00 

00 

00 

30 

3A 

00 

E2 

4C 

0138 

61 

00 

00 

A4 

4A 

05 

67 

0C 

C7 

0250 

67 

26 

61 

7C 

48 

6D 

03 

E2 

04 

0028 

6B 

EE 

67 

14 

48 

E7 

00 

84 

87 

0140 

61 

00 

00 

D0 

48 

7A 

01 

EA 

DE 

0258 

2F 


FF 

37 

50 

8F 

4A 

80 

16 

0030 

61 

62 

2B 

48 

00 

0A 

53 

6D 

00 

0148 

FF 

09 

FF 

00 

4A 

47 

66 

76 

74 

0260 

66 

00 

FF 

58 

61 

16 

43 

E9 

60 

0038 

00 

08 

4C 

DF 

21 

00 

4E 

75 

17 

0150 

4A 

46 

67 

66 

32 

3C 

01 

00 

CC 

0268 

00 

5C 

52 

4 6 

51 

CA 

FF 

DE 

EC 

0040 

61 

D6 

61 

38 

66 

34 

61 

5C 

27 

0158 

43 

FA 

FE 

CA 

70 

80 

4E 

4F 

92 

0270 

61 

3A 

4A 

12 

66 

00 

FF 

44 

A0 

0048 

60 

DA 

30 

3A 

00 

BC 

6B 

CE 

99 

0160 

29 

40 

00 

1A 

32 

3C 

01 

01 

F3 

0278 

42 

11 

4E 

75 

4B 

E7 

00 

C0 

05 

0050 

67 

18 

48 

E7 

00 

84 

61 

3C 

CF 

0168 

43 

FA 

FE 

E0 

70 

80 

4E 

4F 

A8 











0058 

66 

0A 

2B 

48 

00 

0A 

53 

6D 

AD 

0170 

29 

40 

00 

20 

45 

FA 

FF 

8A 

51 

SUM： 

62 

89 

E9 

84 

64 

24 

F9 

6D 3A88 

0060 

00 

08 

70 

00 

4C 

DF 

21 

00 

C4 

0178 

43 

FA 

00 

64 

24 

89 

25 

49 

BC 











0068 

4E 

75 

61 

B2 

4A 

80 

67 

0A 

11 











0280 

41 

ED 

03 

E2 

12 

D8 

66 

FC 

5F 

0070 

61 

0A 

66 

06 

61 

A2 

61 

2C 

67 

SUM： 

C2 

72 

A3 

99 

E6 

A0 

ID 

A1 CC31 

0288 

53 

89 

41 

ED 

04 

25 

12 

D8 

ID 

0078 

70 

00 

4E 

75 

0C 

40 

59 

00 

D8 











0290 

66 

FC 

53 

89 

41 

ED 

04 

38 

A8 











0180 

00 

04 

41 

ED 

00 

00 

2C 

49 

A7 

0298 

4A 

10 

66 

04 

41 

FA 

01 

45 

45 

SUM： 

70 

ED 

97 

15 

31 

2D 

63 

90 6666 

0188 

58 

89 

20 

08 

12 

D8 

66 

FC 

55 

02A0 

12 

D8 

66 

FC 

53 

89 

4C 

DF 

53 











0190 

53 

89 
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40 

20 

09 

52 

80 

37 
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75 

61 
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12 

91 
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00 
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4A 
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66 

DE 

23 
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67 

02 

4E 

75 

52 

8A 

10 

1A 

32 

0090 

59 

00 

4E 

75 

4B 

FA 

00 

6A 

CB 

01A8 

42 

96 

41 

FA 

FF 

5C 

42 

50 

0Q 

02C0 

08 

80 

00 

05 

0C 

00 

00 

52 

EB 

0098 

70 

01 

48 

40 

20 

6D 

00 

0A 

90 

01B0 

93 

CC 

52 

89 

42 

67 

2F 

09 

IB 

02C8 

66 

00 

FE 

F0 

7A 

FF 

60 

DC 

09 

00A0 

30 

18 

4E 

75 

48 

E7 

C0 

C4 

BE 

01B8 

FF 

31 

41 

FA 

01 

DF 

60 

10 

BB 

02D0 

2F 

08 

4A 

12 

67 

1C 

0C 

12 

34 

00A8 

4B 

FA 

00 

56 

2F 

3A 

FF 

66 

69 

01C0 

41 

FA 

01 

B7 

60 

0A 

41 

FA 

98 

02D8 

00 

20 

67 

16 

0C 

12 

00 

09 

C4 

00B0 

2F 

3C 

00 

00 

00 

01 

FF 

22 

8D 

0108 

01 

91 

60 

04 

41 

FA 

01 

7A 

AC 

02E0 

67 

10 

0C 

12 

00 

2D 

67 

0A 

33 
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50 

8F 

00 

7C 

07 

00 

3B 

7C 

19 
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3F 

3C 

00 

02 

2F 

08 

FF 

IE 

D1 
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0C 

12 

00 

2F 

67 

04 

10 

DA 

A2 

0000 

00 

05 

00 

08 

41 

ED 

00 

0E 

49 
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3F 

3C 

00 

01 

FF 

4C 

42 

A7 

B0 

02F0 

60 

E0 

42 

ie 

20 

5F 

4E 

75 

D4 

00C8 

2B 

48 

00 

0A 
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FA 

FF 
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F7 
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FF 
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3C 
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52 
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0C 

12 

00 

20 

67 
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79 
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20 
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20 

D9 

22 

6D 

00 

00 

81 

01E8 

93 

C9 

70 

80 
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22 

40 

4B 











00D8 

20 

11 

66 

0-1 

20 

2D 

00 

04 

EC 

01F0 

26 

40 

70 

80 

4E 

4F 

7E 

00 

71 

SUM： 

82 

BF 

6F 

CA 

2A 

32 

7D 

23 22B2 
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40 

2B 

40 

00 

00 

58 

89 

AE 

01F8 

20 

3A 

FE 

0A 

B0 

AB 

FF 

E0 

9C 
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67 
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0300 

¢0 

12 
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4^ 
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52 
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00 
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60 

F4 

30 
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60 

77 
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4B 
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38 
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44 
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4C 

DF 

23 

03 

4E 

75 

3E 
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69 

63 

74 

69 

6F 

6E 

61 

72 

59 
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66 

0A 

20 
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FE 

04 
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AB 

27 
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46 
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65 

20 

53 

8C 
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EE 
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07 
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FF 
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07 
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22 
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82 
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0D 

0A 

00 
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83 

BA 

95 

73 

IE 

0380 

0350 

91 

AB 

82 

C5 

82 

B7 

0D 

0A 

D3 

0388 

0358 

00 

43 

48 

44 

49 

43 

82 

CD 

AA 

0390 

0360 

82 

B7 

82 

C5 

82 

C9 

91 

67 

C3 

0398 

0368 

82 

DD 

8D 

9E 

82 

DD 

8D 

CF 

45 

03A0 

0370 

82 

DD 

82 

C5 

82 

B7 

0D 

0A 

F6 

03A8 

0378 

00 

43 

48 

44 

49 

43 

82 

CD 

AA 

03B0 

03B8 

SUM ： 

9B 

F4 

9F 

FB 

35 

Cl 

EB 

07 1ACE 

03C0 


82 DC 
8D 9E 

82 A2 
0D 0A 
40 81 
20 5B 

83 60 
83 74 
20 5B 


82 BE 
82 DC 

82 DC 
00 8E 
46 43 

83 58 
5D 20 
83 40 
8163 


9167 
82 EA 

82 B9 
67 97 
48 44 

83 43 
8E AB 
83 43 
5D 0D 


82 DD 
82 C4 

82 FI 
70 96 
49 43 

83 62 
8F 91 
83 8B 
0A 09 


F5 

3B 

30 

A9 

62 

01 

B9 

8E 

DC 


03C8 

03D0 

03D8 

03E0 

03E8 

03F0 

03F8 


2F 52 
82 CC 
89 F0 
0D 0A 
00 00 
00 00 
00 00 


09 43 48 44 49 43 
8F ED 92 93 82 F0 
8F 9C 82 B7 82 E9 
00 2E 44 49 43 00 
00 00 00 00 00 00 
00 00 00 00 00 00 
00 00 00 00 00 00 


E5 

61 

48 

15 

00 

00 

00 


SUM ： 


6B 49 D7 5C D5 FA 6E 0E E560 


リスト 9 chdic.s ( 参考） 


1 


.list 



100 


subq•w 

#1,KCNT(WORK) 

2 

零本本本拿拿本零 

本本本本本本本本 

本本本本本本本本 

專本 * 本 * 本 *♦ 本 * 本本 * 本本 *# 本本本本ネ本♦本 

101 


moveq.1 

*0,dO 

3 

本 ASK68K Dictionary File Selector v 1 . 00 拿 

102 

ksnsO : 

movem.1 

(sp)+,aO/WORK 

4 

拿拿本本本本！:聿 

本本本本本本本本 

本本本本本本本本拿拿本本本本本本本本本本本本本本本零拿本本本拿本本 

103 


rts 


5 


.include 


iocscall.mac 

104 




6 


.include 


doscall.mac 

105 

ksnsl: 

bsr 

IOCS01 

7 


.include 


files.h 

106 


tst.1 

d0 

8 


.include 


const•h 

107 


beq 

retn 

9 

% 




108 


bar 

keychk 

10 

DOSLIKE 

equ 

-1 


109 


bne 

retn 

11 

本 




110 


bsr 

IOCS0O 

12 

HOTKEY 

equ 

$5900 

本 XF5 

111 


bsr 

do 

13 

CRKEY 

equ 

$ld0d 


112 


moveq.1 

#O,d0 

14 

MAXDIC 

equ 

8 


113 

retn : 

rts 


15 

% 




114 

本 



16 

STRCPY 

macro 



115 

keychk : 



17 


local 

loop 


116 


cmpi.w 

#HOTKEY,dO 

18 

loop ： 

move.b 

(a0) + , (e 


117 


bne 

kchkO 

19 


bne 

loop 


118 


IOCS 

B SFTSNS 

20 


subq.1 

#1,al 


119 


andi.w 

#$0f,d0 

21 


endm 



120 


beq 

kchkO 

22 

本 




121 


move•1 

#$000 1_ 00001 HOTKEY,dO 

23 


• off set 

0 


122 

kchk0 : 

rts 


24 

本 




123 

本 



25 

PROGST ： 

.ds • w 

2 

124 

sns : 



26 

_ID: 


• ds • w 

4 

125 


lea.1 

work(pc),WORK 

27 



• ds. w 

6 

126 


moveq.1 

#1,d0 

28 



• ds. w 

1 

127 


swap*w 

dO 

29 

_IOCS00 


• ds •1 

1 

128 


movea•1 

KPTR(WORK),a0 

30 



• ds • w 

1 

129 


move.w 

(a0)+,d0 

31 

IOCS01 


• ds.1 

1 

130 


rts 


32 

BENT ： 




131 

t 



33 

本 




132 

do : 



34 


.offset 

0 


133 


movem.1 

d0-dl/a0-al/WORK,-(sp) 

35 

本 




134 




36 

DICTBL ： 


• ds • b 

NAMBUFSIZ*MAXDIC 

135 


lea.1 

work(pc),WORK 

37 



.ds. w 

1 

136 




38 

TEMP ： 


• ds «b 

256 

137 


move.J 

askmod(pc) ， - (sp) 

39 

NAMBUF : 


• ds. b 

NAMBUFSIZ 

138 


move.1 

# 1,-(Bp) 

40 



• ds.l 

2048 

139 


DOS 

_KNJCTRL 

41 

INISP ： 




140 


addq.1 

#8, sp 

42 

WORKSIZE: 



141 




43 

拿 




142 

do0 : 

ori . w 

#$0700, sr 

44 


.offset 

0 


143 




45 

本 




144 


move.w 

#5,KCNT(WORK) 

46 

CURDIC ： 


• ds.l 

1 

145 


lea.l 

KBUF(WORK),a0 

47 

FSTDIC ： 


• ds.l 

1 

146 


move.1 

a0,KPTR(WORK) 

48 

KCNT ： 


.ds. w 

1 

147 


lea.l 

dickey(pc),al 

49 

KPTR ： 


• ds«X 

1 

148 


move.1 

(al)+,(a0)+ 

50 

KBUF: 




149 


move.1 

(al)+,(a0) + 

51 

本 




150 




52 


.text 



151 


movea.1 

CURDIC(WORK),al 

53 


.even 



152 


move•1 

(al),d0 

54 

本 




153 


bne 

dol 

55 

RFLAGREG 

equ 

d5 

154 


move,1 

FSTDIC(WORK),d0 

56 

DICCNTREG 

equ 

d6 

155 

dol : 

movea•1 

d0,al 

57 

KPFLAGREG 

equ 

d7 

156 


move.1 

d0,CURDIC(WORK) 

58 





157 


addq.1 

#4,al 

59 

KPPROG 


equ 

a3 

158 




60 

PROGBASE 

equ 

a4 

159 


moveq.1 

#0,d0 

61 

WORK 


equ 

a5 

160 

do2 : 

move.b 

(al)+ f d0 

62 

拿 




161 


beq 

do3 

63 

progat : 




162 


move.w 

d0 ， (a0) + 

64 


bra. w 

init 


163 


addq.w 

#1,KCNT(WORK) 

65 

ID ： 

• dc. b 

VCHDIC/ 1 ,0 

164 


bra 

do2 

66 

dickey: 

.dc. w 

$0000 v $6a00,$ 0000,0 本 F8 

165 




67 

askmod : 

.dc.1 

2 

本一括変換（先読みあり 

) 166 

do3 : 

move•w 

#CRKEY,(a0)+ 

68 

IOCS00: 

jmp 

0 


167 




69 

IOCS01 : 

jmp 

0 


168 

do9 : 

movem.1 

(sp)+,d0-dl/a0-al/WORK 

70 

本 




169 


rts 


71 

KEYINP ： 




170 




72 


move.w 

kcnt(pc),d0 

171 

本 



73 


bmi 

IOCS00 


172 

work: 



74 


beq 

kinpl 


173 

curdic : 

.dc.l 

0 

75 





174 

fstdic: 

• dc.l 

0 

76 


movem.1 

a0/WORK 

， - (sp> 

175 

kcnt: 

.dc. w 

-1 *uninitialized 

77 


bar 

sna 


176 

kptr : 

.dc.l 

0 

78 


move.1 

a0,KPTR(WORK) 

177 

kbuf: 



79 


subq•w 

#1,KCNT(WORK) 

178 

本 



80 





179 

init: 



81 

kinpO : 

movem.1 

(sp)+ f aQ/WORK 

180 


pea.1 

ttlmea(pc) 

82 


rts 



181 


DOS 

_PRINT 

83 

本 




182 




84 

kinpl : 

bar 

IOCS00 


183 


lea.1 

$01O0(a0).PROGBASE 

85 


bar 

keychk 


184 


movea.1 

al.WORK 

86 


bne 

retn 


185 




87 


bsr 

do 


186 


lea.l 

16{a0) t a0 

88 


bra 

KEYINP 


187 


lea.l 

WORKSIZE{al),al 

89 





188 


suba•1 

a0, a 1 

90 

t 




189 


movem.1 

a0-al ， - (ap) 

91 

KEYSNS ： 




190 


DOS 

SETBLOCK 

92 


move.w 

kcnt(pc),d0 

191 


tst •1 

d0 

93 


bmi 

IOCS01 


192 


bmi 

error0 

94 


beq 

ksnsl 


193 




95 





194 


lea.l 

INISP(WORK) f sp 

96 


movem.1 

a0/WORK 

.-(sp) 

195 




97 


bar 

sns 


196 


bsr 

chkarg 

98 


bne 

ksnsO 


197 




99 


move.1 

a0,KPTR(WORK) 

198 


bsr 

chkkp 


Oh!X 1990.10. 


► 9 月いっぱいまで夏休みだというのに， X68000 をいじるひまもない。運動部には夏休み 

もないのである。ああ，海に行きた t. 。 P.S. ユニフォーム のせいで土方焼けしてしまっ 

た。 小林勝 （ 22 ) 千葉県 
















199 

200 

201 

202 

203 

204 

205 

206 

207 

208 

209 

210 

211 

212 

213 

214 

215 

216 

217 

218 

219 

220 

221 

222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

24 3 

244 

245 

246 

247 

248 

249 

250 

251 

252 

253 

254 

255 

256 

257 

258 

259 

260 

261 

262 

263 

264 

265 

266 

267 

268 

269 

270 

271 

272 

273 

274 

275 

276 

277 

278 

279 

280 

281 

282 

283 

284 

285 

286 

287 

288 

289 

290 

291 

292 

293 

294 

295 

296 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 


tst.b 

RFLAGREtJ 

beq 

keep 

bsr 

kpoff 

pea.1 
DOS 

mes1(pc) 
PRINT 



rts 

拿 

chkarg : 

tst.b (a2)4 
beq usage 

moveq.1 #0,DICCNTREG 
moveq.1 #0,RFLAGREG 


DOS _EXIT 

keep ： 

tst.w KPFLAGREG 
bne error] 

tst.w DICCNTREG 
beq usage 

move.w #$0100, dl 


318 

319 

lea.1 

TEMP(WORK) f a0 

320 

lea •1 

DICTBL(WORK),al 

321 

moveq•1 

L #MAXDIC-1,d2 

322 

ckargO : bsr 

nextarg 

323 

324 

t8t«b 

(a2) 

325 

beq 

okarg1 

326 





lea.l 

KEYINP(pc),al 

327 


IOCS 

B INTVCS 

328 


move,1 

d0,_IOCSOO(PROGBASE) 

329 




330 


move.w 

#$0101 ,dl 

331 


lea.1 

KEYSNS(pc),al 

332 


IOCS 

B INTVCS 

333 


move.1 

d0,_IOCS01(PROGBASE) 

334 




335 


lea.1 

curdic(pc),a2 

336 


lea •1 

dictbl(pc 1,al 

337 


move.1 

al,(a2) 

338 


move,1 

al,FSTDIC-CURDIC(a2) 

339 


lea.1 

DICTBL(WORK),a0 

340 

keep0 : 

movea.1 

al,a6 

341 


addq.1 

#4 ,al 

342 


move.1 

a0 ,d0 

343 


STRCPY 


344 


movea.1 

d0 ,a0 

345 




346 


move.1 

al,d0 

347 


addq.1 

#1,d0 

348 


bclr.1 

#0,d0 

349 


movea.1 

d0,al 

350 




351 


move.1 

al,(a6) 

352 


lea.l 

NAMBUFSIZ(aO),a0 

353 


tst.b 

(a0) 

354 


bne 

keepO 

355 


clr.1 

(a6) 

356 


lea.l 

kcnt(pc) ， a0 

357 


clr. w 

(a0) 

358 


suba.1 

PROGBASE,a 1 

359 


addq.1 

#l，al 

360 


clr, w 

-(sp) 

361 


move•1 

al ， - (sp) 

362 


DOS 

_KEEPPR 

363 

拿 



364 

usage : 



365 


lea 

usgmes(pc),aO 

366 


bra 

errret 

367 

拿 



368 

error2: 

lea.1 

errms2(pc),aO 

369 


bra 

errret 

370 

errorl : 

lea.l 

errrasl(pc),a0 

371 


bra 

errret 

372 

errorO ： 

lea.1 

errra80(pc),a0 

373 

errret : 

move.w 

#STDERR,-(sp) 

374 


move•1 

a0,-(9p) 

375 


DOS 

FPUTS 

376 


move.w 

#l,-(sp) 

377 


DOS 

_EXIT2 

378 

dictbl: 



379 




380 

KBUFSIZ 

equ 

dictbl-kbuf «KBUFSIZ>200 ! 

381 




382 

本本本拿本拿京 : 

象拿本未本本拿本 : 

t 拿本零本本拿本本本 《 拿本本 4 ； 本本本拿本本本本本 》 本本 * 本本*本本拿拿本本拿拿本 

** 383 




384 

chkkp: 



385 


clr. 1 

-(sp) 

386 


DOS 

_SUPER 

387 


move • 1 

d0,(sp) 

388 




389 


move.w 

#$0100|_B_KEYINP,dl 

390 


suba•1 

al,al 

391 


IOCS 

B INTVCS 

392 


movea.1 

50,al 

393 


movea.1 

d0,KPPROG 

394 


IOCS 

_B_INTVCS 

395 




396 


moveq.1 

#0,KPFLAGREG 

397 


move•1 

ID(pc),d0 

398 


cmp* 1 

_ID-BENT(KPPROG),d0 

399 


bne 

chkkpO 

400 


move•1 

ID+4(pc),d0 

401 


cmp.1 

ID+4-BENTIKPPROG),d0 

402 


seq. b 

KPFLAGREG 

403 




404 

chkkpO : 

DOS 

_SUPER 

405 


addq•1 

#4 , sp 

406 


rts 


407 

% 



408 

kpoff ： 



409 


tat • w 

KPFLAGREG 

410 


beq 

error2 

411 


move. w 

#$01001 B KEYINP.dl 

412 


movea.1 

IOCS00-BENT(KPPROG),al 

413 


IOCS 

B INTVCS 

414 


move•w 

#$01001 B KEYSNS.dl 

415 


movea•1 

IOCS01-BENT < KPPR0G),al 

416 


IOCS 

B INTVCS 

417 


pea.1 

-256+16-BENT(KPPROG) 

418 


DOS 

_MFREE 

419 


addq•1 

#4 , sp 

420 


bsr 

getarg 

pea.1 

NAMBUF(WORK) 

move.1 

aO,-(ap) 

DOS 

_NAMECK 

addq•1 

#8, sp 

tat.l 

d0 

bne 

usage 

bsr 

setfnam 

lea.l 

NAMBUFSIZ(al),al 

addq•w 

#1,DICCNTREG 

dbra 

d2,ckarg0 

bsr 

nextarg 

tst • b 

(a2) 

bne 

usage 

ckargl : clr.b 

(all 

rts 


setfnam : 


movem.1 

a0-a1 ， - (sp) 

lea.1 

NAMBUF+DRIVE(WORK),a0 

STRCPY 

lea.l 

STRCPY 

NAMBUF+NAME(WORK),a0 

lea.l 

NAMBUF+EXT(WORK),a0 

tat .b 

(a0) 

bne 

9etfn0 

lea.1 

dicext(pc),aO 

setfn0 ： STRCPY 


movem.1 
rts 

(sp)+,a0-al 

nextarg : 


bsr 

skipsp 

.ifdef DOSLIKE 


cmpi•b 

# ， / ，， (a2) 

beq 

nxargO 

.endif 


cmpi.b 

beq 

rts 

# ， - ，，（ a2) 
nxargO 

nxargO : addq.1 

#1,a2 

move•b 

U2) + ,d0 

bclr.1 

#5,d0 

cmpi•b 

# ， R ，， d0 

bne 

usage 

moveq.1 

#-1 .RFLAGREG 

bra 

nextarg 

t 

getarg : 


move.1 

a0,-(sp) 

gtargO : tst.b 

(a2) 

beq 

gtarg1 

cmpi.b 

♦SPACE,(a2) 

beq 

gtarg1 

cmpi•b 

#TAB,(a2) 

beq 

gtargl 

cmpi•b 

#.-， ,(a2) 

beq 

gtarg1 

.ifdef DOSLIKE 


cmpi.b 

#，/， ,(a2) 

beq 

gtarg1 

•endif 


move.b 
bra 

( a2 )+ ,(aO ) + 
gtarg0 

gtargl : clr.b 

(a0) 

movea.1 

(sp)4 f a0 

rts 

拿 

skpspO : addq•1 

#1,a2 

skipsp : cmpi.b 

#SPACE,(a2) 

beq 

skpspO 

cmpi.b 

#TAB,<a2) 

beq 

skpspO 

rts 

拿 

• data 

拿 

ttlines : . dc . b 

' ASK68K Dictionary File Selector v1.00 * 

• dc • b 

CR.LF.0 

mes1 : •dc•b 

， CHDIC を切り放しました * ,CR,LF,0 

errmaO : .dc•b 

• メモリ不足です * ,CR,LF,0 

errmsl : .dc.b 

•CHDIC はすてに組み込み済みです ’ ,CR,LF,0 

errma2 : .dc.b 

•CHDICJi まだ紐み込まれていません * .CR.LF.O 

usgmes : .dc.b 

’使用法： CHDIC [スイッチ]辞*ファイル[… 1 ， 

• dc .b 

CR,LF 

.dc.b 

TAB, ， /R ， ,TAB, ’CHDIC の 常駐を 解除する ’ ， CR,LF,0 

dicext: .dc.b 

零 

• end 

' .DIC， ，0 


►もう過ぎ去ってしまった X 68 ooo のウイルスですが，先 h 本屋で横にいた中学生の話が耳 辞書整備応用編 139 

に入ってきたのですが，中学生 A 「日本でいちばんウイルスが入りやすい パソコンて 
X 68000 でしよう一」，中学生 B r そ一そ一，オレ X 68000， 大丈夫かな一？ j と，とんでも 
ない印象を受けた人もいるようです。 前多和洋（16> 愛知県 










X 6 B 000 の画像を読み込むには 

亀田雅彦 Kameda Masahiko 


前回は XI turboZ の画像を XI に持ってくる話をしました。今回は一歩進んで X 68000 
の65536色の画像データを Xlturbo で表示してみましよう。 MS - DOS フォーマツ 
卜のディスクが読めるといラことはテキストデータの互換だけではないのです。 


8月号の特集では4096色と8色がらみの 
グラフィック変換に取り組みました。今月 
はなんと X 68000 と XlturboZ (または XI 
turbo で 2 HD ドライブを装備したもの）で 
グラフ ィ ックデータの相互変換をするため 
の ブロ グラムです。図1のようなグラフ ィ 
ック体系が完成されますね。こんなインタ 
マシン的なものが好きなんですよ。 

それから今月は 「2 HD ドライブを持って 
いる Xlturbo ユーザー」にしか使えません。 
汎用的な外部コマンドの作成は来月以降と 
なりますのでご了承を。ただし， X 68000 と 
の データ 互換なので X 68000 ユーザーには 
非常に関係のあるところです。これまであ 
まり関係のない記事と思っていた方もちょ 
っと目を止めてみてください。 


データの 共有化 


あなたはどこでグラフイックデータを手 
に入れていますか？ パソコン通信，スキ 
ヤナ，自分でツールを使って描くなど，い 

図1グラフィック体系 


640 X 400 • 16色 


Oh!X ’90年8月号 
「グラフ イックデー 
夕を変換する j 


Oh!X ’90年10月号 
「 XL 0 AD . XI 」 
「 XSAVE . XI 」 
with KAME - D 0 S 


Oh!X 30年8月号 
「 Z の画像を XI で」 
r C CHANGE . XI j 


— ^は，変換可能な経路を表す 


Z 以外の XI 
320 X 200 • 8色 


XlturboZ 

320 X 200 • 4096色 


……—I 

[ ……— 

X 68000 

512 X 512 

• 65536色 


ろんな方法があります。また，こうしたデ 
—夕を使ってゲームなどを作ることもある 
でしょう。そんなとき，簡単に画像を手に 
入れることができるものとしてビデオデジ 
タイザがあります0これはテレビやビデオ 
の画像を一瞬のうちに G - RAM に取り込ん 
でしまうものです。 X 68000 にもカラーイメ 
ージ ユニット なる機械がありますね 。XI 
turboZ にはなんと標準でこのデジタイズ 
機能が内蔵されているのです。 

X 68000 での画像データの美しさは定評 
がありますし， XlturboZ のビデオデジタイ 
ザの機能と性能は素晴らしいものがあります。 
なんと X 68000 のカラーイメージ ユニット 
を凌ぐところもあります。 

そこで XLOAD . Xl ， XSAVE . X 1 の登場 
です0 8月号の GL 0 AD . X 1， GSAVE . X 1 に 
似ています力す，実は機能も似ています。対 
象になるグラフ イック データフアイ ルが 
X 68000 の GL 3 フアイ ル形式 という違いだ 
けです。機能は，それぞれ， 「 X 68000 でセー 
ブした65536色のデータを XlturboZ の4096 
色や8色疑似中間調で表示する 」 「Xltur 
boZ の4096色画像を X 68000 で読めるかた 
ちに変換する」というものです。 

入力方法 

今回は turboBASIC あるいは Z-BASIC 
専用の プログラム なので KAME - DOS もそ 
れらの BASIC 上で動くものが必要です。7 
月号と同じように変更をするのですが，も 
う一度掲載しておくのでよく読んでくださ 
い0今月の プログラムは リスト1を上記の 
いずれかの BASIC で入力， 

SAVE ” XLOAD . X ド 
でセーブして， 

CLEAR & HB 000 


を実行したあと，リスト2をマシン語入力 
ツールな どで入力して， 

SAVEM ” X 681. OBJ ”，& HB 000，& 

HB 6 E 5 

として同ーデイレクトリにセーブしてくだ 
さい。 

同様に，リスト3を入力し， 
SAVE ，， XSAVE . X 1” 

でセーブ，リスト4を入力， 

SAVEM ” Xl 68. OBJ ”，& HC 800，& 

HCA 19 

で セーブし てください。 

使い方 

いまデイスタ上には， 

XLOAD . X 1 

X 681.0 BJ 

XSAVE . X 1 

X 168.0 BJ 

の4つのファイルがあると思います0それ 
に X 68000 の GL 3 形式の画像データが入つ 
ているデイスタを用意してください 
( X 68000 のグラフイックデータファイル 
がわからない方は注を参照）。 

• X 68000 ファイル —XI 画像 

書式： XL 0 AD ファイル 名 [オプション] 
オプション： 

-H 640 X 400 8色 

-M 640 X 200 8色 

-L 320 X 200 4096色 （ Z - BASIC ) 
- L 8 320 X 200 8色 

オプション省略時は， - H を指定したこと 
と同じ0つまり，ひとつのファイルを上記 
の4つのモードで口 ードできるということ 
です。 XLOAD 起動時には，自動的にォプシ 
ョン指定した解像度に設定されます。 
そして，書式のようにコマンドラインか 
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ィ ツクを X 68000 の形式でセーブします。左 
上の数字は終了までのライン数です。 

なお，セーブ•ロードどちらの場合もデ 
イスク が MS - DOS フ オーマツ トでフ アイ 
ル拡張子が GL 3 でないと動作しないので注 
意してください。 

•画像の違い 

XLOAD するときには，前述した4つ 
のモードが選べます。そのなかで，もし解 
像度の決まっていない変換をするのなら 
「640 X 400 8色モード」をおすすめしま 
す。 X 68000 は 512 X 512 という高解像度なの 
で，その他のモードだと切り捨てられる情 
報が多すぎるのです。特にアニメ調の絵の 
場合，使われている色数が少ないためか， 
輪郭の太さでかなり印象が違います。320 X 
200では MSX 調の絵になるのが許せません。 

逆に色の変化を大切にしたり輪郭線がな 


図2色変換の説明 


ら起動すると，簡単なメニューが開かれま 

to 

1 : ALL screen load 

2 : PARTS screen load 

3 : screen し LS 

4 : QUIT 

それぞれの数字を押して選択してくださ 
い。1は表示画面いっぱいにロードします。 
3はグラフィック画面クリアで，4は中止 
です。そして2を押すと，原画を縮小して 
画面の一部にロードします。 

その前に「ロード位置」と「大きさ」を 
指定してやることになります。白い点が点 
減しているので，テンキーで動かして スぺ 
ースキーで決定してください。始点と終点 
を決めると，その矩形領域に画像をロード 
します。左上の数字は白い点の座標です。 

これを使えば複数のグラフィックを合成 
できますし，ゲームなどで使いやすい大き 
さに変換することもできます。 

具体的に例を挙げてぉきましよう。まず， 
KAME - DOS を起動します。 B ドライブに 
画像ディスタを入れて コマンド ライ ン から， 

XLOAD B ファイル名 . GL 3 -H 
とすると高解像度で立ち上がります。メニ 
ューから1を選んでください。全画面ロー 
ドが始まります。画面にゅっくり画像を表 
示していき，数分で完了してスペースキー 
入力侍ちになります。 

• XI 画像-> X 68000 ファイル 
書式： XSAVE ファイル名 
セーブは Z - BASIC 専用でして， 

320 X 200 4096色4512 X 512 65536色 
という変換を行います。具体例としては， 
まず，グラフィックを表示してぉいて， 

XSAVE B : ファイル名. GL 3 
で XSAVE を起動すると，そのままグラフ 


注） X 68000 のグラフィックデータファイルの作成 


參 GL 3 形式のデータファイルの作り方 

PIC 形式のグラフィックデータを GL 3 形式に 
してみましょう。まず BASIC を起動するのです 
が，そのときに本誌6月号の PIC . FNC を組み込 
みます。そして PIC ファイルを B ドライブに入 
れて， 

SCREEN 1，3, I，I 
PIC _ L 0 AD (” B :ファイル名”） 

とします。これで画面にロードできました。次 
に画面をセーブします。 B ドライブに空のディ 
スクをセットしてください。グラフィックを表 


示させたまま， 

IMG—SAVE (” B :ファイル名”） 

とします（このとき拡張子はいりません）。これで 
B ドライブに GL 3 形式のファイルが出来上がり 
ました。 

籲 GL 3 形式のファイルをロー ドする 

巳 ASIC を起動して， B ドライブにファイルの入 
つたディスクを入れて， 

SCREEN 1,3, I , I 

IMG _ L 0 AD (" B :ファイル名"） 

で，ロードできます。 


RRR BBBBB 

11 i 1 i i 

R R B B B B 



いような絵なら， 4096 色を使うことになる 
でしよう。用途にあわせて比較検討してみ 
てください。 

ビット切り捨て S カサ上げ 

X 68000 と Xlturbo でグラフィックを相 
互変換しようとすると画面の縦横比と色数 
という2段変換が必要となります。今回は 
X 68000 の 512 X 512 ドット65536色と Xltur 
boZ の 320 X 200 ドット4096色という固定画 
像を基本として， Xlturbo の640 X 400， 
640 X 200， 320 X 200 ドット8色モードまで 
サポートしています。 

•色の変換 

X 68000 の G - RAM はご存じのように垂 
直型です。画面上の1ドットは1ヮードで， 
GGGGG RRRRR BBBBB I 
というふうに RGB それぞれに5ビット，輝 
度に1ビット （5 X 3 +1=16ビット）と 
なるわけです。 

XlturboZ の G - RAM は水平型なので画 
面上の1ドットが1ビットに当たります。 
それが12枚重なって，2 12 = 4096色です。 
便宜的に垂直型のように書くと， 

GGGG RRRR BBBB 
となります。 

2つの G - RAM 構造を比べてみると「各 
RGB について1ビットずつ違う」というこ 
とがわかるでしよう。そこで， X 68000 — XI 
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turboZ のときは，「各 RGB 最下位ビットと 
輝度ビット切り捨て」， XlturboZ ^ X 68000 
のときは，「各 RGB 最下位ビットと輝度ビ 
ットは0」としました。これくらいの色数 
の変換なら，切り捨てをしても変化はほと 
んどわかりません。 

Xlturbo の8色のときは8月号での楽野式 
アルゴリズムを用いて一気に変換を行いま 
す。 

•縦横比変換 

X 68000 : 512 X 512 
XlturboZ : 320 X 200 
どちらも画面一杯に表示するとして横は 
512 : 320，縦512 : 200の比で変換します。 
このような拡大/縮小のアルゴリズムの 

図3間引き効果の説明 


I ②③4⑤⑥7⑧⑨10⑪⑫13⑭⑫哺ノ 



もっとも原始的なものは「間引きのアルゴ 
リズム」です。どういうものかというと， 
変換先と変換元の比を求めて必要なドット 
だけを取り出し，その他のドットは無視す 
るのです。無視されたドットは哀れこの世 
から抹殺されます0このアルゴリズムも拡 
大のときは抹殺ドットがないので使えます 
力す，縮小のときには使えません。 

そこで今回は， 

X 68000 -^XlturboZ 拡張•間引き 
XlturboZ -^ X 68000間引き 

のアルゴリズムを使うことにしました。 

図3を見てください。上には縮小のとき 
「間引く j とどのようになるのか？ を示 
しました。下には「拡張•間引き」の基本 


2 3 5 6 8 9 II 12 14 15 17 



このように，中の線は全部消え，上下の2本もとぎれとぎれの線になってしまう。 
そこで 


義 


(2， 4) しか表示しないのではなく， 
(2, 2) • ( I , 3) • ( I , 4) の情報を 
(2, 4) へ反映させる。 


-問題点- 


単色ならば 
(2, 2)0 R ( I , 3) 0 R ( l , 4)-(2, 4) 

ですむのだが,カラーのときは，変色してしまう。 



が残る 


的な考え方があります。つまり「ふつうの 
間引きでは無視されてしまうドット情報を 
表示するドットに持たせてやる」というも 
のです。こうすればラインがプチプチ切れ 
てしまうことがありません（ちなみに Z ’ 
sSTAFF - Z でやったときはプチプチ切れて 
しまった）。 

そして，そこで問題になってくるの力 ? 「ど 
うやって情報を持たせるか？」です。図の 
最後のほうに書いてあるように，すべての 
色情報を 「 OR 」 するのが簡単ですが，これ 
だとカラーの場合に色が変化します。 

たとえば，赤と青の点が並んでいると表 
示色はマゼンタになってしまいます。それ 
でいい場合もあるのですが，今回は採用し 
ませんでした。その代わり，「表示ドットを 
固定しない」方針でのぞみました。 

図4を見て〈ださい。表示色をどのよう 
に決定するかを示しました。まず色を背景 
色（ここでは カラーコード 0) と 表示色（背 
景色以外）に分けます。そして，「優先色は 
普通色より優先」「遠いドットより近いドッ 
卜優先」という優先順位をつけます。これ 
に従って，実際の表示色が決定されます。 
遠いドットから順にサーチされて，そのな 
かの ひとつの ドットの色が表示色となる の 
です。 

このアルゴリズムの意味は，「オーバーサ 
ンプリングされたドット内でもっとも目立 
ったドットを表示する」ことです。絵の印 
象は「絵の中のキーポイントで決定する」 
という仮定の下に構築されました。デジタ 
イズ画面が変換対象なので実はあまり関係 
ないのですが，こういう方法もあるという 
ことです。 


優先色 


図4拡張•間引きのアルゴリズム 

£b d p 6¢-- 


このプログラムをこのまま使うと優先色 
は黒（カラーコード〇)だけになってしま 
います。ほかの色を優先色にしたい場合に 
は & HB 31 E ，& HB 6 E 0 からの〇をワード単 
位で書き換えてください。この数字が背景 
色のカラーコード （ X 68000 のもの）になり 


① ：優先色かどうか判定される。優先色でないので間引く。 

② ：黒は優先色なので，保存される。 

③ ：ここも黒なので，②を捨てて③を保存する。 

④ ：優先色ではないので間引く。 

⑤ ：最終的に，③で保存された黒を表示することになる。 


ます。同時に3個まで指定できます。 

たとえば，背景を白（カラーコード& 
HFFFF ) で描いて輪郭を粗いラインで描 
いたグラフイックを転送するときは， 

FOR 1=0 TO 5 STEP 2 
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POKE & HB 31 E + I ,& HFF,&HFF 
POKE & HB 6 E 0 + I ,& HFF，&HFF 
NEXT 

のようにして優先色を白 1 色にしておきま 
しょ5 〇 

なお，これは X 68000— XlturboZ の場合 
だけで XlturboZ — X 68000 のときは必要あ 
りません。 

本* 氺 


X 68000 のオプシヨンですら備えていない 
ような機能が標準装備されています。それ 
を見捨ててしまうのはあまりにももった 
いないと思いませんか？ ちよっと語弊が 
あるかもしれません力 ? ， XlturboZ なら「安 
価なインテリジェントデジタイザ」として 
使ってもよいのではないかと思います。 

XI と X 68000。 同じ「 X 」の名を冠しなが 


を最大限に利用して現在の効用を最大にす 
ること」これが第1です。 

そして第2に，「8ビットは8ビットなり 
の，16ビットは16ビットなりの役割分担を 
させる」ことです。それぞれの機種の特性 
(値段も含めた）を生かした活動をし，互 
いに情報交換できれば2倍の効用が得られ 
るでしよう。たとえは' 「 MusicBASIC で作 
った音色を X 68000 で使いたい」といったと 


拡大/縮小アルゴリズムにはいろいろな 
バリエー シヨ ンがあるのでどれがいいとは 
一概にいえません。しかも， Z 80 に過重な負 
担をかけるようなアルゴリズムにもできな 
いので困りました。 


ら，2機種間の交流には通信回線などを必 
要としていました。 XI 時代に蓄えられた資 
産（データやプログラムのこと）は決して 
少なくありません。これらが古いフロッピ 
ーデイスタとともに闇に葬られていたので 


きも ファイル コピーー発でできます。「カラ 
ーイ メー ジユ ニッ トがないけど イメー ジ取 
り込みがしたい」場合， XlturboZ があれば 
それを生かすことができるわけです。 

XI のコマンドシエルシミュレータとし 


ただ， XlturboZ のグラフィックまわりに 


は資源の無駄です。そこでこの KAME - てだけでなく FD を介した データコンバー 


は量子化，モザイク，クロマキーなど， DOS の発想が生まれました。「過去の資源 卜機能も存分に活用して〈ださい。 

I リスト1 XL 0 AD . X 1 


1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
151() 
1520 
1530 
1540 
15 50 
1560 
1570 
1580 
1590 
1600 


•XLOAD.X1 Ver 1 . 1 By Kameda 

I 

DEFINT a-z:KLIST 0：CONSOLE 0,25 
DEFUSR1=m_opens : DEFUSR2=m_preop 
RESTORE 1050:FOR i=l TO 9~READ x(i),y(i) : NEXT 
DATA —8,8|0,8,8,8,—8|0 t 0,0,8|0,— 8,— 8j0,—8,8f-8 

I 

GOSUB "select":GOSUB "box” ： INIT:IF k=4 GOTO 1270 
IF mc=0 THEN PRW 255 ELSE GOSUB 1950 

POKE v_wfd0,PEEK(&HF8D6)：CLEAR &HB000：LOADM "X681.0BJ" 
iomm=PEEK(viomm) : badr$=MEM$(v_badr,2) ： ff$=MEM$(v_ff,2) 

MEM$(s_ff,2)=MKI$(&H2000) : MEM$(v_badr,2)=MKIS(&H3000) 
bsiz!=&H10*&H100 ： MEM$(v_bsiz,2)=MKI$(bsiz!) : POKE v_iomm,1 
POKE v_dn,PEEK(s_dn) : IF fe$(1)=""THEN "!2" 

» - ( MAIN ROUTINE ) - 

t 

GOSUB 1440 

K=PEEK( v_stop) : IF k=3 THEN "!3" ELSE IF k<>0 THEN _• !" 

IF PEEK( v_mac) <>2 THEN . ，！ 4" 

f$ = MEM$(v_fnam+13,3) : IF fSO”GL3.. AND f$<>”gl3" THEN M ! 4" 
MEM$(x681+&HlD,8)=MKI$(sx)+MKI$(sy)+MKI$(ex)+MKI$(ey) : POKE &HB025,HML 
} 

CALL m_devi : IF PEEK(v_stop) THEN 
CALL x681 

IF PEEK(v_iofg) GOTO 1210 
> 

CLS:INITrKLIST 0:GOSUB "ending" 

POKE v_iomm,iomm : MEM$(s_ff,2)=ff$ : MEM$(vbadr,2)=badr$ : CLEAR &HD000 
KLIST 1 : proces=proces-l : CHAIN process(proces) 

» - { SELECT ) - 

t 

LABEL •'select" 

mc=l : IF op$ = "-L" OR op$= ,, -l" GOTO 1410 
mc=0:IF op$="-M" OR op$="-m" GOTO 1370 
IF op$="-L8" OR op$="-18 M GOTO 1390 

x681=&HB000 : xr=640 ： yd=400 : c0=7:WIDTH 80,25,1,2：OPTIONSCREEN 4 : INIT 
HML=0：RETURN 

x681=&HB000:xr=64O:yd=200:c0=7:WIDTH 80,25,0,1：OPTIONSCREEN 4 : INIT 
HML=1:RETURN 

x681=&HBO00 ： \-r=3 20:yd=2O0:c0=7 :WIDTH 4 0,25,0,1: OPTIONSCREEN 4 : INIT 
HML=1:RETURN 

x681=&HB400:xr=320 ： yd=200:c0=4095：OPTIONSCREEN 4:WIDTH 40,25,0,1 
OPTIONSCREEN 5 : INIT ： HML=0rRETURN 
» - ( OPEN ) - 


POKE v_ddrv+ 1,7,1: POKE v_iof g , 0 : POKE s_escp,0 : fe$ = fe$( 1) 
POKE v_od,1 : d$=USR2(fe$) : fe$=RIGHT$(fe$,PEEK(v_yen)) 

IF PEEK(v_stop) RETURN 

POKE v_sbdr , 1 : POKE v_op, 0 ： d$=USRl( fe $) : RETURN 
» - ( END ) - 


LABEL "ending" 

CFLASH 1 : PRINT' ..PUSH SPACECFLASH 0 
REPEAT:A$=INKEY$:UNTIL A$= ” "：CLS 
RETURN 

» - ( ERROR ROUTINE ) - 


LABEL 

LABEL 

LABEL 


"14 ": RESTORE " m 3 ":GOTO 1610 
"!3 " : RESTORE " m 2 ":GOTO 1610 
"! 2'* : RESTORE " ml" : GOTO 1610 


LABEL 


: RESTORE ，. m 0” 
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1610 R 它 AD m$ ： BEHP ： CLS ： INIT:CREV l:PRINT m3； : CREV 0：PRINT 
1620 POKE v_atop,0:GOTO 1270 

1630 ， - { BOX ) - 

1640 » 

1650 LABEL "box" 

1660 s = 0 

1670 COLOR 3 : LOCATE 3,8:PRINT "push [1]-[4J or SPACE":COLOR 7 
1680 LOCATE 5,10: PRINT ..1:ALL screen load" 

1690 LOCATE 5,12：PRINT .. 2 : PARTS screen load" 

1700 LOCATE 5,14IPRINT " 3:screen CLS" 

171¢) LOCATE 5,16 ： PRINT ” 4 : QUIT" 

1720 REPEAT ： a$=INKEY$(1) ： k=VAL(a$) : UNTIL (l<=k AND k<=4) OR a$=SPACE$(1) : CLS 

1730 IF k=l THEN sx=0:sy=0:ex=xr ： ey=yd : RETURN 

1740 IF k=2 GOTO 1780 

1750 IF k=3 THEN CLS 0 : GOTO 1670 

1760 IF k=4 RETURN 

1770 IF aS=SPACES(1)AND s=0 THEN SCREEN ： s=1:GOTO 1670 ELSE INIT:s=0:GOTO 1670 
1780 1 

1790 INIT:x=0:y=O:GOSUB 1860：IF a$=CHR$(27) GOTO "box" 

1800 sx=x : sy=y : PSET (x,y,c0) 

1810 x=xr/2 : y=yd/2 : GOSUB 1860:ex=x : ey=y 

1820 x=sx:y=sy:LINE (x,y)-(x,y),XOR,cO:IF a$=CHR$(27) GOTO "box" 

1830 IF ex<sx THEN SWAP ex.sx 
1840 IF ey<sy THEN SWAP ey,sy 

1850 CLS:LINE (sx,sv)-(ex-1,ey-1),PSET,c0,b:RETURN 
1860 ' 

1870 LIKE (\,y)-(x,y),XOR,c0：LOCATE 0,0：PRINT "{x,y )="； 

1880 1 

1890 LOCATE 6,0:PRINTUSING "####",x,y ； : KEY0,"" 

1900 a$=INKEY$(0) : a=VAL(a$) : LINE (x,y)-(x,y),XOR,c0 

1910 w=x*+x(a) ： IF 0<=w AND w< =xr THEN x = w 

1920 w=v+y(a)：IF 0<=w AND w<=yd THEN y=w 

1930 IF a$=SPACE$(1) OB aS=CHRS(27) THEN KEY0, M RETURN 

1940 LINE (x,y)-(x,y),XOR,c0 : GOTO 1890 

1950 1 

1960 SCREEN 0,0,1：FOR i=l TO 7 : GOTO i,0 ： NEXT : RETURN 

1970 » - 1 DATA AREA ) - 

1980 LABEL "mO" ：DATA エラーが発生しました！！ 

1990 1 LABEL "mO"：DATA Error ! ! 

2000 LABEL "ml ••: DATA ファイル.ネームを指定してください 
2010 * LABEL "ml" ： DATA Need FILE-NAME 
2020 LABEL ， m2":DATA ファイル.ネームが連います 
2030 'LABEL "m2" : DATA FILE Not Found 

2040 LABEL •’m3”：DATA ファイルまたはディスクが違います 
2050 » LABEL "m3" : DATA FILE or DISK Error 


| リスト 2 XSAVE . X 1 


1000 'XSAVE.Xl Ver 1.0 By Kameda 

1010 * 

1020 OPTIONSCREEN 5 ： INIT:DEFINT a-z：KLIST 0 
1030 DEFUSRl=m_opens : DEFUSR2=m_preop 
1040 1 

1050 POKE v_wfd0,PEEK(4HF8D6) : CLEAR 4cHCO00 : LOADM "X168.OBJ" 
1060 ioram=PEEK(v_iomm) : badr$=MEM$(v_badr ,2) ： ff$=MEM$(v_ff,2) 
1070 NEM$(s_ff,2T=MKI$(&H6000) : MEMS(v_badr,2)=MKI$(&H7000) 

1080 bsiz!=&H10*&H100:MEMS(v_bsiz,2)=MKI$(bsiz!)：POKE 4 

1090 POKE v_dn,PEEK(s_dn) ： IF fe$(1) = ••*' THEN .. !2" 

1100 ' - < MAIN ROUTINE ) - 

1110 » 

1120 GOSUB 1340 ： xl68=&HC800：IF PEEK ( v_s top ) < > 0 THEN *' !" 

1130 IF PEEK(v_mac)<>2 THEN "!3.. 

1140 f$ = MEM$(v_fnam+13,3) ：IF fS<>”GL3 M AND f$0"gl3" THEN "!3" 
1150 ' 

1160 i=l：CLS 
1170 REPEAT 

1180 CALL xl68：LOCATE 0,0：PRINT i ； "/I28" 

1190 POKE v_od,2 : POKE v_iofg,2：POKE v_edr,0:CALL m_devi 
1200 i=L+l 

1210 UNTIL i=128 OR PEEK(v_stop) 

1220 IF PEEK( v_stop) THEN 
1230 CALL xl68 

1240 POKE v_od,2 : POKE v_iofg,2:POKE v_edr,2：CALL m_devi 
1250 IF PEEK(v_stop) THEN " ! 

1260 * 

1270 POKE v_zoku+l,0,0 ： MEM${v_fszi,4)=MKI$(&H0)+MKI$(&H8) 

1280 POKE v~od,2 : MEMS(v_badr,2)=MKI $(&H3000) : CALL m_saved：CLS 
1290 1 


1300 GOSUB "ending*:CLEAR &HD000 

1310 POKE v_iomra,iomm : MEMS(a_ff,2)=ff$:MEMS(v_badr,2)rbadrS 
1320 proces=proces-l : CHAIN process(proces) 

1330 1 - ( OPEN ) - 

1340 1 


1350 POKE v_ddrv+l,1,7:POKE v_iofg,0:POKE s_escp,0 ： fe$=fe$(1) 
1360 POKE v_od,2 ： dS=USR2(fe$) : fe$=RIGHT$(fei,PEEK(v_yen)) 

1370 IF PEEK(v_stop) RETURN 

1380 POKE v_sbdr,1 : POKE v op,3:d$=USRl(fe$) : RETURN 

1390 * - ( END ) - 

1400 » 

1410 LABEL "ending" 

1420 CFLASH 1：PRINT "PUSH SPACE"：CFLASH 0 
1430 REPEAT : a$=INKEY$ : UNTIL a$="" 

1440 RETURN 

1450 • - ( ERROR ROUTINE ) - 

1460 1 


1470 LABEL "!3RESTORE "m2"：GOTO 1500 
1480 LABEL "!2RESTORE "ml"：GOTO 1500 


1490 LABEL "!" : RESTORE H m0"：OUT &HFFC,PEEK(v_dn) 
1500 READ ro$:BEEP:CLS:CREV 1:PRINT m$ :: CREV 0：PRINT 
1510 POKE v_atop,0:GOTO 1290 
1520 ， - ( DATA AREA ) - 


1530 LABEL "n>0":DATA エラーが発生しました！！ 

1540 'LABEL "ml"：DATA Error !! 

1550 LABEL "ml":DATA ファイル . ネ-ムを指定してください 
1560 'LABEL "ml" ： DATA Need FILE-NAME 

1570 LABEL "m2": DATA ディスクまたはファイルが違います 
1580 » LABEL ：DATA DISK or FILE-NAME Error 


| リスト 3 X 681.0 BJ 


B000 

C3 

36 

BO 

00 

00 

00 

00 

00 

A9 

B008 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B010 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B018 

00 

00 

02 

00 

02 

00 

00 

00 

04 

B020 

00 

80 

02 

90 

01 

00 

00 

00 

13 

B028 

00 

00 

00 

00 

00 

00 

0 0 

00 

00 

BO30 

00 

〇〇 

00 

00 

00 

00 

El 

22 

03 

B038 

2F 

BO 

3A 

35 

B0 

B7 

C2 

38 

AF 

B040 

B1 

3E 

01 

32 

35 

B0 

21 

00 

28 

B048 

B8 

11 

01 

B8 

01 

FF 

0F 

AF 

40 

B050 

77 

ED 

B0 

21 

00 

00 

22 

2A 

81 

B058 

B0 

2A 

19 

BO 

ED 

5B 

15 

B0 

B0 

B06O 

B7 

ED 

52 

22 

0B 

B0 

2A 

IB 

18 

B068 

B0 

ED 

5B 

17 

B0 

B7 

ED 

52 

B5 

B070 

22 

0D 

B0 

2A 

21 

BO 

ED 

5B 

22 


B078 ID B0 B7 ED 52 22 0F B0 : A4 


SUM ： 28 63 CD D0 04 FA ID 5B 426C 

B080 B7 CB 1C CB ID CB 1C CB : 38 
B088 ID CB 1C CB ID 7D 32 2C : C7 
B090 B0 2A 23 B0 ED 5B IF B0 : C4 
B098 B7 ED 52 2211 B0 2A 17 : 1A 
BOA0 B0 22 05 B0 2A 0D B0 29 : 97 
BOAS ED 5B 11 B0 B7 ED 52 22 : 21 
BOBO13 B0 2A IF B0 22 09 B0 : 97 
B0B8 AF 32 34 B0 3A 14 B0 FE : Cl 
B0CO 80 D2 56 B12A 15 B0 22 : 6A 
B0C8 03 B0 2A 0B B0 29 ED 5B : 09 
B0D0 0F B0 B7 ED 52 44 4D 2A : 70 


B0D8 ID B0 22 07 B0 CD 05 B3 : 2B 
B0E0 AF 32 33 B0 2A 07 BO 29 : CE 
B0E811 00 CB 19 22 31 B0 3E : 36 
BOF0 7F B8 3812 CD 9D B12A : C6 
B0F8 0F BO 29 50 59 EB B7 ED : 20 


SUM ： 97 88 D9 72 5192 09 8F 1D5E 

B100 52 44 4D C3 EF BO 2A 0B : 7A 
B108 B0 29 09 44 4D 3A 33 BO : 90 
B110 2134 B0 B6 CC 8C B12A : EE 
B118 07 BO 23 22 07 BO ED 5B : FB 
B120 21 B0 B7 ED .52 DA E0 BO : 31 
B128 2A 2A B0 23 22 2A B0 11 : 34 
B130 04 00 B7 ED 52 CA 81 fil : F6 


, ►. 僕の友速に「 65536 色とスプライトと FM 音源とジョイスティックが標準装備のパソコン 

14 分 Oh! a1990.10. が，学校の勉強でど一しても必要なんだ」といって，何も知らない親に PRO を買ってもら 

ったとんでもないやつがいます。ちなみに学校では Pascal をやっています（笑)。皆さんも 
参考にしてください。 吉永孝明 （19) 福岡斟 
























B6O0 

B608 

B610 

B618 

B620 

B628 

B630 

B638 

B640 

B648 

B650 

B6S8 

BB60 

B668 

B670 

B678 


IF ED 78 
19 B6 01 
EF ED 79 
3A 34 B4 
04 C2 32 
13 ED 53 
67 CD 6B 
2C B411 
47 DD CB 
16 DD CB 
16 DD CB 
16 DD CB 
16 DD 19 
4D DD 2A 
3A 2B B4 
1617 DD 


SUM : E3 83 H3 60 D3 DC C0 IF 


FI 

09 

8F 

BE 

4C 

31 
C5 
58 
18 
7E 
86 
8E 
E4 

32 
1A 
C8 


SUM ： FB 78 96 F7 3147 64 A7 BBBE 


B680 

CB 

02 

16 

17 

DD 

CB 

04 

16 

BC 

B688 

17 

DD 

CB 

06 

16 

17 

DD 

CB 

9A 

B690 

08 

16 

17 

DD 

CB 

0A 

16 

17 

14 

B698 

DD 

CB 

OC 

16 

17 

DD 

CB 

0E 

97 

B6A0 

16 

17 

ED 

79 

03 

DD 

19 

25 

B1 

B6A8 

C2 

79 

B6 

El 

C9 

2A 

ID 

B4 

96 

B6B0 

ED 

5B 

09 

B4 

AF 

32 

F6 

FB 

D7 

B6B8 

06 

ID 

ED 

41 

CD 

0 7 

59 

06 

84 

B6C0 

IK 

ED 

41 

22 

25 

B4 

C9 

2 A 

3A 

B6C8 

29 

B4 

11 

00 

04 

CD 

27 

EO 

C6 

B6D0 

ED 

5B 

03 

n-i 

EB 

29 

19 

ED 

19 

B6D8 

5B 

A4 

EO 

19 

22 

27 

B4 

C9 

BE 

B6E0 

00 

00 

00 

00 

00 

00 



00 

SUM ： 

21 

68 

D2 

4E 

53 

DA 

04 

AO 68AA 


C980 

1C 

CB 

ID 

06 

04 

CB 

1A 

CB 

BE 

C988 

1C 

CB 

ID 

10 

FH 

22 

25 

C8 

IB 

C990 

3A 

2C 

C8 

rfi 

40 

32 

2C 

C8 

5A 

C998 

20 

DE 

Cl 

C9 

n) 

OD 

CA 

16 

42 

C9A0 

00 

CD 

HA 

C9 

01 

D0 

IF 

ED 

2D 

C9A8 

78 

F6 

10 

ED 

79 

CD 

BA 

C9 

34 

C9B0 

01 

DO 

IF 

ED 

78 

E6 

EF 

ED 

17 

C9B8 

79 

C9 

E5 

CD 

C7 

C9 

01 

00 

85 

C9C0 

04 

09 

CD 

C7 

C9 

El 

C9 

4D 

61 

C9C8 

44 

ED 

78 

A3 

28 

0 4 

37 

CB 

7A 

C9D0 

12 

C9 

B7 

CB 

12 

C9 

2A 

03 

65 

C9D8 

C8 

ED 

5B 

05 

C8 

AF 

32 

F6 

B4 

C9E0 

FB 

06 

ID 

ED 

41 

CD 

07 

59 

79 

C9E8 

OG 

IE 

ED 

41 

22 

27 

C8 

7A 

DD 

C9F0 

32 

2B 

C8 

C9 

2A 

2E 

C8 

11 

IF 

C9F8 

00 

04 

CD 

27 

E0 

ED 

5B 

07 

27 

SUM ： 

D9 

FB 

87 

6D 

FA 

E4 

4C 

10 034B 

CAO0 

C8 

EB 

29 

19 

ED 

5B 

A4 

E0 

Cl 

CA08 

19 

22 

29 

C8 

C9 

3A 

2C 

C8 

23 

CA10 

2A 

27 

C8 

84 

67 

3A 

2B 

C8 

31 

CA18 

5F 

C9 







28 

SUM ： 

6A 

FD 

1A 

65 

ID 

CF 

FB 

70 BD3E 


INTEGRAL XI 145 


B508 52 C2 CE B4 2A 29 B4 23 : C0 
B510 22 29 B411 04 00 B7 ED : B8 
B518 52 CA 65 B5 2A 05 B4 23 : 3C 
B520 22 05 B4 2A 11 B4 29 ED : E0 
B528 5B 13 B4 EB B7 ED 52 22 : 25 
B530 13 B4 3E 0132 33 B4 C3 : E2 
B538 AA B4 2A 0D B4 29 ED 5B : BA 
B540 13 B419 2213 B4 CD D4 : 6A 
B548 B5 2A 09 B4 23 22 09 B4 : 9E 
B550 ED 5B 23 B4 B7 ED 52 C2 : D7 
B558 A6 B4 21 00 00 2213 B4 : 64 
B560 2A 2E B4 E5 C9 2100 00 : DB 
B568 22 29 B4 2A 2E B4 E5 C9 : B9 
B570 C5 DD 2A 30 B4 2A 27 B4 : B5 
B578 CD 12 E0 47 23 CD 12 E0 : E8 


SUM ： 40 1C 7C 08 E2 90 4B A8 BBF4 

B580 4F 23 22 27 B4 3A 33 B4 : 90 
B588 B7 C2 A0 B5 3A 32 B4 B7 : A5 
B590 C2 A0 B5 DD 70 00 DD 71 : B2 
B598 013C 32 32 B4 C3 D2 B5 : 9F 
B5A0 DD 66 00 DD 6E 01 B7 ED : 33 
B5A8 42 28 27 09 EB FD 21 E0 : 83 
B5B0 B6 3E 03 FD 6E 00 FD 66 : C5 
B5B8 01 B7 ED 52 281419 B7 : 03 
B5C0 ED 42 28 08 FD 23 FD 23 : 9F 
B5C8 3D C2 B3 B5 DD 70 00 DD : 91 
B5D0 7101 Cl C9 AF 32 34 B4 : C5 
B5D8 2A ID B4 29 01 00 CD 09 : FB 
B5E0 22 2C B4 CD AD B6 3E C0 : 30 
B5E8 CD FB B5 CD 3B B6 3E 80 : F9 
B5F0 CD FB B5 CD 3B B6 3E 40 : B9 
B5F8 C3 FB B5 2A 25 B4 84 67 : 61 


B138 

B140 

B148 

B150 

R158 

B160 

B168 

B170 

B178 


2A 05 
11 BO 
E7 ED 
32 34 
B0 29 
13 B0 
23 22 
B7 ED 
00 22 


B0 23 
29 ED 
52 22 
B0 C3 
ED 5B 
CD FB 
09 B0 
52 DA 
13 B0 


22 05 
5B 13 
13 B0 
BC B0 
13 B0 
B12A 
ED 5B 
B8 BO 
2A 2F 


B0 2A 
B0 EB 
3E 01 
2A 0D 
19 22 
09 B0 
23 BO 
21 00 
B0 E5 


03 

EO 

1A 

7C 

IF 

IF 

19 

59 

D3 


SUM ： 3A OB *4A 61 B4 80 EA 3C 8A57 


B180 

B188 

B190 

B198 

B1A0 

BIAS 

B1B0 

B1B8 

B1C0 

B1C8 

B1D0 

B1D8 

B1E0 

B1E8 

B1F0 

B1F8 


C9 21 
2F B0 
DD 7E 
FF DD 
31 BO 
47 23 
28 B0 
B13A 
3C 32 
66 00 
28 27 
3E 03 
B7 ED 
42 28 
C2 DA 
01 Cl 


QO 00 
E5 C9 
FE DD 
77 01 
2A 28 
CD 12 
3A 34 
33 BO 
33 BO 
DD 6E 
09 EB 
FD 6E 
52 28 
08 FD 
B1 DD 
C9 2A 


22 2 A 
DD 2A 
77 00 
C9 C5 
B0 CD 
E0 4F 
BO B7 
B7 C2 
C3 F3 
01 B7 
FD 21 
00 FD 
1419 

23 FD 
70 00 
ID B0 


BO 2A 
31 B0 
DD 7E 
DD 2A 
12 EO 
23 22 
C2 C7 
C7 B1 
B1 DD 
ED 42 
IE B3 
66 01 
B7 ED 
23 3D 
DD 71 
29 01 


10 

75 

08 

E9 

A2 

BD 

36 

BF 

95 

98 

32 

10 

EF 

EF 

E8 

AC 


SUM ： E9 F5 A8 68 BB 3C 5B 6B B9BB 


B200 

B208 

B210 

B218 

B220 

B228 

B230 

B238 

B240 

B248 

B250 

B258 

B260 

B268 

B270 

B278 


00 CB 
B2 FD 
C0 ED 
19 01 
ED 79 
14 DD 
El3A 
78 F6 
4C B2 
40 C3 
80 *17 
5F DD 
IE 00 
CB 13 
62 B2 
5D B2 


09 22 
21 01 
5B ID 
DO IF 
3A 09 
E5 FD 
25 BO 
10 ED 
3E 80 
4C B2 
2A 2D 
E5 FD 
CD 86 
DD 23 
ED 59 
FD El 


2D B0 
B8 DD 
BO DD 
ED 78 
BO E6 
E5 DD 
B7 20 
79 3E 
CD 4C 
ED 4B 
BO 3A 
E5 D5 
B2 CD 
FD 23 
03 D1 
DD El 


CD EB 
21 01 
19 FD 
E6 EF 
0128 
El FD 
06 ED 
C0 CD 
B2 3E 
26 BO 
2C BO 
16 08 
AF B2 
15 C2 
ID C2 
1182 


8B 

88 

C8 

43 

68 

73 

BA 

AF 

C5 

OF 

E4 

F6 

51 

D5 

0D 

3E 


SUM ： F8 4C 1)6 4125 4B Al15 5F47 


B280 

B288 

B290 

B298 

B2A0 

B2A8 

B2B0 

R2B8 

B2C0 

B2C8 

B2D0 

B2D8 

B2E0 

B2E8 

B2F0 

B2F8 


02 FD 
80 38 
23 23 
7E 23 
CB 18 
7E 23 
86 00 
03 D6 
FI C9 
CB 3F 
07 DD 
7D 87 
7D 87 
01 El 
09 BO 
ED 41 


19 DD 
1C FE 
E6 F8 
CB 18 
IF E6 
E6 3E 
38 05 
F8 37 
E5 67 
6F DD 
86 00 
DD 86 
87 FD 
C9 2A 
AF 32 
CD 07 


19 C9 
C0 38 
C9 C5 
IF CB 
F8 Cl 
07 07 
FE F8 
F5 CD 
CB 3F 
77 01 

85 DD 
FF DD 

86 01 
ID BO 
F6 FB 
59 06 


78 FE 
06 7E 
46 23 
18IF 
C9 23 
C9 FD 
3F 30 
C2 B2 
CB 3F 
7C E6 
77 00 
7 7 FF 
FD 77 
ED 5B 
06ID 
IE ED 


4D 

4E 

IB 

A5 

8D 

99 

28 

3E 

1A 

30 

43 

B9 

83 

EA 

AE 

6C 


SUM ： A9 519E 75 6B CA B2 C0 C53F 

B3O0 4122 26 B0 C9 2A 2A B0 : 06 
B30811 00 04 CD 27 E0 ED 5B : 31 
B310 03 BO EB 2919 ED 5B A4 : CC 
B318 EO19 22 28 BO C9 00 00 : BC 


■ J スト 4 X 168.0 BJ 


C800 C3 
C808 00 
C810 00 
C818 00 
0820 00 
0828 00 
C830 00 
C838 C8 
C840 00 
C848 5B 
C850 C8 
0858 B7 
0860 C8 
C868 22 
C870 IF 
C878 2A 


32 C8 
00 00 
00 00 
40 01 
00 02 
00 00 
00 El 
7C B5 
22 2E 
15 C8 
2A IB 
ED 52 
ED 5B 
OF C8 
C8 B7 
17 C8 


00 00 
09 00 
00 00 
C8 00 
00 02 
00 00 
22 30 
C2 2B 
C8 2A 
B7 ED 
C8 ED 
22 0D 
ID C8 
2A 23 
ED 52 
22 05 


00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
C8 2A 
C9 21 
19 C8 
52 22 
5B 17 
C8 2A 
B7 ED 
C8 ED 
2211 
C8 2A 


BD 

00 

00 

09 

04 

00 

38 

D0 

10 

5B 

FC 

38 

EB 

56 

D8 

2F 


SUM: 9817 66 6B B0 88 8B 76 8B88 


C880 C8 
C888 52 
C890 09 
C898 2A 
C8A0 B7 
C8A8 22 
C8B0 C9 
C8B8 ED 
C8C0 22 


29 ED 5B 
2213 C8 
C8 2A 15 
OB C8 29 
ED 52 44 
07 C8 CD 
CD 52 C9 
42 3816 
03 C8 2A 


11 C8 B7 
2A IF C8 
C8 22 03 
ED 5B OF 
4D 2A ID 
F4 C9 CD 
21 00 80 
2A 03 C8 
0F C8 29 


B6 

82 

C5 

45 

96 

B1 

09 

95 

67 


B320 

00 

00 

00 

00 

08 

66 

0D 

DC 


57 

B328 

11 

50 

16 

C3 

1A 

3 3 

IF 

Al 


47 

B330 

2 3 

0C 

28 

75 

2C 

D9 

30 

3A 


3B 

B338 

as 

97 

39 

EF 

3D 

42 

42 

91 


46 

B340 

46 

D9 

4A 

1C 

4F 

59 

53 

8F 


OF 

B348 

57 

BE 

5B 

E7 

5F 

07 

64 

20 


41 

B350 

68 

2F 

6C 

39 

70 

39 

74 

3 0 


89 

B358 

78 

ID 

7C 

00 

80 

DA 

83 

A9 


97 

B360 

87 

6E 

8B 

28 

8F 

D6 

92 

7 9 


18 

B368 

96 

11 

9A 

9C 

9D 

IB 

A 1 

8E 


C4 

B370 

A4 

F4 

A7 

4C 

AB 

98 

AE 

F0 


6C 

B378 

B1 

8B 

B5 

40 

B8 

50 

BB 

3F 


33 

SUM ： 

8D 

BF 

BC 

81 

71 

C0 

5A 

B5 

E049 

B380 

BE 

35 

Cl 

1C 

C4 

F3 

C6 

BB 


08 

B388 

C9 

74 

CC 

1C 

CF 

B4 

D1 

3C 


B5 

B390 

D4 

B3 

D6 

1A 

D9 

70 

DB 

B4 


4F 

B398 

DD 

40 

DF 

EO 

El 

97 

E4 

IB 


53 

B3A0 

E6 

04 

E8 

DE 

E9 

A7 

EB 

5C 


87 

B3A8 

ED 

FF 

EE 

90 

F0 

OE 

F2 

79 


D3 

B3B0 

F3 

D1 

F4 

16 

F6 

47 

F7 

66 


68 

B3B8 

F8 

71 

F9 

68 

FA 

4C 

FB 

ID 


28 

B3C0 

FC 

D9 

FC 

83 

FD 

18 

FE 

99 


00 

B3C8 

FE 

07 

FF 

61 

FF 

A7 

FF 

D8 


E2 

B3D0 

FF 

F6 

FF 

00 

00 

3E 

01 

32 


65 

B3D8 

53 

FE 

21 

FF 

FF 

22 

54 

FE 


E4 

B3E0 

2A 

5D 

FE 

22 

03 

FF 

22 

05 


DO 

B3E8 

FF 

21 

00 

00 

22 

07 

FF 

ED 


35 

B3F0 

5B 

63 

FE 

AF 

CB 

7A 

28 

07 


DF 

B3F8 

3C 

21 

00 

00 

ED 

52 

EB 

: 


B9 

SUM ： 

02 

B7 

1C 

D2 

EE 

E7 

AB 

EA 

6321) 

B4O0 

C3 

35 

B4 

00 

00 

00 

00 

00 


AC 

B408 

00 

00 

00 

00 

00 

00 

00 

00 


00 

B410 

00 

00 

00 

00 

00 

00 

00 

00 


00 

B418 

00 

00 

02 

00 

02 

00 

00 

00 


04 

B420 

00 

40 

01 

C8 

00 

00 

00 

00 


09 

B428 

00 

00 

00 

00 

0 0 

00 

00 

00 


00 

B430 

00 

00 

00 

00 

00 

El 

:::こ 

2K 


31 

B438 

B4 

2A 

13 

H4 

7C 

B5 

C2 

1C 


B4 

B440 

B5 

21 

00 

on 

22 

29 

B4 

•Ik 


FF 

B448 

19 

B4 

ED 

5B 

15 

B4 

B7 

ED 


82 

B450 

52 

22 

OB 

B4 

2A 

IB 

B4 

ED 


19 

B458 

5B 

17 

B4 

B7 

ED 

52 

22 

0D 


4B 

B460 

B4 

2A 

21 

B4 

ED 

5B 

ID 

B4 


CC 

B468 

B7 

ED 

52 

22 

OF 

B4 

B7 

CB 


5D 

B470 

1C 

CB 

ID 

CB 

1C 

CB 

ID 

CB 


9E 

B478 

1C 

CB 

ID 

7D 

32 

2B 

B4 

2A 


BC 

SUM ： 

95 

5A 

23 

60 

16 

E5 

CA 

CF 

699B 

B480 

23 

B4 

ED 

5B 

IF 

B4 

B7 

ED 


96 

B488 

52 

22 

11 

B4 

2A 

17 

B4 

22 


50 

B490 

05 

B4 

2A 

OD 

B4 

29 

ED 

5B 


15 

B498 

11 

B4 

B7 

ED 

52 

22 

13 

B4 


A4 

B4A0 

2A 

IF 

B4 

22 

09 

B4 

AF 

32 


BD 

B4A8 

33 

B4 

3A 

14 

B4 

FE 

80 

D2 


39 

B4B0 

3A 

B5 

2A 

15 

B4 

22 

03 

B4 


BB 

B4B8 

2A 

OB 

B4 

29 

ED 

5B 

0F 

B4 


ID 

B4C0 

B7 

ED 

52 

44 

4D 

2A 

ID 

B4 


82 

B'1C8 

22 

07 

B4 

CD 

C7 

B6 

AF 

32 


08 

B4D0 

32 

B4 

2A 

07 

B4 

29 

11 

00 


05 

B4D8 

CD 

19 

22 

30 

B4 

3E 

7F 

B8 


61 

B4E0 

38 

12 

CD 

70 

B5 

2A 

OF 

B4 


29 

B4E8 

29 

50 

59 

EB 

B7 

ED 

52 

44 


F7 

B4F0 

4D 

C3 

DD 

B4 

2A 

0B 

B4 

29 


B3 

B4FR 

B9 

44 

4D 

2A 

07 

B4 

23 

22 


C4 

SUM ： 

DB 

FB 

4D 

FE 

C6 

62 

40 

6B 

CB36 

B500 

07 

B4 

ED 

5B 

21 

B4 

B7 

ED 


: 7C 

C8C8 

59 

EB 

B7 

ED 

52 

44 

4D 

C3 


8E 

C8D0 

B4 

C8 

2A 

0B 

C8 

29 

09 

44 


EF 

C8D8 

4D 

2A 

07 

C8 

23 

22 

07 

C8 


5A 

C8E0 

ED 

5B 

21 

C8 

B7 

ED 

52 

C2 


E9 

C8E8 

AE 

C8 

2A 

13 

C8 

11 

00 

80 


OC 

C8F0 

B7 

ED 

52 

D2 

OF 

C9 

2A 

05 


CF 

C8F8 

C8 

23 

22 

05 

C8 

2A 

11 

C8 


DD 

SUM ： 

72 

34 

05 

ED 

IE 

A2 

D6 

D8 

9B23 

C900 

29 

ED 

5B 

13 

C8 

EB 

B7 

ED 


DB 

C908 

52 

22 

13 

C8 

C3 

EA 

C8 

2A 


HE 

C910 

0D 

C8 

29 

ED 

5B 

13 

C8 

19 


3A 

C918 

22 

13 

C8 

2A 

2E 

CB 

23 

22 


62 

C920 

2E 

C8 

11 

04 

00 

B7 

ED 

52 


01 

C928 

CA 

47 

C9 

2A 

09 

C8 

23 

22 


1A 

0930 

09 

C8 

ED 

5B 

23 

C8 

B7 

ED 


A8 

C938 

52 

C2 

92 

C8 

21 

00 

00 

22 


B1 

C940 

13 

C8 

2A 

30 

C8 

E5 

C9 

21 


CC 

C948 

00 

00 

22 

2E 

C8 

2A 

30 

C8 


3A 

C950 

E5 

C9 

ED 

5H 

29 

C8 

3A 

26 


47 

C958 

C8 

CD 

18 

E0 

13 

3A 

25 

C8 


C7 

C960 

CD 

18 

E0 

13 

ED 

53 

29 

C8 


09 

0968 

C9 

C5 

CD 

D6 

C9 

21 

00 

0 0 


IB 

C970 

22 

25 

C8 

3E 

40 

32 

2C 

C8 


B3 

C978 

CD 

9C 

C9 

2A 

25 

C8 

B7 

CB 


CB 

SUM ： 

42 

7F 

47 

2D 

48 

76 

95 

07 

43E9 


►ラス I 


、ルマゲ、ドンは 7 枚組だったが.. 


( XI 版 T & T について）。 

渡辺光（18> 北海道 


0D66E44A426AE40G 

DCEBFBO2B0^004OO 

198B4C6DBBBBB5 0B 
0776B2CD2CCCCE1C 

6DDD4BC9ADDDD91D 

BEEC357C3DDDDC1D 

90F52D 4106666 C4F 
11 1E3EBE 01111 DBA 

D609C6C 60048 COC7 
CFDC3B2B1 0000126 







































リスト 5 X 68000—XlturboZ ソースリスト 


XYADR^ : IN XF.YF OUT ADR2 
LD Hi., (YB) 

LD DK,1024 ； 312t2 

CALL tHLTHD 
LD DE,(XF) 

EX DE.HL 
ADD HL,HL 

ADD HL t DE ;Y 拿 512 拿 2+X 省 2 
LI) DE, ( «BAr)R) 

ADD HL.DH • 

LD (ADR2)»HL 
RET 


；PRW DATA 

YISEN 
DW 0,0.0 


X68K Q-DATA - >XlturboZ 0-DATA 
Ver 1.1 

FOR S-OS HEDA 


EQU SCDO0 


B413 00 00 
B415 

B415 00 00 
B417 00 00 
B419 00 02 
B4IB 00 02 
B4ID 00 00 
B41F 00 00 
B42140 01 
B423 C8 00 
B425 

B425 00 00 
B427 00 00 
B429 00 00 
B42B 00 
B42C 00 00 
B42E 00 00 
B430 00 00 
B432 00 
B133 00 
B434 00 
8435 
B4 ： i5 
B435 
B435 HI 
B436 22 
R439 
B43C 7C 
B43D B5 
B43E C2 
B44121 
BI44 22 
B447 2A 
B44A £D 
B44E B7 
B44F ED 
H45122 
B454 2A 
B45? ED 
B45B BT 
B45C ED 
B45E 22 
B461 
B4612A 
B464 ED 
B468 B? 
B4€9 ED 
B46B 22 
H46H B7 
B46F CB 
B471 CB 
BI73 CB 
8475 CB 
8177 CB 
B479 CB 
B47B 7D 
B4TC 32 
B47F 
B47F 2A 
B482 ED 
B486 B7 
B487 ED 
13489 22 
B48C 
B4BC 2A 
B48F 22* 
B492 2A 
B495 29 
8496 ED 
B49A B7 
B49B ED 
B49D 22 
B4A0 
B4A0 2A 
B4A3 22 
B4A6 
B4A6 AF 
B4A7 32 
B4AA 
B4AA 3A 
B4AD FE 
B4AF D2 
B4B2 2A 
B4B5 22 
B4B8 2A 
B4BB 29 
D4BC ED 
B4C0 B7 
B4C1 HD 
B4C3 44 
B4C4 4U 
B4C5 2A 
B4C8 22 
B4CB CO 
B4CE 
B4CE AF 
B4CF 32 
R4D2 2A 
M4D5 29 
B4DH 11 
B4D919 
B40A 22 
B4DD 
B4DD 3E 
B4DF B8 
B4E0 38 
B4E2 CD 
B4H5 2A 
B4E8 29 
B4E9 50 
B4EA 59 
B4EB EB 


17 B4 
05 B4 
OD B4 


14 B4 
80 

DA B5 

15 BA 
03 B4 
OB B4 


ID B4 
07 B4 
C7 BB 


00 CD 
30 U4 


#SCRNM2 EQU $FBF6 
tGRAADR EQU $5907 
#DEV1 EQU SD0OC 
EQU 8E012 
EQU SE027 
EQU SE08C 
EQU 9E09C 
HQU $E0A4 


#LDAHL 

#MLTHD 

#STOP 

»IOFG 

fBADR 


1C B5 
00 00 
29 BA 
19 B4 
5B 15 B4 

52 

OB B4 
IB B4 
5B 丨 7 B 4 


JP BEGIN 


DW 0 
DW 0 
DW 0 
DW 0 
DW 0 
DW 0 
DW 0 
DW 0 
DW 6 


DW 0 
DW 0 
DW 512 
DW 512 
DW 0 
DW 0 
DW 320 
DW 200 


DXF 

DYF 

DXT 

DVT 


XF1 

YFI 

XF2 

VF2 

XT1 

YT1 

XT2 

YT2 


ADR DW 0 
ADR2 DW 0 
YB DW 0 
DXT2 DB 0 
DXT3 DW 0 
RADR DW 0 
DTCC DW 0 
HFLG DB 0 
VFLQ DB 0 
NF16 DB 0 


BEGIN 
POP HL 
LD (RADR),HL 
LD HL,<EY) 

LD A,H 
OR L 

JP NZ.ENTER 
LD HL,0 
ID (YB! ( HL 
LD HL.IXF2) 
LD DE, 丨 \F い 
OR A 

SBC HL.DE 
LD (DXF),HL 
LD HL,(YF2) 
LD DH.tYFl) 
OR A 

SBC HL.DE 
LD (OVF),HL 

LD HL.IXT2) 
LD DE,(XT1) 
OR A 

SBC HL.DE 
LD (DXT),HL 
OR A 


LD A,L 
LD (DXT2),A 

LD HL,(YT2) 

LD DE^YTl) 

OR A 

SBC HL.DE 
LD (DYT),HL 

LD HL,(YF1) 

LD (YF),HL 
LD HL,(DYF) 

ADD HL f HL 
LD DE,(DYT) 

OR A 

SBC HL.DE 
LD (EV),HL 

LD HL,(YT1) 

LD (VT),HL 
YLP 

XOR A 

LD (VFLQ),A 
WHILH2 

LD A f (EY+t) 

CP $80 
JP NC.WKND2 
LD HL t (XF!) 

LD (XF) t HL 
LD HL,(DXF) 

ADD HL,HL 
LD DE.(DXT) 

OR A 

SBC HL.DE 
LD B ， H ； 

LD C,L ;BC:EX 
LD HL,(XTi) 

LD (XT),HL 
CALL XVADR2 

XLP 

XOR A 

LD (HFLG) f A 
LD HL,(XT) 

ADD HL,HL 
LD DE,#CC 
ADD HL,DE 
LD <DTCC),HL 
WHILE! 

LD A,$7F 
CP B 

JR C.WENDl 
CALL POINT 
LD HL,(DXTJ 
ADD HL,HL 
LD D,B 
LD E,C 
EX OE.HL 


B4EC B7 
B4ED ED 52 
B4EF 44 
B4F0 4D 
Q4P1 C3 DD B4 
D4F4 

B4F4 2A OB BA 

B4F7 29 

B4F8 09 

B4F9 44 

B4FA 4D 

B4FB 2A 07 B4 

B4FE 23 

B4FF 22 07 B4 

B502 ED 5B 21 B4 

B506 B7 

B507 ED 52 

B509 C2 CE B4 

B50C 

B50C 2^ 29 B1 
Bf>OF 23 

22 29 94 

n 04 oo 


6 B7 


B51C 2A 05 B4 
B51F 23 
B520 22 05 B4 
B523 2A 11 B4 
D526 29 

B527 HD 5B 13 B4 
B52B EB 
B52C B7 
B52D ED 52 
B52K 2213 B4 
0532 3E 01 
8534 32 33 B4 
8537 C3 AA B4 
B53A 

B53A 2A OD B-1 
B53D 29 

B53E ED 5B 13 B4 
B54219 
8543 2213 B4 
B546 CD D4 B5 
8549 2A 09 B4 
B54C 23 
B54D 22 09 B4 
B550 ED 5B 23 H4 
B554 B7 
B555 ED 52 
B557 C2 A6 B4 
B55A 2100 00 
B55D 2213 B4 
B560 2A 2H H4 
B563 E5 

8564 C9 
B5B5 

8565 
B565 

8565 2100 00 

B56B 22 29 B4 

B56B 2A 2t B4 

B5BK £5 

H56K C9 

B570 

B570 

8570 

B570 

0570 

B570 

B570 C5 

B571 DD 2A 30 B4 

B575 2A 27 BA 

B578 CD 12 EO 

B57B 47 

H67C 23 

B57D CD 12 EO 

8580 4F 

BS8123 

B5H2 22 27 H4 

B585 3A 33 B4 

B588 B7 

B589 C2 Ad B5 

B58C 3A 32 B4 

B58F B7 

B590 C2 AO B5 

B593 DD 70 00 

B596 DD 71 01 

B599 3C 

B59A 32 32 B4 

B59D C3 D2 B5 

B5A0 

B5A0 

B5A0 DD 66 00 
B5A3 DD 6E 01 
B5A6 B7 
B5A7 ED 42 
B5A9 28 27 
D5AB 09 
B5AC EB 

BSAD FD 21 EO B6 
B5B13E 03 
B5B3 

B5B3 FD 6E 00 
B5B6 FD 66 01 
B5B9 B7 . 

B5BA ED 52 
B5BC 
B5BE 
B5BF 
B5C0 
B5C2 
B5C4 
B5C6 
B5C8 
B6C9 
B5CC 
D5CC 
B5CC 
B5CF 
B5D2 
B5D2 
B5D3 
B5D4 
B5D4 
B5D4 
B5D4 
B5D4 
B5D4 
D5D4 
B5D5 
B5D8 
B5DB 
B5DC 
B5DF 
B5E0 
B3E3 
R5E6 


19 

B7 

ED 42 
28 08 
PD 23 
FD 23 
3D 


220 

221 

222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 
2n2 

253 

254 

255 

256 

257 

258 

259 

260 
261 
262 

263 

264 

265 

266 

267 

268 

269 

270 

271 

272 

273 

274 

275 

276 

277 

278 

279 

280 
281 
282 


LD HL f (DXF) 
ADD HL V HL 
ADD HL,BC 
LD B,H 
LD C,L 
LD HL,(XT) 

INC HL 
LD (XT),HL 
LD DE,(XT2) 
OR A 

SBC HLtDE 
JP N2, XLP 

LD HL,(YB) 

INC HL 
LD (YB),HL 
LD DE f 4 
OR A 

SBC HL.DE 
JP Z.EXIT 

ENTER 

LD HL,(YF) 

INC HL 
LD (YF),HL 
LD HL,(DVTi 
ADD HL.HL 
LD DE,(EY) 

EX DE,HL 
OR A 

SBC HL,DE 
LD (EV) ,Hl. 

LD A,1 
LD (VFLG) t A 
JP WHILES 

WEND2 

LD HL,(DYF) 

ADD 

LD DE v (EV) 

ADD HL.DE 
LD (EY) f HL 
CALL PSET 
LD HL,(VT) 

INC HL 
LD (VT),HL 
LD DE,(YT2) 

OR A 

SBC H1‘，DE 
JP N2, YLP 
LD HL.O 
LD (EY),HL 
LD HL,(RADR} 

PUSH HL 
RET 


EXIT 
LD HL,0 
LO (YBl,HL 
LD HL,(RADR) 
PUSH HL 
RET 


X6BK DATA(65536) 

OUT:CC(XT40 t 1) 
POINT 
PUSH BC 
LD IX,(DTCC) 

LD HL,(ADR2) 

CALL tLDAHL 
LD B t A 
INC HL 
CALL tLDAHL 
LD C 9 A 
INC HL 

LD (ADR2),HL 
LD A,(VFLC) 

OR A 

JP N2.PSKIP 
LD A,(HFLG) 

OR A 

JP NZ.PSKIP 
LD (IX+O),B 
LD (IX+1 し C 
INC A 

LD (HFLG),A 
JP OCOL 
PSKIP 

LD H,(IXfO) : 

LD L,(IX+i )； 

OR A ； 

SBC HL.BC ； 

JR Z.OCOL ; 

ADD HL.BC ； 

EX DE.HL : 

LD IY.YUSEN ；BC 
LD A，3 ；A 

PRELP 

LD t,(IY+O) ；HL 
LD H, ( mi > 

OR A 

SBC HL.DE 
JH 2,OCOL 
ADD HL.DE 
OR A 

SBC HL.BC 
JR Z.KCOL 
INC TY 
INC IY 
DEC A 

•IP NZ, PREl-P 
NCOL 

LD (IX+OJ,B 
LD 11X4 n v c 
OCOL 
POP BC 
RET 


FOR XTr.XTl TO XT2 
PSET<XT,YTJ,CC(XT) 

NEXT 
PSET 
XOR A 

LD (NF16) f A 
LD HL,(XTI) 

ADD IIL V HL 
LD BC,#CC 

ADD HL.BC ； HL=CCt\Tl#2 
LD (DXT3),HL 
CALL XYADR 


D5E6 

B5E8 

B5EB 

B5EE 

B5F0 

B5F3 

B5F6 

B5F8 

B5FB 

B5FB 

D5FB 

B5FB 

B5FB 

B5FB 

B5FB 

B5FE 

B5FF 

B600 

B803 

B606 

RB08 

B60A 

B60C 

B60F 

B6 

B6 


B6 

B6 

B620 
B621 
H624 
8626 
B629 
B62D 
B62E 
B632 
B632 
B633 
B635 
B636 
B639 
B63A 
B63B 
B63B 
B63B 
B63B 
B63F 
B642 
B645 
B646 
B646 
B64A 
B64E 
B652 
B656 
B65A 
B65E 
8662 
B666 
B668 
B66A 
B66B 
B66B 
B663 
B66B 
B66C 
BB6D 
B66E 
B672 
B675 
BS78 
B679 
B679 
B67A 
B67E 
B67F 
B683 
B684 
H688 
BB89 
B68D 
B68E 
B692 
0693 
B697 
B698 
B69C 
B69D 
B6A1 
B6A2 
B644 
B6A5 
Q6A7 
B6A8 
R6AB 
BGAC 
B6AD 
B6AD 
B6\D 
R6AD 
B6AD 
B6B0 
BBB4 
B6B5 
B6B8 
BHBA 
B6BC 
B6BF 
B6C1 
0603 
B«(，6 
BfiC7 
B6C7 
B6C7 
B6C7 
B6C7 
BfiCA 
B6rD 
B6D0 
RHD4 
B6D5 
BHD6 
B6T)7 
B6DB 
HI'DC 
B6DF 
B6E ‘， 
IlfiEO 
BI/EO 
B6H0 
B6EU 
BBHO 
B6H^ 
R6E« 


3E CO 
CD FB B5 
CD 3B B6 
3E 80 
CD FB B5 
CD 38 B6 
3E 40 
C3 FB B5 


CD 19 B6 
Oi DO IF 
ED 78 
F6 10 
ED 79 
CD 19 B6 
01 DO !F 
HD 78 
H6 EF 
ED 79 


3C 

32 31 B4 
FE 04 
C2 32 B6 
ED 5B 2C Bl 
13 

ED 53 2C B4 


DD 2A 2C B4 
1110 00 
3A 2B B4 


OD CB 00 
DD CB 02 
DD CB 04 
DD CB 06 
DD CD 08 
DD CB OA 
DD CB OC 
DD CB OH 
DD 19 
10 DC 
C9 


DD 2A 2C B4 
1110 00 
3A 2B BA 
67 


DD CB 00 
17 

DD CB 02 
17 

DD CB 04 
17 

DD CB 06 
17 

DD CB 08 
17 

DD CB OA 
17 

DD CB OC 
17 

DD CB OE 
17 

ED 79 
03 

DD 19 
25 

C2 79 B6 

El 

C9 


H) 07 59 
06IE 
HD 41 
22 25 B4 


2A 29 B4 
1100 04 
CD 27 EO 
HI) 5B 03 Bl 


283 

284 

285 

286 

287 

288 

289 

290 

291 

292 

293 

294 

295 

296 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 


LD A t «CO 
CALL PSET1 
CALL RRBIT : GREEN* 
LD A f SB0 
CALL PSET1 
CALL RKB1T : RED 
LD A,$40 
JP PSET! 


GRAM 


PLANK 


320 

321 

322 

323 

324 

325 

326 

327 

328 

329 

330 

331 

332 

333 

334 

335 

336 

337 

338 

339 

340 

341 

342 

343 

344 

345 

346 

347 

348 

349 

350 

351 

352 

353 

354 

355 

356 

357 

358 

359 

360 

361 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

373 

: 

375 

376 

377 

378 

379 

380 

381 

382 

383 
381 
385 
•iHfi 

387 

388 

389 

390 

391 

392 

393 

394 

395 

396 

397 

398 

399 

400 


IS:CC(\TfO,l),A 
PSET1 

LD HL,(ADR) 

ADD A t H 
LD H f A 

CALL DT0BC2 ；BASKO 
LD BC.S1FD0 
IN A,(C) 

OR S1Q 
OUT (C),A 
CALL DT0BC2 : BANK1 
LD 8C.S1FD0 
IN A f (C) 

AND $EF 
OUT (C),A 
RET 

DT0BC2 
PUSH HL 

CALL HRBIT2 ；SxOOO 
LD A,(NF16) 

INC A 

LD (NF16),A 
CP 4 

JP NZ.UP8 
LD DE i f i)XT3 ) 
INC DE 

LD (DXT3),DE 

UP8 

LD A,H 
ADD A t 4 
LD H,A 

CALL RRBIT2 ;$x40O 

POP HL 

RET 


RRBIT 

LD IX,(DXT3) 

LD DE # 16 
LD A,(DXT2) 

LD B,A 
RRBITLP 

RL (1X40) 

RL (1X42) 

RL (1X^4) 

RL ( 1X^6) 

RL (IX+BJ 
RL (IX>10) 

RL (1X^12) 

RL ( IXtl-l) 
ADD IX,DE 
DJKZ RRBITLP 
RET 


RRBIT2 
PUSH HL 
LD B,H 
LD C,L 
LD IX,IDXT3) 
LD DE V 16 
LD A,(DXT2I 
LD H.A 
RRBITLP2 
XOR A 
RL ( IX + OI 
RLA 

rl uxm 

RLA 

RL UX + わ 
RLA 

RL <1X^6) 
RLA 

RL UX>B) 
RLA 

RL. (1X410) 
RLA 


RLA 

RL (1X4^11) 

RLA 

01T (C),A 
ISC BC 
ADD IX,DE 
DEC* H 

JP N2.RRBITLP2 
POP HL 
RET 

••FOR XI 

XYADR ；IN XT.YT 0 IT ADR,BIT 
LD HL, *.\T1 I 
LD DE,(YT) 

XOR A 

LD USCRNM2) ,A 
LD H,S1D 
t)l，T (C) ,B 
CALL #(；RAADR 
LD B.ltE 
OLT (C) 

LD (ADR し HL 
RET 

FOR X6BK 
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►鳥取は 3 日遅れなんです。 Oh ! X の発売日。そんなことはどうでもいいのですが， Oh ! X の 
となりに 「POAYBOYj とか 「デ 丟.ベっ〇ん」などという本をおくのだけはやめて ほし 
い。このあたりの本屋は.どこへ行ってもこのテの本が必ずとなりにおいてあるんですよ。 

井関稚晶 （16) 鳥取県 
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リスト 6 XB 8000— Xlturbo ソースリスト 


0000 
0000 
0000 
0000 
0000 
0000 
B0OO 
B000 
B80O P 
0000 P 
BO00 
CB00 P 
8000 
FBF6 P 
5907 P 
D00C P 
E012 P 
E027 P 
E08C P 
E09C P 
E0A4 P 
B000 

B00O C3 36 B0 

BO03 

B003 

BO03 00 00 
BOOS 00 00 
BO07 00 00 
B009 00 00 
B0OB 00 00 
B00D 00 00 
B00F 00 00 
B011 00 00 
B013 00 00 
B015 

B015 00 00 
0017 00 00 
0019 00 02 
B01B 00 02 
B01D 00 00 
B01F 00 00 
B02180 02 
8023 90 01 
B025 
B025 00 
R026 

8026 00 00 
B028 00 00 
B02A 00 00 
B02C 00 
B02D 00 00 
B02F 00 00 
B03100 00 
B033 00 
R03100 
B035 00 
B036 
B036 
B036 
B036 El 
B037 22 2F BO 
B03A 3A 35 BO 
B03D BT 
B03E C2 38 B1 
BO 41 

B0413E 01 
B013 32 35 BO 
B046 2100 BR 
B0491101 B8 
B04C 01 FF OF 
B04F AF 
B050 7? 

B051 ED BU 
B053 

B053 2100 00 
B056 22 2A BO 
B059 2A 19 BO 
B05C ED 5B 15 BO 
B060 B7 
8061 ED 52 
8063 22 OR BO 
B066 2A ID B0 
B069 ED 5B 17 BO 
B06D B7 
B06E HD 52 
B070 22 OD BO 
B073 

B073 2A 21 B0 
B076 ED 5B ID BO 
B07A B7 
B07B ED 52 
B07D 22 0F BQ 
B08O B7 
B081 CB 1C 
D083 CB ID 
B085 CB 1C 
B087 CB ID 
B089 CB )C 
B08B CB ID 
D08D 7D 
B08E 32 2C BO 
B091 

D0912A 23 BO 
B094 ED 5B IF BO 
B098 B7 
B099 ED 52 
B09B 2211 BO 
B09E 

B09E 2A 17 BO 
BOA! 22 0f> BO 
B0A4 2A OD BO 
B0A7 29 

BOAB ED 5B 11 BO 
B0AC B7 
RO\D ED 52 
BOAF 2213 BO 
B0B2 

B0B2 2A IF BO 

B0B5 22 09 BO 

R0B8 

BOBtt AF 

B0B9 32 34 BO 

BOBC 

BOBC 3A 14 BO 
BODF FE HO 
BOri D2 56 B1 
B0C4 2A t5 BO 
B0r7 22 03 BO 
BOCA 2A OB BO 
BOCD 29 

BOCE ED SB OF BO 
B0D2 B7 
B0D3 ED 52 
B0D5 44 
BODB 4D 
B0D7 2A ID B« 
BODA 2Z 07 BO 
BODD CD 05 B3 


2 

3 

4 

5 

6 

7 

8 
9 

10 
11 

12 #CC EQU SCBO0 

13 

14 #SCRNM2 HQU SFBF6 

15 fGRAADR EQU $5907 

16 tDEVI EQU SDOOC 

17 9LDAHL EQU 3E012 

18 tMLTHD EQU $E027 

19 霜 STOP EQU SE08C 

20 flOFG EQU $E09C 

21 fBADR EQU $E0A4 

22 

23 JP BEGIN 

24 

25 ； 

26 XF DW 0 

27 YF DW 0 

28 XT DW 0 

29 YT DW 0 

30 DXF DW 0 

31 DYF DW 0 

32 DXT DW 0 

33 DYT DW 0 

34 BY DW 0 

35 

36 XF1 DW 0 

37 YF1 DW 0 

38 XF2 DW 512 

39 YF2 DW 512 

40 XT1 DW 0 

41 YT1 DW 0 

42 XT2 DW 640 

43 YT2 DW 400 

44 

45 HMF DB 0 ； 0. .400 し .200 

46 

47 ADR DW 0 

48 ADR2 DW 0 

49 VB DW 0 

50 DXT2 DB 0 

51 DXT3 DW 0 

52 RADR DW 0 

53 DTCC DW 0 

54 HFLQ DB 0 

55 VFLG DB 0 

56 SFLG DB 0 

57 ； 

58 

59 BEGIN 

60 POP HL 

61 LD (RADR) f HL 

62 LD A,(SFLO) 

63 OR A 

64 JP NZ,ENTER 

65 

66 LD A,1 

67 LD (SFLG) 9 A 

68 LD HL • 奪 LCP 

69 LD DE • れ CP+1 

70 LD BC.SFFF 

71 XOR A 

72 LD (HL) f A 

73 LDIR 

74 

75 LD HL f O 

76 LD (YB),HL 

77 LD HL,(KF2) 

78 LD DE V (XF1) 

79 OR A 

80 SBC HL,DE 

81 LD (DXF),HL 

82 LD HL,<YF2) 

83 LD DE,(YF1) 

84 OR A 

85 SBC HL 9 OE 

86 LD (DYF>,HL 

87 

88 LD HL,(XT2) 

89 LD DE,(XT1) 

90 OR A 

91 SBC HL.OE 

92 LD (DXT) f HL 

93 OR A 

94 RR H 

95 RR L 

96 RR H 

97 RR L 

98 RR H 

99 RR L 

00 LD A,L 

01 LD (DXT2),A 

02 

03 LD HL,(YT2I 

04 LD DE,(YT1) 

05 OR A 

06 SBC HL.DE 

07 LD (DYT1,HL 

08 

09 LD HL.(YFl) 

10 LD (YF) ,HL 

11 LD HL f (DYF) 

12 ADD HL.HL 

13 LD DE,(DYT) 

14 OR A 

15 SBC HL.DE 

16 LD (BV) t HL 

17 

18 LD HL.(YTl) 

19 LD (VT),HL 

20 VLP 

21 XOR A 

22 Ll> (VFLG) ,A 

23 WHILE2 

24 LD A, IE\>1) 

25 CP $80 

26 JP NC.WEND2 

27 I.D HL, (XF1 I 

2H I.D «XF) f HL 

29 LD HL,(DXF> 

30 ADD HL V HL 

31 LD DH,(DXT) 

32 OR A 

33 SBC HL.DE 

34 LD B.H ； 

35 LD C*L ； BC=EX 

36 LD HL,(XT1) 

37 LD (XT> t HL 

3B CALL XYADR2 


X68K G-DATA 一 >Xlturbo Q-DATA 
<65536) (8) 

Vep 1.0 

FOR S-OS RHDA 
ORQ 9BOO0 


#LCP EQU SB800 
猶 LCN HQU $0000 


BOEO 
BOEO AF 
B0E132 33 BO 
B0E4 2A 07 BO 
B0E7 29 
H0E81100 CB 
BOEB 19 
BOEC 22 31 BO 
BCEF 

BOEF 3K 7F 
B0F1 B8 
riOF2 3812 
B0F4 CD 9D B1 
R0F7 2A OF BO 
BOFA 29 
BOFB 50 
BOFC 59 
DOFI) EB 
BOFH B7 
BOFF F.D 32 
BIO〗14 
B102 4D 
8103 C3 EF BO 
B106 

0106 2A OB BO 

B109 29 

B10A 09 

B10B 44 

B10C 4D 

B10D 3A 33 BO 

B110 2134 BO 

B113 B6 

B114 CC 8C B1 

B117 2\ 07 BO 

B11A 23 

B11B 22 07 BO 

BllE ED 5B 21 B0 

8122 B7 

B123 ED 52 

B125 DA HO BO 

B128 

B128 2A 2A BO 
B12B 23 
B12C 22 2A BO 
B12F 11 04 00 
B132 B7 
B133 ED 52 
B135 CA 81 B1 
B138 

Bl：<8 2A 05 DO 
B13B 23 
B13C 22 05 BO 
B13F 2A 11 B0 
B142 29 

B143 HD 5B 13 BO 
D147 F.B 
8148 B7 
B149 ED 52 
B14B 2213 B0 
B14E 3K 01 
B150 32 ：M BO 
0153 C3 BC BO 
0156 

B156 2A OD BO 
B159 29 

B15\ ED 5B 13 BO 

B15E 19 

B15F 2213 BO 

8162 CD FB B1 

B165 2A 09 BO 

B168 23 

8169 22 09 BO 

B16C ED 5B 23 BO 

B170 B7 

B171 ED 52 

B173 DA B8 BO 

B176 2100 00 

8179 2213 BO 

B17C 2A 2F RO 

B17F E5 

B180 C9 

B1RI 

B181 

R1R1 

B!8! 2100 00 
B184 22 2A B0 
B187 2A 2F BO 
B18A E5 
B18B C9 
B18C 
B18C 
B18C 

B18C DD 2A 31 BO 

B190 DD 7F. FE 

Bi9n DD 77 00 

B196 DD 7K FF 

Bi99 DD 77 Ot 

B19C T9 

B19D 

B19P 

B19D 

B19D 

B19D 

B19C 

B19D rr. 

B19E DI> 2A 31 BO 

B1A2 2A 28 BO 

BIAS CD 12 EO 

B1A8 47 

B1A9 23 

B1AA CD 12 FO 

IUAD IF 

BIAE 2：l 

B1AF 22 2H BO 

niB2 : W 34 HU 

niBf> B7 

BIHb C2 C7 Bl 

B1D9 3A 33 B) 

B1BC B7 

B1BD C2 VI Bl 

B1C0 3C 

Bin 32 33 BO 

B1C4 C3 K：1 Bl 

B1C7 

B1C7 

B1C7 DD 66 00 
B1CA DO 6E 01 
B1CD B7 
BICE ED 42 
B1D0 28 27 
B1D2 09 
B1D3 EB 

B1D4 FD 21IE R3 
B1DB aH 03 
B1DA 

B1DA FD 6K 00 
B1DD FD 66 01 
B1E0 B7 


139 

140 

141 
H2 

143 

144 

145 

146 

147 

148 

149 

150 
131 

152 

153 

154 

155 

156 

157 

158 

159 

160 
161 
162 

163 

164 

165 

166 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 

177 
17H 

179 

180 
181 
182 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

200 
201 
202 

203 

204 

205 

206 

207 

208 

209 

210 
211 
212 

213 

214 

215 

216 

217 

218 

219 

220 
221 
222 

223 

224 
223 
226 

227 

228 

229 

230 

231 

232 

233 

2：H 

235 

236 
2H7 

238 

239 

240 

241 
2\Z 
24 3 

214 

215 

246 

247 

248 
219 
250 
25! 

252 

253 

254 

255 

256 

257 

258 

259 

260 
261 
262 


265 

266 

267 

268 

269 

270 

271 

272 

273 

274 

275 

276 


XLP 

XOR A 

LD (HFLG) V A 
LD HL,(XT) 

ADD HL,HL 
LD DE, 拿 CC 
ADD H1”DE 
LD (DTCO.HL 
WHILE1 

LD A,S7F 

JR C.WENDl 
CALL POINT 
LD HL,(DXT) 
ADD HL.HL 
LD D 9 B 
LD H f C 
EX DE.HL 
OR A 

SBC HL 9 DE 
LD B,H 
LD C f L 
JP WHILE1 

WEND1 

LD HL,(DXF) 
ADD HL t HL 
ADD HL f BC 
LD B,H 
LD C.L 
LD A,(HFLG) 

LD HL r VFLC 
OR (HL) 

CALL Z f REF 
LD HL,(XT) 

INC HL 
LD (XT),HL 
LD DE,(XT2) 

OR A 

SBC HL f DE 
JP C.XLP 

LD HL f (YB) 

INC HL 
LD (YB),HL 
LD DB,4 
OR A 

SBC HL,DE 
JP Z.EXIT 

ENTER 

LD HL,<YF) 

INC HL 
LD (YF) f HL 
LD HL,(DYT) 

ADD HL.HL 
LD DE,(EY) 

EX DH.HL 
OR A 

SBC HL,DE 
LD (EY),HL 
LD A t l 
LD (VFLG し A 
JP WHILE2 

WEND2 

LD HL,(DYF) 

ADD HL.HL 
LD DE,(EY) 

ADD HL.DE 
LD IEY 丨 •HL 
CALL PSET 
LD HL,(YT) 

INC HL 
LD (YT),HL 
LD DE f (YT2) 

OH A 

SBC HL.DE 
JP C,YLP 
LD HL.O 
LD (EY),HL 
LD HL V (RADR) 

PUSH HL 
RET 


EXIT 
LD HL,0 
LD (YB),HL 
LD HL,(RADR) 
PUSH HL 
RET 


REF 

LD T\ t (DTCC \ 
LD A,«IX-21 
I.D ( IX>0) ,A 
LD A, (IX-U 
LD U\>1) t A 
RET 


； \*08K DATA(6553«) 

； IS ： CC(XT^0,1) 
POINT 
PUSH BC 


LI» IX, <DTCC) 
LD IIL V (ADR2) 


CALL 着 LDAHL 


call tunm. 

LD C,A 
INC HL 

LD IADH2),HL 
LD A,(VFLG) 
OR A 

JP KZ.PSKrP 
LD A 9 (HFLG) 
OR A 

JP NZ f PSKIP 
INC A 


LD (HFLG),A 
JP UCOL 


LD H, llX-fO) 
LD L,(IX^l) 
OR A 

SBC HL.BC 
JR 2.0C0L 
ADD HL V BC 
EX DE.HL 
LD IY.YUSE'i 


DE=ALREADY 

COLOR 


Br=porsT COLOR 


LD A v 3 
PRELP 


A=NUMBER 


LD L f (IY+0) 
LD H,(IVfl) 
OR A 


B1E1 ED 52 
D1E3 2814 
B1E519 
B1E6 B7 
B1E7 ED 42 
B1E9 28 08 
B1EB FD 23 
B1ED FD 23 
B1EF 3D 
B1F0 C2 DA Bl 
D1F3 
B1F3 

B1F3 DD 70 00 

B1F6 DD 7101 

B1F9 

B1F9 Cl 

B1FA C9 

B1FB 

B1FB 

B1FB 

B1FD 

B1FB 

B1FB 

B1FB 2A ID BO 
B1FE 29 
BIFF 0100 CB 
B202 09 
8203 22 2D BO 
B206 CD HB B2 
8209 

8209 FO 21 01 B8 
B20D DD 21 01 CO 
B2U ED 5B ID BO 
B215 DD 19 
B217 FD 19 
0219 01 DO IF 
B21C ED 78 
B21E E6 EF 
B220 ED 79 
B222 3A 09 BO 
B225 E6 01 
8227 28 N 
B229 DD E5 
B22B FD E5 
B22D DD El 
B22F FD El 
B2313A 25.B0 
B234 B7 
B235 20 06 
8237 ED 78 
B239 F610 
B23B ED 79 
B23D 
D23D 

B23D 3E CO 

B23F CD AC B2 

B242 3K 80 

8214 CD AC B2 

B247 3E 40 

B249 C3 AC B2 

B24C 

B24C 

B24C 

B24C 

B24C 

B24C 

B24C ED IB 26 BO 

B2f»0 BO 

B25! 47 

8252 2\ 2D BO 

B255 3A 2C BO 

B258 5F 

B259 DD E5 

B25B FD E5 

B25D 

B25D D5 

B25E 16 OR 

8260 IE 00 

B262 

0262 CD 86 B2 
B265 CD AF B2 
B268 TB 13 
B26A DD 23 
B26C FD 23 
B26E 15 
B26F C2 62 B2 
8272 ED 59 
B274 03 
B275 D1 
8276 ID 
B277 C2 5D B2 
B27A FD El 
B27C DD El 
B27E 1162 02 
B281 FD 19 
D2B3 DD 19 
B285 C9 
B286 
B286 
B286 
B286 78 
B287 FE 80 
B289 38 1C 
B28B FE CO 
B28D 38 06 
B28F 
B28F 
B28F 7E 
B290 23 
B29123 
B292 B6 F8 
B294 C9 
8205 
B295 
B295 C5 
B296 46 
B297 23 
B298 7E 
8299 23 
B29A TB 18 
B29C IF 
B29D CB 18 
B29F IF 
B2A0 CB IB 
B2A2 IF 
B2A3 E6 F8 
B2A5 Cl 
B2A6 C9 
B2A7 
B2A7 
B2A7 23 
B2A8 7E 
B2A9 23 
B2AA E6 3E 
B2AC 07 
E2AD 07 
B2AE C9 
B2AF 


277 

278 

279 

280 
281 
282 

283 

284 

285 

286 

287 

288 

289 

290 

291 

292 

293 

294 

295 

296 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 

310 

311 

312 

313 
3H 

315 

316 

317 

318 

319 

320 

321 

322 

323 

324 

325 

326 

327 

328 

329 
3：iO 

331 

332 

333 

334 

335 

336 

337 

338 

339 

340 

341 

342 

343 

344 
315 

346 

347 

348 

349 

350 

351 

352 

353 

354 

355 

356 

357 
35ft 

359 

360 

361 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 

377 

378 

379 

380 

381 

382 

383 

384 

385 

386 

387 

388 

389 

390 

391 

392 

393 


397 

398 

399 

400 

401 

402 

403 

404 

405 

406 

407 
40H 

409 

410 

411 

412 

413 
4H 


SBC HL.DE 
JR Z.OCOL 
ADD HL.DE 
OR A 

SBC HL.BC 
JR Z.NCOL 
ISC IY 
INC IY 
DEC A 

JP SZ,PRELP 
；PRW COLOR 
NCOL 

LD i I\>0) ,B 
LD (IXfl ) $ C 
OCOL 
POP BC 
RET 


••FOR XT=XT1 TO XT2 
； PSET(XT f YTl,CC<XT) 

: NEXT 
PSET 

LD HL,<XT1) 

ADD HL,HL 
LD BC f #CC 

ADD HL.BC ;HLrtCC^XTH2 
LD (DXT3),HL 
CALL XYADR 


LD IY,tLCP^I 
LD IX • 霜 LCN+l 
I.D DE, (XT1) 

ADD IX # DE 
ADD IY,DE 
LD Bf.SlFDO 
IN* A f (C) 

AND $EF 
OUT (C),A 
LD A,(YT) 

AND 1 

JR Z.EXIXIY 
PUSH IX 
PUSH IY 
POP IX 
POP IY 

LD A,(HMF) 

OR A 

JR NZ.EXIXIY 
IN A,(D 
OR S10 
OUT (C.) f A 
EXIXIY 


LD A,SCO 
CALL PSET1 


LD A, 
CALL 


$80 

PSET1 


LD \ v $40 
JP PSET1 


: GRAM 1 PLANE 

’;OUT:CCMXT+O,l し A 
PSET1 

LD BC,(ADR) 

ADD A,B 
LD B t A 
LD HL,(DXT3) 

LD A,(DXT2) 

LD E,A 
PUSH IX 
PUSH IY 
RRBITLP2 
PUSH DE 
LD D,8 
LD 6,0 
RRBITLP3 

CALL B1T5 
CALL LCIKC 
RL E 
INC IX 
INC IY 
DEC D 

JP KZ.RRBITLP3 
OUT (C) t E 
INC BC 
POP DE 
DEC E 

JP N2,RRBITLP2 
POP IY 
POP IX 
LD DE.642 
ADD 1Y.DE 
ADD IX,DE 
RET 


BIT5 
LD A,B 
CP $80 
JR CEBIT'S 
CP SCO 
JR C.RBIT5 


.GBIT5 
LD A,(HL) 

INC HL 
INC HL 

AND SF8 ;&B\\ v x.\xOOO 
RET 

RBIT5 
PUSH DC 
LI) B f (HL) 

INC HL 
LD A,(HL) 

INC IIL 
RR D 
RRA 
RR D 
RRA 
RR B 
RRA 

AND $F8 
POP er 
RET 

BBIT5 
INC HL 
LD A,(HL) 

INC HL 

AND S3E ;&B0ei 11110 

RLCA 

RLCA 

RET 


► K 休み終了 2 日前にして，宿題がほとんど終わっていない！すでにあきらめた懊は「ど 

の宿題を終わらせて，どの宿題を先生に頼んで期限を伸ばしてもらうか」の選別に入った。 INTEGRAL XI 147 

これを普いている間にも時間は刻々と滅っていく。これというのも三国志 II をやりすぎた 
せいだ！うお 一， 孔明よオレの宿題を手伝ってくれ〜。 山野辺太郎 （14) 宮城県 




















BEGIN 
POP HL 

LD 丨 HADR 丨 ， HL 
LD HL,(EY) 

LD A,H 
OR L 

JP N2, ENTER 
LD HL，0 
LD (YB),HL 
LD HL,(\F2» 
LD DB,<XF1| 
OR A 

SBC HL,DE 
LD (DXF),HL 
LD HL,(YF2) 
LD DB,(YF!I 
OR A 

SBC HL.DK 
LD <DYF) ,HL # 

LD HL,(XT2 
LD DH,(\T1 
OR A 

SBC HL.DE 
LD (DXT).HL 
LD HL,iVT2 
LD DB,(YT1 
OR A 

SBC HL,DE 
LD <DYTI f HL 

LD HL,(YF1 
LD 丨 VF),HL 
LD HL,(DYF 
ADD HL.HL 
LD DB,(DYT 
OR A 

SBC H1”DE 
LD (EY 丨 ,HL 

LD HL,(VT1 
LD (YT).HL 
YLP 

LD HL, 


LD (XF 


LD HL f 
ADD HL, 

LD DE 
OR A 

SBC HL.DE 
LD B,H 
LD C,L 
LD HL, 

(XT 


XF1) 
,HL 
DXF) 


； BC=EX 
XT1) 

»HL 


CALL XYADR2 


XlturboZ G-DATA->X68K O-DATA 
FOR S-OS REDA 
ORG SC8O0 


*SCRNM2 EQU 
«GRAADR EQU 
#DEVI EQU 
tLDDEA EQU 
IMLTHD EQU 
fSTOP EQU 
•IOFG EQU 
tBADR EQU 

JP BEGIN 


SFBF6 

$5907 

SDO0C 

$E018 

$E027 

SE08C 

SE09C 

SE0A4 


DXF 

DYF 

DXT 

DYT 


DW 0 
DW 0 
DV 0 
DW 0 
DW 0 
DW 0 
DU 0 
DW 0 
DV 0 


2 

3 


B 

7 

8 
9 

10 

11 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
6t 
62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 
81 
82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 
100 
101 
102 

103 

104 

105 

106 


0000 
0000 
oeee 
0000 
0000 
C8O0 
0800 
FBF6 P 
5907 P 
D0OC P 
E018 P 
E027 P 
E08C P 
E09C P 
B0A4 P 
C80O 

C800 C3 32 C8 

C803 

C803 

C803 00 00 
C8B5 ee eo 
C807 00 00 
C809 eo ee 
C80B 00 00 
C80D 00 00 
C80F 00 00 

C8ii ee ee 

C813 00 00 
C815 

C815 00 00 
C817 00 00 
C819 40 01 
C81B C8 00 
C81D 00 00 
C81F 00 00 
C821 00 02 
C823 00 02 
C825 

0825 00 00 
C827 00 eo 
C829 00 00 
C82B 00 
C82C 00 00 
CB2E 00 00 
C830 00 00 
0832 
C832 
C832 
C832 El 
C833 22 30 C8 
C836 2A 13 C8 
C839 7C 
C83A B5 
C83B C2 2B C9 
C83E 2100 00 
C84122 2B C8 
C844 2A 19 C8 
0847 ED 5B 15 C8 
C84B B7 
C84C ED 52 
C84E 22 OB C8 
C8512A IB C8 
C854 ED 5B 17 CS 
C858 B7 
C859 ED 52 
CB5B 22 0D C8 
C85E 

C85K 2A 21 C8 
0861 ED 5B ID C8 
C865 B7 
C866 ED 52 
C868 22 OF C8 
C86B 2A 23 C8 
C8BE ED 5B IF CB 
C872 B7 
C873 ED 52 
C875 2211 C8 
C878 

C878 2A 17 C8 
C87B 22 05 C8 
C87E 2A OD C8 
C88129 

C882 ED 5B 11 C8 
0886 B7 
C887 ED 52 
C889 2213 C8 
C88C 

C88C 2A IF C8 
C88F 22 09 C8 
0892 

C892 2A 15 C8 
C895 22 03 C8 
0898 2A 0B C8 
C89B 29 

C89C ED 5B OF C8 
C8A0 B7 
C8A1 ED 52 
C8A3 44 
C8A4 4D 
C8A5 2A ID C8 
C8A8 22 07 C8 
C8AB CD P4 C9 
C8AB 

C8AK CD 69 C9 
C8B1 CD 52 C9 
C8B4 


C8B4 2100 € 
C8B7 B7 
C8B8 BD 42 
C8BA 3816 
C8BC 2A 03 C 
C8BF 23 
C8C0 22 03 C 
C8C3 2A OF C 
C8C6 29 
C8C7 50 
C8C8 59 
C8C9 EB 
C8CA B7 
C8CB ED 52 
C8CD 44 
C8CB 4D 
C8CF C3 B4 C 
C8D2 

C8D2 2A 0B ( 
C8D5 29 
C8D6 09 
C8D7 44 
C8D8 4D 
C8D9 2A 07 C 
C8DC 23 
C8DD 22 07 ( 
C8B0 ED 5B J 
C8B4 B7 
C8B5 ED 52 
C8B7 C2 AE C 
C8BA 
C8EA 

C8EA 2A 13 ( 
C8ED 1100 f 
C8F0 B7 
C8F1 HD 52 
C8F3 D2 0F ( 
C8F6 2A 05 ( 
C8F9 23 
C8FA 22 05 ( 
C8FD 2A 11( 
C900 29 
0901 ED 5B 
C905 EB 
0906 B7 
C907 ED 52 
C909 2213 ( 
C90C C3 EA ( 
C90F 

C90F 2A OD ( 
C912 29 
0913 ED 5B 
C91719 
C918 2213 < 
C91B 2A 2E < 
C91E 23 
C91F 22 2E ( 
C9221104 ( 
C925 B7 
C926 ED 52 
0928 CA 47 ( 
C92B 

C92B 2A 09 ( 
C92B 23 
C92F 22 09 ( 
C932 BD 5D : 
C936 B7 
C937 ED 52 
0939 C2 92 ( 
C93C 21 00 ( 
C93F 2213 < 
C942 2A 30 < 
C945 E5 
C946 C9 
0947 
C947 
C947 

C947 2100 ( 

C94A 22 2B ( 

C94D 2A 30 ( 

C950 E5 

C951 C9 

C952 

0952 

0952 

C952 

0952 

C952 ED 5B : 

0956 3A 26 < 

C959 CD 181 

C95C 13 

C95D 3A 25 ( 

C960 CD 18 ] 

0963 13 

C964 ED 53 : 

C968 C9 

0969 

C969 

0969 

C969 

0969 

C969 

0969 C5 

C96A CD D6 l 

C96D 2100 i 

C970 22 25 l 


200 
以 ）1 
202 

203 

204 

205 

206 

207 

208 

209 

210 
211 
212 


LD HL,$BO0O 
OR A 

SBC HL.BC 
JR C.WENDl 
LD HL f (XF) 
INC HL 
LD (XF),HL 
LD HL,(DXT) 
ADD HL.HL 
LD D.B 
LD E,C 
EX DB,HL 
OR A 

SBC HL.DE 
LD B.H 
LD C t L 
JP WHILE1 

LD HL,(DXF) 
ADD HL,HL 
ADD HL,BC 


LD HL,(XT) 
INC HL 
LD (XT し HL 
U) DH,(XT2) 
OR A 

SBC HL.DH 
JP NZ.XLP 

WHILE2 

LD HL t (EV) 

LD DH,$800O 
OR A 

SBC HL,DE 
JP NC.WEND2 
LD HL,(YF) 
INC HL 
LD <YF),HL 
LD HL,(DYT) 
A!>D HL.HL 
LD DE,<HY) 
FX HE.HL 
OR \ 

SBf HL,DE 
LD CF.Y) ,HL 
JP WHILE2 

KE^D2 

LD HL,(DYF) 
ADD HL.HL 
LI) DK, ( EY ) 
ADD HL.DE 
LD CEYI,HL 
LD HL,(YB) 
INC HL 
LD (YB).HL 
LD DE.4 
OR A 

SBC H し ， DE 
JP 7., EXIT 

ENTER 

LD HL,(YT) 

INC HL 
LD IVT),HL 
LD rtK,{YT2) 
OR A 

SBC HL.DE 
JP NZ.YLP 
LD H1”0 
LD (EVlyHL 
LD HL,(RADR) 
PUSH HL 
RET 


EXIT 
LD HL,0 
LD IYB),HL 
LD HL,<RADR) 

PUSH HL 
RET 

PSET*XT,YT,(RGBX)) 
PSET 

LD DH,(ADR2) 

LD A,(RGBXf1) 

CALL «LDDEA 
INC DE 
LD A,(RGBX) 

CALL #LDDEA 
INC DH 

LD (ADR2),DK 
RET 


POINT<\F,YF)->X68K DATA 

OUT ： (RGBX) 

POINT 
PUSH BC 
CALL XYADR 
LD HL,0 
LD (RGBX し HL 


C973 3E 
C975 32 
C978 
0978 CD 
C97B 2A 
C97E B7 
C97F CB 
C981 CB 
C983 06 
C985 
C985 CB 
C987 CB 
C989 CB 
C98B 10 
C98D 22 
0990 3A 
C993 C6 
C995 32 
C998 20 
C99A Cl 
C99B C9 
C99C 
C99C 
C99C 
C99C 
C99C 
C99C CD 
C99F 16 
C9A1 CD 
C9A4 01 
C9A7 ED 
C9A9 F6 
C9AB ED 
C9AD CD 
C9B0 01 
C9B3 ED 
C9B5 E6 
C9B7 ED 
C9B9 C9 
C9BA 
C9BA 
C9BA E5 
C9BB CD 
C9BE 01 
C9CI 09 
C9C2 CD 
C9C5 El 
C9C6 C9 
C9C7 
C9C7 
C9C7 4D 
C9C8 44 
C9C9 ED 
C9CB A3 
C9CC 28 
C9CB 37 
C9CF CB 
C9D1 C9 
C9D2 
C9D2 B7 
C9D3 CB 
C9D5 C9 
C9D6 
C9D6 
C9D6 
C9D6 
C9D6 2A 
C9D9 ED 
C9DD AF 
C9DE 32 
C9E1 06 
C9E3 ED 
C9E5 CD 
C9E8 06 
C9CA ED 
C9EC 22 
C9EF 7A 
C9F0 32 
C9F3 C9 
C9F4 
C9F4 
C9F4 
C9F4 
C9F4 2A 
C9P711 
C9FA CD 
C9FD ED 
CA01 EB 
CA02 29 
CA0319 
CA04 ED 
CA08 19 
CA09 22 
CA0C C9 
CA0D 
CA0D 
CAOD 
CA0D 3A 
CA10 2A 
CA13 84 
CA14 67 
CA15 3A 
CA18 5F 
CA19 C9 
CA1A 


2E C8 
00 04 
27 EO 
5B 07 C8 


5B A4 E0 
29 C8 


213 

214 

215 

216 

217 

218 

219 

220 
221 
222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 
2^6 

247 

248 

249 

250 

251 

252 

253 

254 

255 

256 

257 

258 

259 

260 
261 
262 

263 

264 

265 

266 

267 

268 

269 

270 

271 

272 

273 

274 

275 

276 

277 

278 

279 

280 
281 
282 

283 

284 
2fi5 
286 

287 

288 

289 

290 

291 

292 

293 

294 

295 

296 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 


LD A,$40 
LD (RGBP),A 
PLPX1 

CALL P0INT1 
LD HL,CRGBX) 

OR A 
RR H 
RR L 
LD B t 4 
PLPRL 

RR D 
RR H 
RR L 

DJNZ PLPRL 
LD (RGBX),HL 
LD A t (ROBP) 

ADD A t $40 
LD (RGBP) f A 
JR NZ r PLPXl 
POP BC 
RET 

GRAM 4 PLANE 

(AT 4096 COLOR) 

OUT：D 

P0INT1 

CALL SETHLE : HL=(ADR) f E=BrT 
LD D,0 

CALL BCT0D2 : BANK 1 
LD BC.S1FD0 
IN A,(C) 

OR $10 
OUT (C),A 

CALI. BCT0D2 ； BANK 2 
LD BC • 奪 1FD0 
IN A,(C) 

AND $EF 
OUT (C),A 
RET 


;Ds&D0OOO\xx\ 
； S\000 Sx-100 


;GRAM 2 PLASH 


D RHG. 0 BIT 
OK or OFF 
(IF MASK(E)=OS 


BCTOD2 
PUSH HL 
CAU ‘ BCTOO 
1.D BC.S*irtO 
ADD HI..BP 
CALL BCTOD 
POP HL 
HET 

BCTOD 
LD C.L 
LD B,H 
IN A, iC) 
AND E 

JR Z.S0B1T 
SCF 
RL D 
RFT 

NOB IT 
OR A 
RL D 
RET 


;FOR XI 

XYADR ；IN \F,YF OUT ADR,BIT 
LD 

LD DE,(YF) 

XOR A 

LD (#SCRNM2).A 
LD B ， S1D 
OUT (C) f B 
CALL iGRAADR 
LD B t SlE 
OUT (C),B 
LD (ADR) t HL 
LD A V D 
LD (BIT) f A 
RET 


;FOR \68K 


LD DE, 1024 
CALL tMLTHD 
LD DE,< XT) 

EX DE,HL 
ADD HL.HL 
ADD HL t OE 
LD DE,(tBADR) 
ADD HL 9 DE 
LD (ADR2),HL 
RET 


SETHLE ；OUT HL f E 
LD A,IRGBP) 

LD HL,(ADR) 

ADD A,H 
LD H，A 
LD A.(BIT) 

LD E.A 
RET 


； Yt512t2^Xt2 


B2AF 

B2AF 

B2AF 

B2AF 

B2B2 

B2B4 

B2BB 

B2B7 

B2B9 

B2B9 

B2BB 

B2BC 

B2BC 

B2BP 

B2C0 

B2C1 

B2C2 

B2C2 

B2C2 

B2C2 

B2C3 

B2C4 

B2C6 

B2C8 

R2CA 

B2CB 

B2CE 

B2CE 


FD 86 00 
38 05 
FE F8 


Cfi 3F 
CB 3F 
CB 3F 


415 

416 

417 

418 

419 

420 

421 

422 
123 

424 

425 

426 

427 

428 

429 

430 

431 

432 
4 33 

434 

435 

436 

437 

438 

439 

440 

441 

442 


LCINC ；IN A OUT cy 
ADD A,(IY+0) 

JR C.PIXON 

CP $F8 ;4BxxxxxOOO 

CCF 

JR NC,PIXOFF 
PIXON 
SUB SF8 
SCF 

PIXOFF 
PUSH AF 
CALL LCINC2 
POP AF 
RET 


I.CINC2 : IS A 
PUSH HL 
LD H»A 

SRL A ； 

SRL A ； A/8 

•SRL A ； 

LD L,A 

LD nX+l) f A : RIGHT DOWN 


LD A,H 


D2CF 

B2D1 

B2D4 

D2D5 

B2DB 

B2D8 

B2D9 

B2DA 

B2DD 

B2E0 

B2E0 

B2E1 

B2H2 

B2H3 

B2E6 

D2E9 

B2EA 

B2HB 

B2EB 

B2EB 

B2EB 

B2HB 

B2EE 

B2F2 

B2P3 

B2F6 

B2F8 

B2FA 


E6 07 
DD 86 00 


PD 86 0 】 
FD 77 01 


2A 1i) BO 
HD 5B 09 BO 


443 

444 

445 

446 

447 

448 

449 
4 50 

451 

452 
•153 

454 

455 
4 56 
457 
45H 

459 

460 

461 

462 

463 

464 

465 

466 

467 

468 
4B9 
470 


AND 7 

ADD A.(IX+O) 

、 [ 川 .\•[. 

LD (IX+0),A 

LD A f L 
ADD 

ADD IX-1) 



LEFT-DOWN 
•”2 

LC(R,N,X-1 


;FOR XI 

XYADR ；IH XT,YT OUT ADR,BIT 
LD HL,(XT1) 

LD DE,(VT» 

XOR A 

LD <#SCRNM2),A 
LD B f SID 
OUT (C),B 
CALL #GRAADR 


B2F0 

B2FF 

B301 

D304 

B305 

B305 

B305 

8305 

B305 

B308 

B30B 

B30F： 

R3 

B3 


rD 27 EO 
ED 5B 03 BO 


5 KO 5B A4 EO 
919 

A 22 28 BO 


471 

472 

473 

474 

475 
17f» 
477 
ith 

479 

480 
4Ht 
482 
183 
484 
185 

486 

487 

488 

489 

490 
.191 

492 

493 

491 
495 


LD B.S1E 
OUT <C),B 
LD (ADR),HL 
RET 

FOR X68K 

XYADR2 ；IS XF.YF OUT ADR2 
LD HL,(YB) 

LD DK, 102*1 ； 512t2 

CALL tMLTHD 
LD DE,(XF) 

KX DEJIl. 

ADD HL.HL 

ADD HL f PE ； Y<5i2t2+Xt2 
LD DF, ( 吼⑽） 

ADD HL.DE 
LD (ADR2),HL 
RET 


YPSEK 
DV 0,0,0 


リスト 7 XlturboZ — X 8 B 000 ソースリスト 


o 0 2 2 

u 3 2 o o 5 5 

u D D D D D 

12 2112 2 
fffftttt 

XYXYXYXY 


0032005 5 o o o ov 0 o o 
DWDWDWDVDWDWDWDWDWDWgDBDWDWDW 


^AABRYR : 
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WZD と WLK の使い心地はいかがでしようか。かえ 
ってプログラム作成の手間が増えたような気分？ 

それは単純なひとつのファイルだけから成るプ 
ログラムを作成しているからではないでしようか。 
リロケータブルオブジェクトがおいしいのは，複 
数のファイルから成るプログラムを作成するとき 
なのです。 

プログラムの作り方は大きく 2通りに分けるこ 
とができます。ひとつはトップダウンに作成する 
方法。まずメインルーチンを作り，次に必要とな 
ったサブルーチンを揃え，さらにその中で使った 
ルーチンを補っていくという作り方です。プログ 
ラムのモジユール化が図りやすいやり方です。 

もうひとつはボトムアップに作成する方法。こ 
ちらはまずサブルーチンを用意し，次にそのサブ 
ルーチンを使ってさらに上位のサブルーチンを作 
り，最後にそれらをまとめて統轄するメインルー 
チンを作ります。サブルーチンごとにデバッグで 
きるというメリットがあり，プログラムはデバッ 
グの済んだサブルーチンの組み合わせで作れるわ 
けですから，バグの出にくいプログラミング方法 
だといえるでしよう。 



WZD，WLK を使うと，特に後者のようなプログラ 
ム開発が容易になります。サブルーチンごとにひ 
とつのファイルを作り，それとは別にチェック用 
のプログラムを用意します。そしてアセンブル. 
リンクして動作チェックし，まずいところがあれ 
ばサブルーチンを修正 • 再アセンブルしてリンク。 
別の条件をしたければチェックルーチンのほう 
を書き直して再アセンブル • リンク。いずれもも 
う一方はアセンブルする必要ありません。 0K と 
なればチェックルーチンを削除。これで動くよう 
になったサブルーチンがアセンブル終了の状態で 
残ることになります。 

こうしてサブルーチンを REL ファイルの状態で 
溜めながらプログラムを完成させていくわけです。 
アセンブル時間を短縮することができ，しかもデ 
バッグを進めながら効率よくプログラムでき，さ 
らにはサブルーチンも溜めることができます。 

ただ S- 0 S ではどんなに小さなファイルでも最 
低 4K バイトのサイズとなってしまいますので，サ 
ブルーチンの数が増えてくると大変です。そこで 
WLB の登場です。これは複数の REL ファイルをI個 
の UB ファイルにまとめてしまうものです。これ 
でサブルーチンの管理がやりやすくなることでし 
よろ 0 


•S-OS の系譜 (14) 

ダンプリストは マシン 語のコードにチェックサ 
ムを付加した形で掲載されます。チヱックサムは 
コードを足し合わせた答えの下2桁を取り出した 
もので，コードの入力間違いを発見しやすいよう 
に考えられたものです。1986年12月号までは，ダ 
ンプリストの横8バイトの合計を出した横サムと， 
ダンプリストを縦に16バイト合計した縦サムの2 
つのチェックサムを付けて掲載されていました。 
ダンプリストの右下に置かれたチェックサムは卜 
一タルサムと呼ばれ，丨ブロックのデータ全部を 
足し合わせた答え，すなわち縦サムの合計の下2 
桁を取り出したもの（当然横サムの合計でもある） 
でした。ダンプリストを入力したらまずトータル 
サムを確認し，違っていれば縦サムあるいは横サ 
ムを見て間違っている場所を発見するという方法 
がダンプリスト入力の基本的な方法だったのです。 

卜ータルサムは単に縦サム（横サムを）足し合 
わせたものですから，ダンプリストの2行を逆に 
入力してもミスを指摘してはくれません。卜一夕 
ルサムが合っていても，縦サムか横サムが違って 
いるということはかなり頻繁に起きていました。 
さらに，当時のダンプリストでは，4 つの データ 
を間違えるとチェックサムすべてが合ってしまう 
場合があるという問題点も抱えていました。そも 
そも卜ータルサムは単に縦サムの合計を表したも 
のにすぎないのですから，縦サム•横サムの付加 
されたダンプリストには無用の長物ともいえるも 
のです。そこでこのトータルサムをもっと有効な 
データに置き換えられないかという議論がなされ 
ました。 

この結果登場したのが CRC です。これは通信分 
野で使われているデータチェック方法のひとつで， 
特殊な割り算を行った余りを表しています。これ 
を卜ータルサムの代わりに使ったダンプリストが 
Oh!MZ の標準ダンプリスト形式になり，入カツー 
ルが1987年I月号の SENTINEL で掲載されました。 
MACINTO-C は Oh!X に受け継がれ，今日も現役で使 
われています。 
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全機種共通 S_OS“SWORD ” 要一 

ライブラリアン WLB 

ライブラリアンを加えて， S - OS のリロケータブルオブジェク 
卜による開発システムも一段落。今後はこれらのシステムを使つ 
Ishigami Tatsuya たコンパイラなどを発表することになるでしよう。さあ， C 言語 

石上達也 が動くのはいつの日か？ 


いま合唱の サークルでヘンデルの 「メサ 
イア」という曲に取り組んでいるんですが, 
その中にこんな曲がありました。 

Ev’ry valley shall be exalted (No.3) 
Every valley shall be exalted,and 
every mountain and hill made low; 
the crooked straight, and rough 
place plam. [ Isaiah 40-4 」 

( もろも参の谷は高くせられ（第3曲） 
全ての谷は高くされ， 

全ての山と丘とは，低くされる。 
高低のある地は平らになり 
険しいところは平地となる 

「イザヤ伝40章-4」 ） 

う一ん，なに力％最近の私の周りの出来 
事に似ていると思えるのは気のせいだろう 
か？ 選抜選手のみなさん，ポピュラス大 
会残念でした。 


ライブラリアンてなんじやろな7 


リ ロケータ ブルアセンブラを使って プロ 
グラミングすることの利点のひとつに， 
「すでに一度作成したサブルーチン（モ 
ジュール）の使い回しがきく」 

ということがあります。 

しかし，手持ちのモジュールが多くなる 
と今度は，リロケータブルファイルでも管 
理に困り始めます。 

理屈のうえでは， WZD と WLK があれ 
ば， リロケータブルアセンブラを用いたプ 
ログラム開発は可能なのですが，リンクす 
るファイルが多くなってくると，非常に面 
倒なことになってきます。ましてや，それ 
が毎回毎回同じようなファイルだったりし 
たら，プログラムを作っているのか，それ 
ともキー入力の反復練習をしているのかわ 
からなくなってしまいかねません rswo 
RD ” では，一応バッチ処理ができるんで 
すけどね……。誰か MAKE を作ってくれ 
ないかなあ？）。 

そのほかにも， 


•どんなに小さなモジュールでもデイスク 
に収めれば必ず，1クラスタ （4 K バイト 
相当）を占有する。ただでさえ，あまり容 
量の大きくない2 D のシステムに，このこ 
とはたいへん不利である。 

# 1 つ ひ とつのモジュールに 対していちい 
ちファイルのオープン&クローズを行って 
いたのでは，速度的に不経済である。 

•末葉的なモジュールは人間が手動で管理 
するよりも，なんらかの抽象的なシンボル 
でまとめて管理したほうが ， OOPS (Obje 
ct Oriented Programming bystem フー 
ん？）していて，カッコイイじやないかい？ 
などの理由により，モジュールを（半ば） 
自動的に管理してくれるようなシステムが 
ほし〈なってくるわけで，そこでライブラ 
リアンの御登場となるわけです。 

まあ以上の説明で，実感を持てるのは， 

リロケータブルアセンブラを使い込んでい 
て，モジュールの管理に心底困ったことの 
ある方でしょう。もっと，ぐっと簡単に説 
明してしまうと， 

「 Oh ! X が記事ごとに（モジュールごと 
に）書店に並んでいて，読者（リンカ）は， 
読みたい記事のみをそこから選んで買って 
いき，各自がファイルするなり，床に積み 
上げておくなりして管理するよりも， Oh ! 
X として1册にまとめて売っていたほうが, 
(必要のない記事（んっ？）の分だけ量は 
増えるが，）管理が楽である。」 

ということです。そして，編集部の代わり 
に編集を行うのがライブラリアンなのです。 
ここで，もう一度前述の説明を読んでみて 
ください。これで，だいたいのイメージは 
できたかと思います。 


WL 巳の使い方 


起動を終えてプロンプトが表示さ 
れているのを確認してください。次に，ひ 
とつに束ねてしまいたいファイル（リロケ 
ータブルフアイルであっても，ライブラリ 


ファイルであっても構いません）の名前を 
ポコポコと入力します。このとき，ファイ 
ル名は1つひとつ入力してリターンキーを 
押してもよいし，いくつかのファイル名 
を，’，’で区切りつつ，まとめて入力して 
リターンキーを押しても構いません。 

ファイル名の拡張子が省略された場合， 
まず ’ .REL ’でファイルを捜し，そのフ 
ァイルが存在しない場合には ’. LIB ’を捜 
します。 

そして，束ねてしまいたいファイルの名 
前をすべて入力し終わったら，それらを出 
力します。出力したいファイルの名前を夕 
イプし，その後ろに’ / E ’ をつけてリターン 
キーを押します。 

たとえば， AAA.REL I BBB . REL を 
<っつけて CCC . LIB というライブラリフ 
ァイルを作ろうとします0このときは以下 
のようにします。 

#LWLB 

# J 3000 ( WLB を起動する） 

*AAA ( AAA を言売み込む） 

*BBB ( BBB を読み込む） 
* CCC/E ( CCC を書き出す） 

#シフト+ブレイク キーを 押す 

これで，ディスク上には CCC . LIB とい 
うフアイルができあがつているはずです。 



WLB は，作業中にカレントディスクに 
$$$$$$$$. TMP というテンポラリファイル 
を作成し，作業の終了と共に消去します。 
したがって， $$$$$$$$. TMP という名のフ 
ァイルをカレントデイスタに持っていると 
自動的に消去されてしまいますので，注意 
してください。同様の理由により，作業中に 
シフト+ブレイクで強制的に WLB を抜け 
出した場合，カレントディスクに $$$$$$$$. 
TMP というファイルが残ってしまう場合 
がありますので，そのときは， S - OS の K 
コマンドで消去してください。 
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また， RAM ディスクをお持ちの方は， 
カレントデイスタに RAM デイスタを指定 
しておくと作業が早まります。 


ブログラムについて 


このプログラムは以下の 4 本のファイル 
から成っています。 

• SOS.DEF ( S-OS システムのシステム 
ルーチンの定義ファイル） 

• WLB.DEF ( WLB で用いる定数の定義 

フアイル） 

• WLB 1 .ASM (主に人間からの指示を解 
読する） 

• WLB 2 .ASM (ファイル操作など） 

ここに， 掲載され ているソースプロ グラ 
ムからアセンブルするときには， 

#LWZD 
# J 3000 
*= WLB 1 
*= WLB 2 

*[ シフト + ブレイク]て、' WLB を抜け 
出す。 

で，アセンブルをして，さらに， 

#LWLK 
# J 3000 

*/ P : 3000, / D : 4500 
* WLB 1, WLB 2, WLB / N:P 
でオブジェタトプログラムが得られます。 

プログラムの 中身については，ほとんど 
リンカと同じです。ただ，読み込んだリロ 
ケータブルファイルを，実際に，オブジェ 
クトとしてつなげていくか，それとも，リ 
ロケータ ブルファイルのまま出力するかが 
違うだけです。 WLK を解析しようという 
方は， WLB を先に解析するとよいでしよう。 
表2リファレンスマニュアル 

起動方法 

“SWORD” の拡張をしていない人はコマンドラ 
インから 
#LWLB 
# J 3000 

と，拡張をしてある人は， 

# WLB 

で起動します。すると，このあとプロンプト’*’ 
を表示してパラメータの入力待ちになります。 
なお，それぞれ 
# J 3000 

# WLB 

の後ろに，パラメータを書くこともできます 
(ここらへんは，先月号の WZD と同じです)。 

パラメータ 

まず，基本形は， 

* 「ファイル名] 


WLB はすべての入力が終わった時点で 
束ねる処理を行います0入カファイルの名 
前が入力されると，ディスク上に存在する 
か否か，とそのファイルサイズを記憶して 
おきます0入カファイルがライブラリファ 
イルの場合には含まれるモジュールすべて 
も記憶しておきます（表1参照）。 

そして出カファイルが指定されると，い 
ままでの記憶した情報をもとに，実際の束 
ねる作業を行います。これは， S - OS 上で 
使用できるメモリがかなり限られているた 
めです。 

この方法にしたため以下のような欠点が 
出てきてしまいました。 

1) 同じファイルを2度もオープンする 
ので処理速度が遅い 

2) 束ねる作業中にディスタを交換でき 
ない。つまり，ディスタを2ドライブしか 
持っていないューザーは，リロケータブル 
ファイルを2枚以内に集めておかなくては 
ならない。 

まあ， 1) の欠点はしようがないにしても， 
2) の欠点は，困ったものです。とりあえず, 
WLB はライブラリファイルも入カフアイ 
ルとして受け付けますので，ディスクごと 
にライブラリファイルを作って，最後にま 
とめるなどの方法で逃げてください（この 
欠点は WLK にも共通です。リンカにそんな 
に多くのファイルを読み込ませることはな 
いので，意識する必要はないと思いますが)。 

ホ ホ ホ 

先月号ですっかり書くのを忘れてしまい 
ました力 5 '， WZD&WLK を使って作成し 
たプログラムを，1987年11月号で発表され 

たファイルアロケータ& 口ーダのフオーマ 
ットに変換する方法を紹介します。 


です。この動作の繰り返しによって，組み込み 
たいモジュールやライブラリファイルなどを指 
定していきます。そして，組み込みたいモジュ 
— ルをすべて指定し終わったら， 

* [ファイル名] /E 

とすると，いままで指定してきたモジュールを 
組み込んだライブラリファイルが[ファイル 
名]で表されたファイル名で作成されます。 

スイッチ 

*/C 

WLB の初期化を行う。 

*/U 

未定義ラべルの一覧表を画面に表示する。 

木/し 

定義済みのラベルの一覧表を画面に表示する。 
* [ファイル名] /E 

UB ファイルとして，[ファイル名]を出力す 
る。省略時の拡張子は’丄旧’である。 


わかってしまえばなんのことはない，才 
ブジエクトプログラムを2種類作ってしま 
えばよいのです。 

具体的にいうと，いま PROG . ASM という 
ソースファイルをアセンブルするとします。 

# WZD =PROG 

で，リロケータブルファイルを作成して， 

# WLK / P :0000, PROG , PROGl/N 
として，アドレス000 Oh から始まる PRO 
G 1.0 BJ を用意します。次に， 

# WLK / P :1234, PROG ， PROG 2 /N 
として，アドレス 1234 h から始まる PRO 
G 2.0 BJ を用意します。あとはもう，説明 
の必要がないでしよう。 

老婆心ながら，アロケータは， 

LI:LD A ， L 1*2 

などというプログラムに対しては，対応し 
ていませんので注意して〈ださい（アドレ 
ス1青幸 B を桂卜けたり，割ったりすることはな 
いと思いますが，念のため）。 

表1 WL 巳のコマンドの格納のされ方 

01 h ,[ファイルサイズ （2 バイト）]，"フ 
ァイル名” ，00 h 

REL ファイルを読み込む。 

02 h ，”ファイル名” ，00 h 
03 h ,[ファイルサイズ （2 バイト）]，[シ 
ークアドレス （2 バイト）]，’’モジュール 
名” ,00 h 

モジュールを読み込む。 

04 h ,[ファイルサイズ （2 バイト）]，”フ 
ァイル名”，〇 Oh 

消去された〇丨コマンド 
05 h ,[ファイルサイズ （2 バイト）]，[シ 
—クアドレス （2 バイト）]，”モジュール 

名，， ，00 h 

消去された03コマンド 

FFh 

コマンドの終わり。 


* [ファイル名] /R 

LIB ファイルとして，[ファイル名]を出力する。 
*[ シフト+ブレイク] 

WLB の一切の作業を中断して， S-OS のコマン 
ドレべルに戻る。 

エラーメッセージ 

? Err 

WLB に対するコマンドがおかしい。 

File Access Error On [フアイル名] 

[ファイル名]のファイルにアクセス中にエ 
ラーが発生した。 

Illegal File 

与えられたファイルはリロケータブルファイ 
ルでも，ライブラリファイルでもない 
File Not Found 

該当するファイルが見当たらない。 
その他は，“ SWORD "のエラーメッセージに準 
じています。 
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リスト 1 WLB 


2 2 2(7 -15 CD 9E 13 7 FE PF 
CA CD 31 FE EO C2 25 35 
DD 36 00 03 CD 9E 37 DD 
77 03 CD 9E 37 DD 77 04 
B7 DD 6E 03 ED 5B 2A 45 
22 2A 15 B7 ED 52 EB 2A 
2C .15 23 73 2：3 72 DD 22 
2C 451105 00 DD 19 CD 
9E 37 DD 77 00 DD 23 A7 
20 F5 C3 83 312.A -19 45 
ED 5B 2A 45 B7 ED 52 EB 
2A 2C 15 23 73 23 72 B7 
C9 DD 36 00 FF 21 00 50 
7E 23 FE FF CA EB IF FE 
01 Cr 16 32 FF 02 CC OE 
32 FE 03 CC M 32 FE 04 


SUM : 5F 212F A4 51 E6 47 7F 

3800 23 22 80 4f> 2A 19 38 77 
3808 21IS 38 34 37 ：<F CO CD 
3810 IB 38 D8 219F 45 31 B7 
3818 C9 00 B10137 0(111 A5 
3820 45 216E 45 ED BO 3A D5 
3828 45 32 5D IF 3A D6 45 -17 
3830 3A DB 45 B8 30 76 CD E5 
3838 38 D8 3A D6 45 F6 FO -17 
38-10 3A DB 45 E6 FO B8 30 4 7 
3848 CB 3F CB 3F CB 3F CB 3F 
3850 21('B 4516 00 5F 19 ES 
3858 3A DB 45 1-6 FO ('D C9 : <8 
3860 CD 36 39 2\ fi2IF IB ()(， 
3868 5F 19 3K 8F CD )4 39 77 
3870 El D8 77 2：i 36 HO 62 
3878 IF 16 00 5F 19 36 HO 3A 


SUM ： K7 6E 8E A2 33 EF CC E5 


SUM : BO 71OB H9 FC 8B 4F 9E 7B5 J 

3880 DB In F6 FO ( f ； 10 3i ： DB : D て ... 

38H8 -15 CD ():< 39 D81H 9D :U : H 

3H90 Dfi -l** 32 DB 4n PB 3F CB : \Z 

3898 3F CB 3F CB 3F 21 <，6 15 : TV 

38A0 IB 00 5F 19 ： 1A D6 Ir f-H : ( 'J 

38A8 OF C6 80 77 3A D6 -In CD : HE 

38B0 C9 :»H EB 3E 012100 B1 : rP 


昔の Oh ! X を開いた。ら，ぺりぺり！ 

平木俊行 （19) 神奈川県 


35D8 41 3A 5? 4( 42 20 21，20 


35EO 

20 

20 

20 

20 

20 

20 

20 

2E 

OE 

35E8 

54 

4D 

50 

00 

CD 

A3 

IF 

T)ti 

58 

35F0 

CD 

55 

36 

D8 

2A 

74 

IF 

11 

FE 

35F8 

A5 

45 

01 

20 

00 

ED 

BO 

3A 

E2 

SUM : 

19 

09 

27 

8C 

E2 

88 

9B 

FA 0120 

3600 

5D 

IF 

32 

D5 

4 5 

AF 

32 

36 

DF 

3608 

4 5 

CD 

E5 

38 

D8 

06 

10 


2B 

3610 

00 

3 A 

C3 

45 

11 

C5 

45 

I ：. 

6F 

3618 

13 

FE 

7F 

30 

OF 

2A 

62 

IF 

7A 

3620 

85 

6F 

30 

01 

24 

7E 

05 

28 

F4 

3628 

28 

0C 

18 

EB 

OD 

F5 

79 

87 

39 

3630 

87 

87 

87 

4F 

FI 

D6 

80 

81 

AC 

3638 

32 

DB 

45 

AF 

32 

D6 

45 

01 

4F 

3640 

37 

00 

11 

37 

45 

21 

A 5 

45 

CF 

3648 

ED 

B0 

3E 

FF 

32 

C4 

: <7 

B7 

BE 

3650 

C9 

3E 

07 

37 

C9 

3A 

5D 

IF 

C4 

3658 

CD 

74 

36 

D8 

CD 

7F 

36 

D8 

A9 

3660 

3E 

08 

37 

C0 

E5 

ED 

5B 

74 

DE 

3668 

IF 

01 

20 

00 

ED 

BO 

El 


3C 

3670 

CD 

C9 

36 

C9 

FE 

41 

38 

04 

10 

3678 

FE 

45 

3F 

DO 

3E 

03 

C9 

OE 

6A 

SUM ： 

FD 

7A 

C5 

OA 

AC 

42 

D8 

9D 36EC 

3680 

10 

ED 

5B 


IF 

ED 

53 

D7 

EE 

3688 

45 

2A 

64 

IF 

3E 

01 

CD 

00 

FE 

3690 

20 

D8 

06 

08 

22 

D9 

45 

7E 

CA 

3698 

FE 

FF 

28 

1A 

B7 

28 

OB 

' 

FE 

36A0 

ED 

5B 

74 

IF 

CD 

BA 

36 

Dl 

69 

36A8 

28 

OD 

D5 

11 

20 

00 

19 

Dl 

25 

36B0 

10 

E2 

13 

01) 

20 

CF 

3E 

AF 

EE 

36B8 

B7 

C9 

C5 

E5 

06 

10 

13 

23 

76 

36C0 

1A 

BE 

20 

02 

10 

F8 

El 

Cl 

A4 

36C8 

C9 

E5 

E6 

87 

21 

IF 

29 

BE 

42 

36D0 

El 

C8 

3E 

06 

37 

C9 

CD 

A3 

5D 

36D8 

IF 

D8 

CD 

AF 

IF 

D8 

01 

20 

8B 

36E0 

00 

11 

A5 

45 

2 A 

74 

IF 

ED 

A5 

36E8 

B0 

3A 

5D 

IF 

32 

D5 

45 

2A 

DC 

36F0 

El 

27 

22 

D9 

45 

2A 

DF 

27 

78 

36F8 

22 

D7 

45 

CD 

14 

39 

D8 

32 

62 

SUM ： 

E5 

81) 

88 

OB 

85 

EC 

03 

50 570C 

3700 

C3 

45 

32 

C5 

4 5 


HO 

32 

34 

3708 

C6 

45 

AF 

32 

DB 


32 

36 

74 

3710 

45 

32 

D6 

45 

21 

00 

00 

22 

D5 

3718 

B7 

45 

01 

37 

00 

11 

6E 

45 

F8 

3720 

21 

A5 

45 

ED 

BO 

3E 

00 

32 

18 

3728 

19 

38 

B7 

C9 

21 

6E 

•15 

11 

B6 

3730 

A5 

45 

01 

37 

00 

ED 

B0 

3A 

F9 

3738 

D5 

45 

32 

5D 

IF 

2A 

B7 

45 

EE 

3740 

2C 

2D 

C4 

2C 

38 

3A 

DB 

45 

DB 

3748 

2A 

B7 

45 

2C 

2D 


01 

3 (： 

DC 

3750 

67 

22 

B7 

45 

3E 

01 

ED 

5B 

OC 

3758 

D7 

45 

2A 

64 

IK 

CD 

00 

20 

B6 

3760 

D8 

21 

A5 

45 

ED 

5B 

D9 

45 

49 

3768 

01 

20 

00 

ED 

BO 

3E 

01 

ED 

EA 

3770 

5B 

D7 

45 

2A 

64 

IF 

CD 

03 

F4 

3778 

20 

D8 

CD 

E5 

38 

D8 

06 

10 

DO 

SUM ： 

21 

A3 

88 

FF 

2C 

OF 

42 

1)2 D36A 

3780 

21 

C5 

45 

7E 

FE 

IV 

30 

12 

68 

3788 

23 

4E 

E5 

2A 

62 

IF 

16 

00 

17 

3790 

5F 

19 

71 

El 

05 

CA 

51 

36 

20 

3798 

18 

E9 

CD 

03 

39 

C9 

21 

C4 

B8 

37A0 

37 

34 

20 

08 

CD 

Ci] 

37 

D8 

35 

37A8 

21 

68 

45 

34 

2A 

C4 

37 

7E 

A5 

37B0 

B7 

C9 

7D 

3D 

32 

C4 

37 

7C 

E3 

37B8 

32 

68 

45 

CD 

C6 

37 

21 

68 

32 

3700 

45 

34 

B7 

C9 

00 

BO 

01 

37 

El 

37C8 

00 

11 

A5 

45 

21 

37 

4 5 

ED 

85 

37D0 

BO 

3A 

D5 

45 

32 

5D 

IF 

3 A 

EC 

37D8 

D6 

■15 

47 

3A 

DB 

45 

BK 

DA 

<1E 

37E0 

51 

36 

78 

CD 

C9 

38 

EB 

3E 

F6 

37E8 

01 

21 

00 

iU'< 

CD 

00 

20 

D8 

97 

37F0 

01 

37 

00 

11 

37 

45 

21 

A 5 

8B 


37F8 45 ED BO B7 C9 2A 80 45 


32 

C2 

95 

74 

6C 

9C 

9B 

4 A 

DO 

44 

98 

7D 

4C 

70 

EF 


32F8 50 210100 DD 7E 00 DD : AA 


SUM: 

6A 

13 

10 

B4 

82 

61 

F8 

DO 7406 

3 300 

23 

FE 

FF 

(：8 

FE 

01 

20 

r パ 

13 

3308 

DD 

23 

DD 

23 

23 

23 

2：< 

CD 

36 

3310 

43 

33 

18 

E8 

FF: 

02 

20 

05 

9B 

3318 

CD 

A1 

34 

18 

DF 

FF 

03 

20 

BA 

3320 

10 

DD 

23 

DD 

23 

DD 

23 

DD 

ED 

3328 

2a 

23 

23 

23 

CD 

43 

33 

18 

E7 

3330 

CB 

FE 

04 

28 

04 

DD 

23 

DD 

D6 

3338 

23 

DD 

23 

DD 

23 

CD 

A1 

34 

C5 

3340 

C3 

FC 

32 

DD 

7E 

01 

FE 

3A 

85 

3348 

20 

04 

DD 

23 

DD 

23 

DD 

7E 

7F 

3350 

00 

DD 

23 

23 

FE 

2H 

CA 

A1 

BA 

3358 

34 

CD 

78 

35 

20 

FO 

C9 

DD 

64 

3360 

21 

00 

50 

2 A 

30 

45 

22 

32 

64 

3368 

45 

DD 

7E 

00 

DD 

23 

FE 

FF 

9D 

3370 

CA 

84 

34 

FE 

01 

20 

32 

3E 

11 

3378 

E0 

CD 

FD 

37 

3A 

32 

45 

CD 

5F 

SUM ： 

58 

A8 

3E 

A7 

D6 

HA 

85 

76 26E9 

3380 

FD 

37 

3A 

33 

45 

CD 

FD 

37 

E7 

3388 

2A 

32 

45 

DD 

5E 

00 

DD 

23 

DC 

3390 

DD 

56 

00 

DD 

23 

19 

22 

：\2 

AO 

3398 

45 

DD 

7E 

01 

FE 

3A 

20 

01 

FD 

33A0 

DD 

23 

DD 

23 

CD 

BC 

34 

18 


33A8 

C0 

FE 

02 

20 

06 

CD 

A1 

34 

88 

33B0 

C3 

69 

33 

FE 

03 

20 

2C 

35 

CD 

EA 

33B8 

E0 

CD 

FD 

37 

3A 

32 

45 

5F 

33C0 

FD 

37 

3A 

33 

45 

CD 

FD 

37 

E7 

33C8 

2A 

32 

45 

DD 

5E 

00 

DD 

23 

DC 

33D0 

DD 

56 

00 

DD 

23 

19 

22 

32 

AO 

33D8 

45 

DD 

23 

DD 

23 

CD 

BC 

34 

02 

33E0 

C3 

69 

33 

FE 

04 

28 

04 

DD 

6A 

33E8 

23 

DD 

23 

DD 

23 

DD 

23 

CD 

FO 

33F0 

A1 

34 

C3 

69 

33 

DD 

21 

00 

32 

33F8 

50 

DD 

7E 

00 

DD 

23 

FE 

FF 

A8 

SUM: 

A9 

E6 

45 

74 

F4 

B3 

60 

50 D378 

3400 

C8 

FE 

01 

20 

32 

DD 

IK 

00 

44 

3408 

DD 

23 

DD 


00 

DD 

23 

C5 

E8 

3410 

DD 

E5 

El 

11 

00 

45 

CD 

13 

D9 

3418 

35 

23 

E5 

DD 

El 

3H 

01 

11 

‘IB 

3420 

00 

45 

CD 

EC 

35 

Cl 

1)8 

C5 

91 

3428 

CD 

9E 

37 

CD 

FD 

37 

Cl 

0B 

6F 

3430 

78 

B1 

20 

F3 

C3 

F9 

33 

FE 

29 

3438 

02 

20 

19 

DD 

E5 

El 

11 

00 

EF 

3440 

45 

CD 

13 

35 

23 

E5 

DD 

El 

20 

3448 

3E 

01 

11 

00 

45 

CD 

EC 

35 

83 

3450 

DK 

C3 

F9 

33 

FE 

03 

20 

1 (： 

0 4 

3 4 58 

DD 

6E 

02 

DD 

66 

03 

CD 

B2 

12 

3460 

37 

DD 

4E 

00 

DD 

46 

01 

C5 

4D 

3468 

CD 

9E 

37 

CD 

FD 

37 

Cl 

OB 

6F 

3470 

78 

B1 

20 

F3 

FE 

04 

28 

04 

BA 

3478 

DD 

23 

DD 

23 

DD 

23 

DD 

23 

00 

SUM ： 

8F 

2B 

82 

05 

6E 

6B 

99 

92 8C0A 

3480 

CD 

A1 

34 

C9 

3E 

FF 

CD 

FD 

72 

3488 

37 

C9 

3E 

2A 

CD 

F4 

IF 

ED 

35 

3490 

5B 

76 

IF 

CD 

D3 

IF 

1A 

FE 

C7 

3498 

IB 

CA 

FA 

IP 

13 

D5 

FD 

El 

C4 

34A0 

C9 

DD 

7E 

00 

DD 

23 

A7 

20 

EB 

34A8 

F8 

C9 

FD 

E5 

Dl 

7.E 

A7 

28 

Cl 

34B0 

07 

1A 

BE 

C0 

13 

23 

18 

Ff) 

E2 

34B8 

D5 

FD 

El 

C9 

DD 

7K 

00 

FE 

1)5 

34C0 

2E 

28 

OC 

CD 

FD 

37 

DD 

7E 

BE 

34C8 

00 

DD 

23 

A7 

C8 

18 

ED 

CD 

41 

34D0 

A1 

34 

3E 

00 

CD 

FD 

37 

C9 

Dl) 

34D8 

7E 

23 

A7 

37 

C8 

FE 

2E 

20 

93 

34E0 

F7 

C9 

06 

OF 

1A 

CD 

78 

35 

«9 

34E8 

38 

OA 

05 

28 

07 

FF 

2E 

28 

CA 

34F0 

03 

13 

18 

FO 

3E 

2E 

12 

1 :く 

AF 

34F8 

CD 

FC 

34 

C9 

06 

14 

AF 

12 

A1 

SUM ： 

63 

A5 

10 

EH 

•IE 

80 

FF 

B... DO IF 

3500 

7H 

23 

CD 

78 

35 

38 

(n 

05 

Bl 

3508 

28 

06 

12 

13 

AF 

ra 

18 

FO 

ir 

30 

3510 

EB 

23 

C9 

06 

14 

AF 

12 

7H 

3518 

CI) 

78 

35 

na 

05 

C8 

23 

12 

54 

3520 

13 

AF 

12 

18 

F2 

21 

4B 

35 

7F 

3528 

CD 

B1 

35 

21 

00 

45 

Cl) 

B1 

97 

3530 

35 

CD 

EE 

IF 

C9 

46 

69 

f；r 

F3 

3538 

65 

20 

41 

63 

63 

65 

73 

73 

D7 

35-10 

20 

45 

7L， 

72 

6F 

72 

20 

BF 

B9 

35-18 

6E 

3A 

00 

49 

BC 

6C 

65 

(•>7 

95 

3550 

61 

6C 

20 

BH 

69 

nr 

6f> 

20 

AD 

3558 

0D 

00 

42 

61 

64 

2() 

4 3 

6F 

Efi 

3560 

6D 

6D 

61 

6E 

64 

20 

OD 

00 

•T\ 

3568 

46 

69 

nr 

65 

20 

6E 

6F 

74 

FI 

3570 

20 

66 

6F 

7n 

BF 

64 

OD 

00 

19 

3 578 

FF 

2F 

28 

06 

FE 


28 

Oi ： 

AF 

SUM: 

An 

67 

HB 

F4 

B3 

5A 

28 

25 97D4 

3580 

A7 

(0 

37 

C9 

2! 

00 

00 

FI) 

Mn 

a 588 

7E 

00 

16 

30 

FE 

: H) 

1)8 

KI 

C8 

3 590 

3 A 

38 

1! 

1H 

-11 

FF 

11 

D8 

FI 

598 


17 

38 

OH 

16 


FE 

61 

5R 

:} 5.AO 

D8 

FF 

H7 

DO 

29 

L，9 

29 

29 

Bl 

H5A8 

92 

16 

00 

5F 

19 

FD 

0 o 

1H 

58 

35B0 

D6 

7E 

2 ソ 

A7 

CH 

CD 

FI 

IF 


3 5B8 

1ft 

F7 

57 

1C 

41: 

20 

7R 

6f> 

KF 

35CO 

72 

20 

31 

2E 

30 

30 

20 

2H 

99 

35C8 

62 

79 

20 

54 

2F 

49 

73 


\ 1 

3 5 DO 

69 

67 

61 

HD 

69 

29 

on 

00 

AT) 


►つい 先日フラクタルの記取を読もうと思い， 


SUM ： 70 40 86 FD Bo CT F5 61 7BB2 

3200 CC 0C :}2 FE 05 CC OA 32 : 15 

3208 1H DE 23 23 23 23 7E 23 : 23 

3210 A7 20 FB C9 23 23 23 23 : 17 

: <21H CD B135 D5 ED 5B 7A :F : 69 
32201A D1 E6 07 Cfc CD FI IF : 7D 

3228 18 FI Dl) 36 00 FF 2100 : 3(. 

3230 ：>0 22 28 -15 7E 23 FE l-.F : 7D 

3238 28 2B FE 01 CC 7A 32 28 : F2 

32 JO18 FE 02 CC 0?. 32 FE 0：i : 25 

324H CC 78 \2 2812 FE OA CC : 7E 
3250 OC ：12 FE 05 CC 0.\ .Vi 18 : 61 

3258 Da 2A 28 -}5 36 04 C9 2A : 9C 

3260 28 4 5 05 C!) 21 BC V2. : 30 

3268 CD B135 C9 4E 6F 74 20 : CD 

327016 BF 75 6R 61 20 l)D 00 : 
3278 23 23 23 231100 -15l.\ : .-1 


SUM : 28 24 CB DF F« ( A 96 :* A 75iiF 

32B0 A7 28 07 BK 20 07 l:i Z：\ : PI 

32881H K5 7K A7 CH CD OE 32 : 08 

3290 01 A7 (：9 DD 00 FF : Cl 

32981 t 14 45 210015 CD Ff : 99 

32At) 3 1 211-1 4 5 Cl) D8 ：) I 11 : iH 

32A8 M 1;. 2107 : n DC E2 34 : \A 

： J2B0 3E 0111]t l.i CD A：} IF : : J8 

32BH 1)8 3A nD 1F 32 DH 35 31 : OH 

3 2TO 011108 ：35 CD D« 3B D8 : DO 
32C8 CD F5 32 22 30 4 5 ('D 5F : B7 

32DO 33 CD F5 33「•[) 2 '： 3 7 D8 : 30 

32D811 H 45 CD \3IK D8 ri) : 9K 

32E0 7F ： U ； D8 CC 15 20 1)811: 77 
32E8 DH : <5 CD A3 IF D« 11 M : 99 

32F0 45 CD 12 20 C9 DD 21 00 : OB 


152 Oh!X 1990.10. 


3000 ED 7B 6A IF 21 BA 3o CD : CE 
3008 B135 ED 5B 76IF 1313 : E9 
3010 06 011A 13 A7 28 07 FE : 08 
3018 20 20 F7 0418 F4 Co DD : E9 
3020 2100 50 DD 36 00 FF FI : 74 
3028 FE 0120 05 CD 8A 3418 : C7 
3030 11 FD 2A 76IF FD 23 FD : EA 
3038 23 FD 7E 00 FD 23 FE 20 : DC 
3040 20 F7 FD 7E 00 A7 CC 8A : 8F 
3048 3411 00 45 FD E5 El CD : 1A 
3050 13 35 E5 FD El21 E5 30 : U 
3058 CD AA 34 21 E8 30 C4 AA : 52 
3060 34 ,20 0B DD 21 00 50 DD : 8A 
3068 36 00 FF C3 C8 30 21 FI : 02 
3070 30 CD AA 3A 21 F4 30 C4 : E4 
3078 AA 34 20 06 CD El31 C3 : A6 


SUM ： 8F D4 6A A412 8190 67 7E0E 

3080 C8 30 21 EB 30 CD AA 34 : DF 
3088 21 EE 30 C4 AA 34 20 OA : OB 
3090 DD E5 CD 94 32 DD El C3 : D6 
3098 C8 30 2] F7 30 CD AA 34 i EB 
30A0 21 FA 30 C4 AA 34 20 06 : 13 
30A8 CD 94 32 C3 FA IF 21 FD : 8D 
30B0 30 CD AA 34 2100 31 C4 : FI 
30B8 AA 34 20 06 CD 2A 32 C3 : FO 
30C0 C8 30 CD 1131 DC 33 20 : : J6 
30C8 FD 7E 00 A7 2814 FE 2C : 88 
30D0 FD 23 28 OE 21OB 31 CD : 80 
30D8 B135 FD 2A 76IF FD 36 : 1)5 
3OE0 00 00 C3 42 30 2F 43 00 : A7 
30E8 2F 63 00 2F 45 00 2F 65 : 9A 
30F0 00 2F 4C 00 2F 6C 00 2F : 45 
30F8 52 00 2F 72 00 2F 4B 00 : 6D 


SUM ： 4A 5A 9B CE 62 0C 15 A2 CC27 

3100 2F 6B 00 52 45 4C 00 4C : C9 
3108 49 42 00 3F 45 72 72 OD : 00 
3110 00 21 00 45 CD D8 34 11 : 50 
3118 00 45 2103 31 DC E2 34 : 8C 
3120 3E 0111 00 45 CD A3 IF : 24 
3128 D8 CD ()9 20 38 21 DD 36 : 3A 
3130 00 01 DD 23 2A 72IF DD : 99 
3138 75 00 DD 23 DD 74 00 DD : A3 
3140 23 DD E5 Dl2100 45 CD : E9 
3148 FC 34 E5 DD El B7 C9 FE : 51 
3150 08 37 C0 11 00 45 21 07 : 7D 
3158 31 CD E2 34 3E 0111 00 : 64 
3160 45 CD EC 35 D8 DD 36 GO : IE 
3168 02 DD 23 DD E5 Dl21 00 : B6 
3170 45 CD FC 34 E5 DD El21 : 06 
3178 00 00 22 2A 45 212D 45 : 24 


0808080808080808 

8899AABBCCDDEEFF 

3 3 3 3 3 3 3 3 3 3 3 3 3 M 3 3 


F r 9 B 8 -「• FA2 F 8 F KDE -nD 

8 F A 16 c 8 6 8 2 Q- F F r 9 9 
2 

9 . 








































B.VEF Header File For WLB 
# WZD 
»=WLB1 

2 WLK /P:3000,/D:4500 
« WLB1,WLB2 ， WLB/N:P 


: KDBUF 
: WHBUF 


0B000H 

0B100H 


• BOFFH 

• B1FFH 


Z.GETL 
DE, inname 


fcopy2 

HL 

IY 

HL f swC 

amatch 

HL,swCt3 

KZ,ajnatch 

NZ.OC10 

IX,cmdbuf 
UX),EOF 
CC12 

HL,swL 

amatch 

HL,awL+3 

NZ,axnatch 

N2.CC17 

OClT^ 

HL f swE 
amatch 
HL.swE+3 
NZ, eumtch 
NZ.CC21 


■J スト 2 


Coavnand 

Coanand 


•Skip •• • or »# J , 
；B = ante 


； 1X means Comnand pointer 
;A : arge 


;Get CorraTuuKi Line 


: Skip • or'tJ* 


: Lin F: le / V «»； 


Librarian For W-ZHDA 

Prograjmxl by T.Ishigami 
，90 Jul 10th 


；LD 

；LD IY.HL 

； VC r Comnand 


； VE* Comnand 

: , /R, Command 

;，/K, r.unnand 


;if(there( inname) NO) 

; flneat(lnnaroe. ,, RBL M ) 

;Bin File 

•/ •••.REL' r rtV/yr •"••LIB， ヲ，がス 

••イカ *REl/ file / 

；LD DF..IX 

: LD IX.HL 
;CV = 0 


38B8 

CD 

03 

20 

D8 

01 

37 

00 

11 

11 

38F8 

5E 

IF 

2A 

62 

IF 

CD 

00 

20 

: 15 

3920 

10 

F9 

3E 

09 

37 

18 

04 

3E 

El 

38C0 

6E 

45 

21 

A 5 

45 

ED 

B0 

B7 

12 











3928 

80 

90 

A7 

El 

Cl 

C9 

26 

丨 ' 

48 

38C8 

C9 

F5 

F5 

CB 

3F 

CB 

3F 

CB 

92 

SUM ： 

77 

5r 

3D 

A5 

92 

10 

EO 

DF 

AD82 

3930 

6F 

29 

29 

29 

29 

C9 

E5 

; 

8C 

38D0 

3F 

CB 

3F 

21 

C.5 

45 

16 

00 

8A 











3938 

3C 

CB 

ID 

CB 

3C 

CB 

ID 

CB 

DE 

38D8 

5F 

19 

7E 

CD 

2E 

39 

FI 

E6 

01 

3900 

El 

i)i 

C9 

D5 

H5 

3E 

01 

ED 

: 61 

3940 

3C 

CB 

ID 

CB 

3C 

CB 

ID 

7D 

90 

38E0 

0F 

85 

6F 

FI 

C9 

D5 

E5 

3A 

Bl 

3908 

5B 

5E 

IF 

2A 

62 

IF 

CD 

03 

: 53 

3948 

El 

C9 







AA 

38E8 

36 

45 

57 

3A 

5D 

IF 

BA 

28 

HA 

3910 

20 

El 

D1 

C9 

C5 

E5 

06 

80 

: CB 











38F0 

0F 

32 

36 

45 

3E 

01 

ED 

5B 

4 3 

3918 

2A 

62 

IF 

7H 

B7 

28 

08 

23 

: 33 

SUM: 

DE 

83 

20 

EF 

5C 

AA 

25 

E4 7D40 


DB 

VC , f O//c , 

DB 

, /E , .O t , /e , 

DB 

, /L , ,o//r 

DB 

, /R , ,0//r , 

DB 

•/Ksez/k 1 


REL: DB , REL*,0 

LIB: DB ^IBSO 

£RH: DB •?Err，，CF 


肌 . File J 
肌 ： LD 


HL,inr 

there 


DE, inname 
HL,strREL 
C.flneat 

A,1 

E£ f inname 


is 

tedted 

11 


12345 ODH1BHOFFH153 瞧 
r.ta 撕柳 HaL-EQUEQUwssEauEQUEQU 
;t'on.,RELLlDl 訊嶋 CRBRKEOFNAME 二 


p(_kbf i g S Brl_KBFs = 

SPHL-PUDHraDHB-A,DEAZ--NZBoclBeIx ( rAFlNZOETLgIYIVIY A, (IY,N'ZA,A 

LDLDCALLscINCLOLDINC r cp JRINCJRPUSHII)lDpopcpJR r SCIKCSCCPJRLO.-VVD 

;ccl:OC3:=CC8: 


=Eii!El==iisil=lEiiE= 

§ iBQU 脚 EQU 蝴撕 EauEQL'EQUEauEQUEQUGQUBaJEQUEQUilBQUwiBauBQUEQUEQUEQUKJUBQUEQL'BfluEQUEQUEaL ' 〆 

f—ms 1 ® 

ccccccccccccccccccccccccccccccccccccc 


^LD^c/UJ^LDsdJRLD 3 JPLDCALLsCAIlJRCALLJPLDCAU.sCAliJRPUSHCALL pop JPLDCALLLDsJRCALLJPs 23 CALLJRCAI.JPc'AUdLD-r cp sJRLDCAlJLDLD Jp 

0 7 1 6 1 2 •. 

ccloclCr2cc2g ECC5 


SOFF1F00 
3 t 3 3333 0 0 3 3333 313 333 34323 33433431F 334 3134 33312 (H)3137 003 
dA tt E5 13E] E5 AA E8AA0B 2136 C 8 F1AAF4AA 06 E 1 C 8 EBAAEE AAeA E5 94 E 1 C 8 F7AAFAAA 06 94 FAFT)M00M 062 AC 81133 7E H2C230E 0 BD 12 A 3642 
ccUFD H1CDE5FD 21 CD 21 C4 20 DDDDC321 8 21 3 20CD C3 21CD21C420DDCDDDC3 21 CD 21 C4 20 CD C3 21 CD 21 C4 20 CDC3CD DC FD A7 28 FEFD 28 21 CDFDFDC3 


3 5 c 2 B 
6 66(7 6 
F F F p F 
2 2 2 2 2 
0 0 0 0 0 
0 0 0 0 0 

3 5 c 2 B 

4 4 4 5 4 


§§720 


6 99CEF 23558 BE1337BEH147ACCF2258BE0025 7AAD03,b88BFF14-7ArcF2 2-0 88BCE024-47A^22555ABV167CD 
4-4444-455 555 556 6 66 6 6677777778888889999999 9 AAAAAAAABBBRW^nr ^Krr,K^ccwn^DDDDHHEHE^EFKFFPF 
00000000000000000000000000000000000 ^000^00000000000^^^^0^^^00^00000000000000000 
333333333333333333333333333333333333333333333333333333333 333333333333333333333333333 

^—8901^*34-5 6789012345678 90] 234567890123456 7 8901234567890123 4 -567890123456789^123456789ft 
2 2233 ^03^33333444444444455555555556666666666 7 7^/ 77 7 7777 8888 8888889999999999000000 ^0001 


01 

*t3 *3134 # 1 2 0 1000 $ 3 

01SA3092136237275237423E5*tFTEt 

2 F g 2 Foo 2 F§ 2 Feo 2 F§ 524 c 3 Fg S 8 u sDC3E n CD s ct) 388 DD 2 ADDD 0 DDDDg E SCDH5SB7C9 

02'03 >03*07 ' 的 21 rl!'11 '1 1'u *1 4'1 7'US20'20 *22 '25 *28 '29'2C'2F.*2£'32'34'37'3A'3r'3K'-Jr-lr 5 -I-J'•!7'-IA'SSJF'IK'4K'-IF' 


» 0123456789012345678 9 01234567 8 9 012 
1222222222233333333334 *4444414^4 5 -n-D 
t 22222222222222222222222 222222222 


sij 卜 Jr 

CALLRETiJRtJJINCLDLDINrulINCipt)p 3 rAI.l 町 pnpORFlET 


tritrltrlr 而 
88s ;;;a 


F F 0 T F 
1 1 5 F 1 

A 5 5 6fo0 4 6 0 o 
6 3 3 7 ^ o 3 70<(> 

7BABl5 0 02F7F 23 0 0 8 112A227E22F 7 
ED 21 CDED131306lA13A728ra2e0418C5D0DDnFE2eCD 18 roFUFDFDKDrazoKDA7 

00000000 0O,A ,4 6 42A42OEDOO0O^O0OOOOOOOO^OOOOO^^12345ODBTOF 34000000044 7 AAEFO 234579 BCEEFF378ACCF115 7 9CH022-n. 
oogooooH)o§oolooooFFFFFFgFKraFDFDrc pc FBIFBKAFAIFggJooelol s ooooooooFTFTFTFTFeFereFeFSFSoooooogggoooooooooooogggoologoooogggoo 脱 00 脱 o0oooosOFT§oo§sgoooogoo g oo00o0K)0§goo)o 0 則 Glsolmsolsol0l s olelo2o2o2o2o2o2o2ssgso33s«4c4l!4r4 
^000^000 33111111111111111122223223111111111133333333333 M33 3 BB 35333 3 300030 0033333 333333333333333333333333333 05, 

123456789012345678901234567890123456 7 890123456789012345 6789012345678901234567890123456789012345678901234567890123456789 34 5 6 
1111111111222222222233333333334>4444444445555555 55 5 6666666666777777777788888888889999999999^000000000111] 1111112222222 


THE SENTINEL 


►このおれにアドベンチャーの素唷らしさを教えてくれた清水和人氏がついに帰ってきた。 
そこで淸水氏に復活を祝して北斗赏を送ろう。 古岡伸一 （19) 山口 m 


ライブラリアン wlb 153 

































IJRHL 

2.CC94 


Z,umodO 

MOD 

Z.ckiH 

Z,kil3 

WEL 

Z,iiD0d2 

LM3D 

Z,urood4 

kill 

HL.(HLBLT) 

(HL) V UREL 


HL.kilS 

_puta 


•Kot Found »,CR 


DE,inname 

A.dJB) 


Z,kki2 

(HL) 

NZ f kki3 


pd0 


IX.cmdbuf 
HL,1 
A, (IX) 


_puta 

prtTAB 


«■,( FRCNT) 


ried Modlule Name 
{LX),FX»F 

HL.mribur 

(HLBITI.HL 

A,<HU 


EOF 

7 t kill 


Z,ckii2 

Z,kii2 

UB 


；if !HU=RHL ■ 

； if SAME goto kil2 


: File not Found ， • ケ ； U •ス 


DC,innane 
Hl.,strLIB 
f lneat 

A.l 

DE, innane 
RDOFEN 


；f lneat (innaine, "LIB") 
;Bin File 


IX 

HL,0 

(LIBseek) v HL 
HL,DUMMY -1 
(LIBadra).HL 


;Cancel first Adjuatinent 


OFTO 
Z, 0052 
0E0H 
NZ.ERR 

<IX) t M0D 
IKRTT 一 
(IX+3),A 
INWT^ 
(IX+4),A 

H,A 

L,(IX+3) 

DE,(LIBseek) 

(LIBseek) t HL 

A 

HL , 邡 
DE.HL 

HL,(LIBadrs» 

HL 

(HL),E 

HL 

(HL),D 

(LIBacrs).lX 


;Seck Addres for input 
；HL = seek Address for input 


S7.,CCI\ 

CC50 

nE,(UB««H?k) 

A 

m.,DE 

DE,HL 

HL, U.IBftrinn 


；DH = Last Modlue 3iv.e 


if (HL)=M0D ■ 
if SAME goto kil3 


Not-Matched ,2=1 Matched 

Not-«natched 

••Put End code 


；A = Device Viinber 

: Bin File 


;close tjnp file 

；FCB Search 

: Kill old outna/ne if exsita 
;rename tinp-file to outruune 


;There U always EOT Code 


； E0-ITEM 
••Offset Address 


;E0-ITEM 
； Offset .Addresa 

• UMOD 


►飛近よく思うことなんだけど，小さい顷は早く大人になりたいと思ったけど，大きくな 
るにつれて，子供に戻りたいと思うようになってきた。小学校の頃は楽しかった。外で1 
日中遊んでたもんなあ。これを読んでる小学生の人（ゼロに近いと思うけど）， ファミコン 
ばっかしてんと外で思いっきり遊びなさい。 松鳴样文 （17) 京都府 




tr®cc9tr0 

1 g 浩 SSSL CC9 


Hi 


1 广 ^ 孤 131|1 晒 1 隱 1| 


&SCFRETSCALL 33 CALLiscl 13 CALLrsssCALL& 犯 $ 33SSSBCSINCSC33 SIC.ALL 5 s 五 2 ； sagSBC s INCsINCssRET 
J _OC51:^ 


outLDLD 3 INCcpJPcpCALLcpCALLcpCALLcpicpCALLJR 

11 -tj: 


INCINCINCrNCiscrRETINCINCINCINCCALLCALLRETTABr 3 popANDRETCALLJRk S 3 3 3 INCCF- 用 cps u rp 


I:: 11 


i! 


FEOS 


t14 拿拿 o t 4 ot 尊拿 寡 15 0 拿 3 尊 4 3 拿拿 # 
— 33 t t O $ 3 〇搴拿拿 拿 330 拿 0 拿〇 0 本拿 t 

t 7 2 11$ 6 3 5 f V 1 P 拿家拿 tp-DG 5 6 t 7 $ 7 E B t 2 I 
V o E 0 9 — 3 2 E t F E o 拿 f 拿 掌 FL>E2 3 寥 7 拿 7 65 拿 5 拿 


2 〇 1 * 7 2 -F H * 5 
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1I21CD3E n CDD8DDDDDDm21CDE5ro 212221228 FECAFEC2DDCDDDCDDO67mHD22B7EDEB2A23732372DD1 lDDCDDPnDATvof.lZAe)B7HDEB2Ai:3732372B7c9 


FF 

0050 IF 3232323232 
36 §FFEBS S 02 OES 2 s 0 c05eADE 
ro2t7E23FECAreccFEocreccFEocFEcc18 


FBBl 
2 2 2 27E2 A 2C92232 2 6 


F 

7AIF 
507F1F1 
D5ED 1 ASH 6 C 8 CD18 


6 o » T B t A 8 2 

3 0* F 2 • o - - o 

DD21227E23FK2HFF.b28FE 
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i&sr&CALL&srsRET 33 RET 3 CAy.RETsrNCI^INC3 3 I 漂 sc^s iRET^iRETFi 1 3 3 3CAL 3 Ou.33 ■ 5 s^-s 3 :5^^^^3^| IC/UJ.RET 5 CALL^CAlxRETFJ 1 3 3isc& I & 故 ssir$r& 泥 INC^s^re^INTs 




ckickickil kki 


2064 

••J2323232SS3235746E«32 
OEO37812O40CO5OAD8M04 **05 6 CB 16 F 7500 け 0707F5OEel 
brecr28FEbrecr182A36S 2 A 36 C9 21 CDC9 4 E6F 0 D232323231 11AA728BE201323187EA7C9CD 3 HA7C9 


§ $ $ 4 #4114 t F F 5 -5 $ 2 f 3 I # F 本 o 5 F to 
拿事 3 ♦ 3 ♦ 3 3 t 1 13 - 3 t 3 13 3 $ $ 1 $ 2 31 $ 2 
6 拿拿 p *8 拿 72 113 D ^ 15# *D**F 5 I *3 $ 5 s 3 $ 2 
3 拿尊 R 拿〇專 GE o t A 5 w OB# F # 5 F t t A 零 1 w A $ 1 

D IIP lpllcE1P95A2 e-1 t))kP 2PP p )8 丨 T)9gD8r 8 11 )) 811 )9 
D 12 G 2 c 12 D 3 1 c D 3 3 3 . 1 C 1 l>c 2 c c c n lcDcDCD laDalac 
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eooooo333433 

2101 7E23FFoloc232343H 80205 AlDF03 10 2323232343CB 0 -J04232323 

DD21DDroresFE 20 DDro232323CD18FE20CD 18 FE20DDD0DDDD232323CD 18 FE 28 DDDDDr 


s^24B , l^s259 , s:s 2 2 g:264 , 265 , s:26B , ^:271 , ^:^:^:^:l28r^ 3 :286 , 287 , i28A , 28A , 28B , L 8c D :i290 , 292 , 293 , f 9 ::294 , 294 , 294 , i^:29E , 2Ar2Ar2A4 , 2A7 , l2AD , 2B0'2B0 , 2B2 , ^:ls 

3 J 333333333333333333333333333333333333333333333333333333333333333333333 3 - 3333333333333333333333333333333333333333333333333333333333333333333333333 
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. 

544 

345 

546 

547 

5 格 

549 

550 

551 

552 

: Ki：i 

554 

555 

556 

557 

558 

559 

560 

561 

564 

565 

f, し r. 

567 

568 

569 

570 

571 

572 

573 

574 

575 

576 

577 

578 

f.79 

580 

581 

582 

583 

584 

585 

586 

587 

583 

589 

590 

591 

592 

593 

594 

595 

596 

597 

598 

州 

600 

601 

602 

603 

604 

605 

606 

607 

609 

610 

611 

612 

613 

614 

615 

616 

617 

r.i m 

619 

620 

621 

622 

623 

624 

625 

626 

627 

628 

629 

630 

631 

632 

633 

634 

636 

637 

639 

640 

641 

642 

643 

644 

645 

646 

647 

648 

649 

651 ， 

651 

f)f)3 

654 

655 

656 

657 

658 

659 

660 

661 

t;r“） 

663 

664 

665 

666 

667 

668 

669 

670 

671 

W 

673 

674 

675 

676 

677 

678 

679 

680 

681 

602 

683 

684 

685 

6B6 

687 


；Get Line input From console 


PUSH 

FOP 

RET 


PRINT 
5E. し KBFAT 
GET!. 
A V (DFJ 
BRK 

? ，一 HOT 

bE 


JR 


；Compare Striruts 

amQtch: PUSH II 

POP DI 

OC88： LD V 

AND A 

JR Z, 

LD A, 


DE.innaa^ 

fcopyZ 

HL 


A,1 

DH, inname 
RDOPEN 


NZ,OC75 

L パ IX+2> 

H,(IX+3> 

FSEEK 

C,(IX) 

B,UX+1) 

BC 


UREL 

Z.OC76 


spstr 

CC90 

count of stri(ig( 
A.JTX+11 


Z,ap&tr 

isflchr 

•VZ，ac8trl 


DC f cadbuf 

HL,(HDSlZEl 

|flptr),HL 

A,(DC) 

: 

Z 9 puteof 

REL 

N2,0062 

A.0E0H 

PRINT— 

A, (flptr) 
FRINT. 
A,(flptr+1) 
FRINT_ 

HL f (flptr) 
H^IX) 

IX 

D,(IX) 

DC 

hl 9 de 

(flptr),HL 

A,(IX+1) 

KZ.CC61 

IX 

IX 

putmod 

CC60 


NZ.OT64 

apstr 

CC60 


；LD HL.IX 

；Skip End-Code of File-Name 
；U> IX V KL 
;Bin File 

••Read Error 


: BC = Module Size 


;Print Prompt 

:角 kip Prompt •い 
；LD IV.DE 


；LD DE.IY 

: Not Matched 

；LD 1Y,DB 
;Matched 

: Skip EXT-name 


；RKT With CY =1 

；RET With CY = 0 
；B = Counter 


: Skip Device Name 


: Skip EXT-name 


: RHL Command / シ■リ 
;hOD ITEM 


: Skip Device Suae 
；Put Module-Name 

；LIB Coosttind f シ•リ 

；Cancel thic cootoiuk 


: MOD Conwttind f ン•リ 


••Skip 3oek-Addr«ga for input 
；Put Module name 


；RET with CY = 0 


；BC = (File size) 


Skip End-code of Pile-Name 
LD DC.HL 


688 343B 

689 343B 

690 343D 
691 : 

692 : 

693 3444 

694 3445 

695 3446 

696 3448 

697 3448 

698 344A 

699 344D 

700 3450 
7013451 

702 3454 

703 3454 

704 3456 
7C5 3468 

706 3458 

707 345B 

708 345E 

709 3461 

710 3464 
7113467 

712 3468 

713 346B 

714 346E 

715 346F 

716 3470 

717 3471 

718 3472 

719 3474 

720 3474 
7213474 

722 3474 

723 3474 

724 3474 

725 3474 

726 3474 

727 3474 

728 3476 

729 3478 

730 3478 
7313478 

732 347A 

733 347C 

734 347E 

735 3480 

736 3483 

737 3484 

738 3484 

739 3484 

740 3484 
7413484 

742 3486 

743 3489 

744 348A 

745 348A 

746 348A 

747 348A 

748 34&A 

749 348A 

750 348A 
751348A 

752 348T 

753 348F 

754 3493 

755 3196 

756 3497 

757 3499 

758 349(' 

759 3491) 
7f,0 319 F. 
76134AO 
7(52 34A1 

763 34A1 

764 34A1 

765 34A1 

766 34A4 

767 34A6 

768 34A7 

769 34A9 

770 34AA 
77134AA 

772 34AA 

773 34AA 

774 34AC 

775 34AD 

776 34AE 

777 34AF 

778 34B1 

779 34B2 

780 34D3 
781 3484 

782 34B5 

783 34B6 

784 34B8 

785 3488 

786 34B9 

787 34BB 

788 34DC 

789 34BC 

790 34BC 
79134DC 

792 34BC 

793 34BF 

794 34CI 

795 34C3 

796 34C6 

797 34C9 

798 34CD 

799 3400 

800 34CD 
80134CF 

802 34CF 

803 34D2 

804 34D4 

805 34D7 
80G 34D8 

807 34D8 

808 34D8 

809 34D8 

810 3408 
8113409 

812 34DA 

813 34DB 

814 34DC 

815 34DD 

816 34DF 

817 34E1 

818 34B2 

819 34E2 

820 34E4 
821 34E5 

822 34E8 

823 34EA 

824 34EB 

825 34ED 

826 34EO 

827 34EF 

828 34F1 

829 34F2 

830 34F4 
831 2A¥\ 
832 34FTi 


二 ..1:-!£ - 

ReA» ZRAUA2W. 8 A H 


I 


A.;i:A 


E ) h 8 8 8 
T8flc .rc9.ccfl.:cc9 


..A 

-Ji 


LDCPJRCALLSCIRETJRCALLLDCALLRETrthescANDSCFRErcpJRRETLDLDCALLJROECJRcpscJBIJIu) 


-3CALL 1 NCFUSHS SCALLRET% $ SCALLSSSCALLSSS 1 MCINCINCINCCALLRETS lissINCCAixg aCALLg 


^i^^rll il iali 


?JPLW]LD 
HL 

w.r: 


cpscINC3INCINCcp%rRET 14 Fi3 33 3INCCPJPCP 用 3CALLSCAU.SCALLSSCSCADD3 s 泥 INCINCrcp 犯 CALLJP & 訊 3 I :5 CALL 3 CALLssrsc^INCINC^cpE^INCINCINCINCr 

u 5 hd: 

luJer 必 1 2 4 67 
acsu 」 <r 6 CC 6 CC 6 CC 6 ^ . 


t 5 拿 t3 2 3 t 0 1 $9 
$ 3 塞拿 3 O0t00tt 
5 —3 I 1 拿拿 3C E6 拿 E6 $ $ 3 
E t 1 E o 拿拿 p 01 6 6 14 4 t t p 

DDElnCD23H5u)3H11COD8C3FE20DDCDC0DDDDC5CO8C1 的 78S20 


4 4 
o 0 

FE 28 


34 

DDDDDDDDCDC9 


FF: 

3E CDC9 


F 

F 6 F F 
2A F45D31HKAEl 
aECDEDCD lAtt f'A la DSref'a 


00 

7E23ra 
gODA72es 


E5o Mr E 
FDS 7EA728 1A BBC013231805PDC9 


7E0e2HecltTE0023EDA 1 aMl* 

DDFH28CDS 8 A7C 8 18CD 3 ECDC9 


2 HF7OF78OAO7ZEO3F0 2 E 
7E23A737C 8 F1!20C9e 6 IACD3805<! 8 FE 28131 R 3 E 12 


file Ix.cad A.il IXBOF z RHL NZ.CC72c,( IX) DC B,(IIXBCIXHLre.-IHLHLLXA.lre.i l BCcBC 丽 PRINT BCBCA.B-CNZ.CC71CC70LIBSZ.CC7 

ibrasrNCcpRETcp 用 LOrNCsINCl ipopsCALLINCRBHIOPLDLDipopRETHJBHCALLCALL^sORJRJPcpJR 

eLlb: 

..uiCC71: 


SSTINEL 


5e 

0 9 9 o 4 韋拿 toed $ 1 4 4 3 I I I I I to o t 4 3 4 3 
otto 3 拿 拿章拿拿 too 拿 O 3 3 3 # 搴專攀霹 •灯 か I 3 3 3 3 

1 I I H 3 F 4 12 0 $ t 9 $ $ f E 3 6 3 f E A 4 3 3 c o 2 6 19 3C ot I I I I I E 3 6 3 I 3 3 c 9 4 4. 3 3 3 3 19 

2 $ t71 2 F 8 03 E t t 拿拿拿 I 5 2 5 2 1 7 3 0 2 2 B c G ofA 6 o21RlI I I • I —5252 t 2 2 B 6 o o 2 2 2 2 A 6 

DD2A22DDDDFECAFE20 3 ECD 3 ACD 3 ACD 2 ADDDDDODD 1922 DDFE20DDOOCO 18 FE2eCD C3 re 203 F.CDx\rt)MAa>2ADOODDDDD1922DODOCDC3FE28nDDDDDgCDg 


W3201UO343S 
2:« A 1 Fr7F.3AS2:IS 7 E 232E A 178 F 0 
ss gresgDDDDDO 23 ErA 820 c9 

| 卿 _ 'llill :s:s: 1 363'll369 , ?s: 3 3;r.s:^:379'^:s 

s' 3 33333333333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333 3 3 ^3333^^^0^333333333333333333333333333 


o 

po ^ 0 $ 5 t • 拿搴 3 
o<o 砂矽 t 3 t • 拿拿 3 

1 E 3 F 12 E 3 6 3 5 S3 1 1st 9 $ 39 29 

2 T 2 F 0 3 4 2 4 2 E •1 Eot 拿 f t F p o1 

DODOsFEcaFR20DDDDDDDD C5 DDE1UCD23RS 8 3B1 1CDC 1 D8C5CDCDC 1 OB78B 120 C3KE 20 


► メガネを変えたら星が見えた。でも星の数が少ないのは，目の悪いせいだけではないよ 
うだ。 森田泰史 （17) 埼玉県 
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: HL z HL » 16 


•PRINT 

jputa 

•WLB ver l.ee (by T.Iahitfami 1 1 v CR t G 


;Temporary File naao 
tmpnaof:DB »A:WLB 


inname: DS 
outxiame：DS 
HLBUK: DS 
LIBaeok:DS 
LIBadra：DS 
DS 

HDSIZH: DS 
flptr ： D6 


EXT WROPEK 

EXT RDOPEN 

EXT FSEEK 

EXT CLOSE 

EXT PCBSCH 

EXT jmir 

KXT PHIKT^ 

EXT wkin 

EXT wkout 


input file name 
output file name 
Stack for HL reg. 
Stack for swkiirfdi 
Stack for address 
Dunmy Work area 
File Header Sire 
File I\>inter 


iaflchr 

C.CC105 


<DE),A 

OC104 


(DE>,A 

A t (HL) 

isflchr 


_puts 
HL, innA 
_puts 


リスト 3 WLB2.ASM 


Error Messa^ea 

EMSGI : DB ’File Acc©aB Error on：' ,0 


EMSG2： DB 'Illegul file ' ,CR,0 


•Bud Conrouid • •CR.O 
•File not found , ,CR t 0 


I WLK /P:30OC,/D：450O 
• WI^1,WLB2,WLB/N:P 


egu oboooh 

EQU 0B100H 


C cnribuf BQU 



U) HL r ( IBFAD) 
LD DE t ¥ll£ BF 
LD GC.20H 


LDIR 

LD 

LD 


A •し D8K) 
(FLDSK),^ 


(LST.DSO.A 

RDFAT 


: NEVER BEING T 



;C < : TOTAL NUMBER C 


IYO' 


'♦ocnK 


A.D.'oc'gc, d.'a 


••fll— 


o'+HLHLHLHLOE 18 
D.,ac,f ^HL.HLHL.HL.DD.E.HL.IVccl 


LOscpRETcpJRscpRETcpJRLDcpRETcpRETi 扇 AOOAODiLDLDi INC JR 


F $ F f o Ft t f $ $ F 

1 $ l $ 0 It 霉尊 攀 «1 

J 拿 沿 D 尊 t • o o t t p F 2 1 

A 拿 7 t 2 B 5 t $ • 1 ^ • I 7 0 6 o 

CD08CDD82AUSED3A32AF32CDD8 06 OE3AU1213re.10 2 ,\85 6 F30247H 

13699 ADD 011358 BBCDF 1 4 5 689 

_ r:iii B 10 _ 5000 r IEEEEiiiiiiiiiiiiiiiii 

2345678901234567890123456789012345678901234567 ft9012 
5555555566666666667777777777 8 -888H 8888899999999 9 9000 


iriEEi=EEE=EiEE:: 

Isca'sissgigJEOUBquwsEQUsis!;sisEQUEQUsBQUEQUgi 肌 


1 def !:b 

!!). 


二 i_oeoo=iiiiiilllln>pilFC7ig§illF9Alii2«12iiilillllF72iililiiil= 痛 i 


J4-56789012 3456789 


202122232425262728293e3132333435363738394e41424344««4748495o 51 


SRET 3 XORLDLDI.SCCALLJRnECJRLDINCXORLDJRscRETLDXCRLDLDCALLRETDECiIKCLDINCXOR 3 JRDCALL 3 CALLCALLg 

py:04 :05: 妙 09: 

fcoCCIcclfcocrl 咖 


-zt\z,A a ： HL. 

:cpJHcpJRiRETSCFRETu> 
chrhNC: 
isrli hlhex 


H o o A 1 11 7 B 11 7 
733 31 4 4 40 66 6 


g23D6 


6 £ 2 91o 2 0 0 0 

7 z 6 4 6 ^ 4 2 2 0 
618 E 7 D c o o o 
2 3 2216 0 4 2 2 5 

F 2 0 0 4 9^ 7 o o D 

1 42256^ 5224 

FF74C7 3 2 6 6 12 2 5 


£ 16 raD 8 FH38 1 6FFD8FT-38I6FED8FED02929292992165F19FD187E23A7SCD1857653079736D 




333330 ^33^33333333333333333333333333333333333333333333333333^00O0^OOOO&O0OV& 0 

1718l92o2122232425262728293e3l3233343s36373B394o414243444s464748495e51 s2 53s5s5657 s8 596o6I626364656667686970717273747576777879.8e 81 B2B3 84 lB6 87 88 8g909t9293949s96979899l 
999999 999999 99999999999999999999999999999999999999999999999999999999 & 999999999999 99^ 


J. 5 5 5 5 t 5 F 
ST 3 3 33 拿 31 

k -r 8 9 B 4 8 2 B ^ t J £ 
l 7 0 o F l 7F4B 霉 be 

i2rl)e.(HiAF 127 E 23 CD 3805281213 AF 1218 HB23C9 06 AF 1 27KCDD 8 05C 8231213 AF 12182 1CD 2 1CDC0C9 

0012335678 DCDBHF 


o 3 2 H 79 め 3 K o 6 D 
2 7 7 61 6 Ga4 6 2 6 0 

5 5 2 F 5 6 D 0 10 5 0 4 

6 6 7 6 6 6 0 2 6046 2 6 
^350 coo 4DQC4E 
64642 6 2 2 6 6 0 6 7 6 

696320728 6C6C 65616O20696F75 
613 FA 9 1C 2 F 4 6 E F o 
4476346 ft 4 6 6 4 6 6 0 


00 

2 F96 2 C0200 
re 28 FE 28 A7 s37s 21 


7 8Br r T^T^012578^AB^DH001 2335678 DCDBHF 01235558 45555555 AF4 9 BO5AAF40^D 27888 ACEOl 23447 
FU*FFPFPF^OOOOOOOOO^0^1111illll! 111111222222222 z 33333333333444 -55555666777777^# 7888888 B 
114444445 5 5 555 5 5555 5 5555555555555555555555555555555555555555555555555555555555555555 
3 3 3333333333333333333333333333333333333333333333333333333333333333333333333333333333 

^4 56 7 890123456 7 89O1234567890123456789O123456789A^1 2345678391234567890123456789012315 6 
33333334444 ^444445555555555666-^6666667777777777888888888899999999 9 9^0000000001111111 
BK 8888888 888888888 d 88888888888 0^8888 & 88888888888 & 88888888888888888889999999 ^99 9999999 


156 


Oh!X 1990.10. 


►敁近思うことは「大学に受かってバイトして， X 68000 を買う j ことだけ （18 歲はだいた 
いこんなネタでしよう）。 前田靑男 （18) 新满県 
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105 

106 
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109 

110 

111 

112 

113 

114 

115 

116 

U7 

118 

119 

120 

121 

122 
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124 

125 
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127 

128 
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130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 
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152 

153 

154 

155 

156 

157 

156 

159 

160 

161 

162 

163 

164 

165 

レ … 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 

181 

182 

183 

1B4 

185 

186 

187 

188 

189 

190 

191 

192 

193 

19J 

195 

196 

197 

198 

199 

:、，い 

201 

202 

203 

204 

205 

206 

207 

208 

209 

210 

211 

212 

213 

214 

215 

216 

217 

218 

219 

220 

221 

.m. 

223 

224 

225 

226 

2V.1 

228 

：：^J 

230 

231 

232 

233 

234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 


BC.20H 
DE.FILE BF 
HI” （一 IB 豆 AD， 


A,(_DSK) 
<FLDSK) r A 

HL,(27E1H) 
(HLBUF) r HL 
HL,(2?DfH) 


i File descriptor 


¢•16 

DE, 


16 : Direct 
,(DIRPS) ；Direct 
EBUFKDE 


(DEBJF) f Di 
hl,( rrmJF) 

A. ! 

DRTiSB 

B, H 

A t (HK> 

OFFh 

Z，FTBSC4 

A 

7..FTBSC3 


torv l/mv(h 
tory atari 


ADD 

POP 

DJNZ 


FCBSC4： ! 
PCBSC5： : 


；File Name Compare 



•.Directory lengh 


2.RDOFN3 

C 

RD0FS4 


；Laat Cluster is C 


A V A 
A,A 
C.A 
AF 
80H 
A,C 
ぼ}， A 


RC i« 0 origin. So it ian*t 7Fh but 80H. 
: Total number of Records 


BC.IMF^SIZE 

DE.wkin 

HL,FILE^BF 


A.0FFH 

(RIffNT),A 


；Clear Pointer For reading 


i Allocation Error 


HL,wkout 

DE.FILE.BF 

BC,IMF_SIZE 


A f (FLDSK) 
し DSK>，A 


248 

249 

250 

251 

252 

253 

254 

255 

256 

257 

258 

259 

260 
261 
262 

263 

264 

265 

266 

267 

268 

269 

270 

271 

272 

273 

274 

275 

276 

277 

278 

279 

280 
281 
282 

283 

284 

285 

286 

287 

288 

289 

290 

291 

292 

293 

294 

295 

296 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 

310 

311 

312 

313 

314 

315 

316 
31? 
： U8 
3)9 

320 

321 

322 

323 

324 

325 

326 

327 

328 

329 

330 

331 

332 

333 

334 

335 

336 

337 

338 

339 

340 

341 

342 

343 

344 

345 

346 

347 

348 

349 

350 

351 

352 

353 

354 

355 

356 

357 

358 

359 

360 

361 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 

377 

378 

379 

380 

381 

382 

383 

384 

385 

386 

387 

388 

389 

390 

391 

392 


INPITT 一：： U) 
INC 
JR 


HL.RDPNT 

(HL) 

N2.INP1 


；INC (RDFNT) lower byte 


010C 
O10F 
010F 
010F 
010F 
0112 
0113 
0113 
0116 
0119 
011B 
011E 
01IE 
011F 
0122 
0125 
0128 
0128 
012B 
012E 
012E 
0131 
0134 
0137 
0139 
0139 
013B 
013B 
013E 
013F 
8140 
0140 
0140 
0140 
0140 
❼ 143 
0146 
0149 
014B 
ei4B 
014E 
0151 
0151 
0154 
0155 
0156 
0159 
0159 
015C 
ei5F 
0160 
0161 
6163 
0164 
0165 
0168 
0168 
016A 
016E 
0171 
0174 
0175 
0175 
0178 
017C 
017F 
0181 
0181 
OlH.i 

0187 
01RA 
0181) 
018E 
018E 
019t 
0192 
0192 
0194 
0197 
0198 
019A 
019C 
019C 
019D 
019H 
019F 
01A2 
01A4 
01A5 
01A6 
01A7 
01A8 
01A8 
01A9 
01AC 
01AE 
01AE 
01H1 

eiB2 

eiB2 

01B2 

01B2 

01B2 

01B5 

01B6 

01B8 

eiB8 

01BB 

01BC 

01BF 

01CO 

' 

01C3 

GUM 

01C5 

01C6 

01C6 

01C6 

01C6 

01C6 

0106 

01C7 

0108 

01CB 

01CC 

oicf 

0102 

01D5 

0106 

01D7 

01D8 

01D8 

01DA 

01DA 

01DA 

01DD 

(，旧 

01E5 

01E5 

01F8 

01EB 

OIEB 

01HH 

01EF 


BC,I>IF SIZE 
DE r FILE BF 
HL,wkin 


VMFLPNTI 
B,A 
A,(RC) 


CAIXRET lr LDLD 3 S 


33ij)ld3 


し A,NZHLDHBCHL 


! 圏 


3 隱 SLRETLDSCFRET r SXHlLDCALLRETCPJRCPCCFRET 


ryl 

CALLRCTLDINCLDu>ORRET 


LHrF 

LDrecLCLD 3 r INCORRET 


CDD821342A7EB7C9 


7D3D327C32CD2134 B7C900 


IZE).),HLS,BF3UF»UF» 1 LSTTBFI3 
fB'sIAXSIZE _ し測 _^1 I!pATs,HL)COL2HL)f-^c 1 tFAT 

LD 3 INCDECJRINCLDLDLDLDIJJgRETIi)u)LOIJ)IR IJi LnIJ)CAIJRETs LDLD LDcr JR INC 9 r LDsrRJP DECJP JRgRKT 



ttts37BOttSD«4 




01 


M 1 F20 


M5B20BO015B64OM 




IF 

6200 


:E9ft 


211101ED3A322A2C2DC43A2A2C2D203C67223H ED 2A CD D 821 ED 01 ED3F.B() 2 y\n)DKCDD 8062 1 7E IT53023 4E H52A165F1971E105CA18 8 C9 


BF 


l = jy Jri i ,r T, 

X . R 
LD;CACAI.RET LDLDLDLD XOR1J) LOLD LD LDLDLDLDLDILOLDOR RET 


t t ft t 拿拿拿 o 拿 拿 f 
I t ft f 拿拿拿 o 拿 o 拿拿 拿 
I • 熏搴 0 拿 拿車拿 p 拿 7 拿拿 0 〇 $ 

I i ft8— —It 分拿 3 拿拿狂 ^ $ 

22CD0832323E32AF323232 2122 01 11 21ED3B32B7C9 


28EB8e***t37*t:;BOFF:: 07 
O5280C180nF579878787874FFlD68132AF32011121EO 3 E 32 B7C9 3 K37C9 


K 

5DM2085B20BOM41044503 
3ACD D8 CD I)8 3E37 coE5EDelEDEl 7ECD c9 ra38FE3F DO 3 EC9 


o f F o ♦ 4 $ 必 

6 11 2 • 7 拿 ひ 

OB3rrlko8 ♦FA B B f D o 2 F 
1 5 5 6 0 01 o t F J 0 5 $ o 2 H c 

OEEDED 2 A3E rD D8 0622 rF FE 2 B B7 28 D5HDCD Dl 28 D5 n 19 slo 13 OD 20 3 EAFB7C9 




02F8 


C5E5061323UBE2010E1C1C9 


H5E 68 21BEE1C 8 3K037C9 


F F o # F U . 拿 7 t 7 

1 1 0 拿 1 1 t 2 事 2 

A3AF2e**74BeSDMEluDF 
CDD8CD801U2AHD3A32A22A 


III 掀呦 t 




§ soe-li 舭朌咖 i00<oo<0o.i 抑 e0!ee!eo!ooi 


0456 7 89 BCFF 03369 
4444-444444455555 




►名古屋周辺では，最近“塾ってとってもヘルシー”などという妙な CM をやっています。 
某明〇ゼミナール……。 安保和幸 （16) 愛知県 


ライブラリアン WLB 157 



























393 

394 

395 

396 

397 

398 

399 

400 

401 

402 

403 

404 

405 

406 

407 

408 

409 

410 

411 

412 

413 

414 

415 

416 

417 

418 

419 

420 

421 

422 

423 

424 

425 

426 

427 

428 

429 

430 

431 

432 

433 

434 

Kif) 

436 

437 

438 

439 

440 

441 

442 

443 

444 

445 

446 

447 

448 

449 

450 

451 

452 

453 

454 

455 

456 

457 

458 

460 

461 

462 

463 

4f>4 

465 

466 

467 

468 

469 

470 

471 

472 

173 

474 

475 

476 

477 

478 

479 

480 

481 

482 

483 

484 

485 

486 

487 

488 

489 

490 

491 

492 

493 

494 

495 

496 

497 

498 

499 

500 

501 

502 

503 

504 

505 

506 

507 

508 

509 

510 

511 

512 

513 

514 

515 

516 

517 

518 

519 

520 

521 

522 

523 

524 

525 

526 

527 

528 

529 

530 

531 

532 

533 

534 

535 

536 

53? 

8 


■Hi: POINTER (A) => REmRD NO. (HL) 


HL.TBiri 

D 9 0 

E,A 

HL,UE 

A,(HL) 

CLJREC 

AF 

OFH 

A,L 

L,A 


；FAT READ TO B 
RDFAT： PUSH 



LD A,(LST DSK) 

LD D t A 


Z,RDFAT 一 1 
(LST DSK) V A 
A,1 

DE,(_FATP0S) 

HL,(_FATBF) 

DRDSD 

HL 

DE 


；FAT WRITE FROM BUFI 
WRFAT： PUSH DE 

PUSH HL 

LD A,1 


LD 

LD 


DE, (一 FATPOS) 
1'ATfU*) 


POP 

RET 


；FREE CLUSTER POSITION C 
POGHT: PUSH BC 

RJSH HL 

LD B, 湖 

LD HL,( FATE 

FXXXT2： LD A,(HL) 


FCXXT4: POP 
POP 
RET 


(A) s> RECORD (HL) 
» H,0 

> L,A 

D HL.HL 

•D HL.HL 

V HL f HL 

'D HL,HL 


；RECORD (HL) => C 
RECCL: RJSH HI 


PCB ADR：DS 
LST 一 DSK:DS 


••File Control Block Address 
；Diak drived last 


IMF-SIZE EQU 31 

wkin：: DS IMF^SIZE 

wkout:： US IMF_SIZE 



••work area for Input-file 
;work area for Output-file 


••File Size. 

;Start Address. 

；Exec Address. 

: First Cluster. 

;Cluster table. 

The Login disk. 

The FILE Pointor. 

Record No. Which Have The DIR. 
Addrefls Where On IMFX3RMATI0N. 

The Number of Records The File have. 


Oh!X 1990.10. ►本屋でバイトをしている私。先日お客さんに 1 ■角川文庫でハンムラビ王の誉いた“太陽 

はありますか j ときかれ，一瞬考えこみました。ハンムラビ王って本なんてだしてた 
っけ……？なんのことはない，「半村良」を問き間違えたのでした。私も老いたな。 

中村健 （20) 埼玉県 


；Bad Al location File 

；DE = RECORD 

；RCF 


；(F15IZE)+f 

；INC (WRIVTl) lower byte 
；CT = 0 

；HL points FUW 
；RCF 


；A = A / 16 


;A = RC Wt 0F0H 


；0NE CLUSTER ADDED 


；A = A / 16 


；DE = RECORD NO. 


BC,IMF_SIZE 

DE.wkin 

HL.FILE^BF 


HL,(wkoutfl2H) 

HL 

(wkouU12H),HL 


BC.IMF SIZE 
DH.FILE^aF 
HL.wkout 


A t (FLDSK) 
(...DSK),A 

AJFUWI 

B,A 

A,(RC) 


4,<RC) 

OF0H 


HL.TBLCLST^I 

D, 0 

E, A 
HL,DE 


•J スト 4 SOS DEF 


3F 3F 3F3F S00«OF 
F5F5CBCBCBCB21165F197ECDF1E6856FF1S 


F 

**1FS 5B 1FS 
拿 5 0 拿 £560 
DEC*553ABA 23 3HEO2ACDED1C9 


F 

5E1P20 
0 5 6 0 

D5E53EED2ACDE1D1C9 


F 

o 2 8 V 9 -To 
8 6 0 F 0 o 8 
556 AEI7830E7 8U: 0 711 -9 
CEOZ7B 22133 139AECC 


3CS3CS3CS3CS 
E5CBCBCBCBCBCBCBCB7DH1C9 


6 F 9 9 9 9 9 
2 6 2 2 2 2 0 

DO ' Dn ' raDE ' wEl ' s 庇 Sj sjJEC ' JED ' EE ' 庇£!?3 , {21£打| ? 8 , 刊2:2:8:以£2^|肝02 , 03 , 05 , 08 , 似昍11 , 14 , 15 , 16 , 17 , 17 , 17*18 , 19 , 18 , ^:22 , 25'26 , 27 , 28 , 28 , 28 , 29 , ;52〇 , 2? , 3〇 , 31 , 33 , }34 , 36 , 38 , 39 , 犯3〇 , 3£ , 评4〇 , 41 , 42'42 , 42 , 44 , 45 , 46 , 47 , 48 , 49 , ““548 , 4〇 , 吓51 , 53 , 55 , 57 , 59 , 53 , 5〇 , 5〇 , 芘证邱58 , 5£ , 芘抑抑02 ,, 们03' , 3703 ,- 从71"71"83 ,- 85"87"89' , 虾9〇"5^5!:?_55汕站 

2 222222 z 222222222222222233333333333333333333333333333333333 3 333333333333333333333333333333 ^000000000000000 oooooon-o 

0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000006600 ^oooo&oooooooo^d^o^ooo 

89012345678901234567890123456789012345678901234567890123456 7 89 ^12345678901234567890123456789012345678901234567890123456 7 89 

3 3444-444444455555555556666666666777777777 7 8888888888999999999 9 0000000000111111111122222222223333333333 444444444455555 5 5 555 
5 55 55 555555555555555555555555555555555555555555555555555555555666666666666666666666666666 G 6666666666666666666666666666666 G 


iEEEiE 

g EOU sssi EQU SJ g! 

#* 1 -ills 


TBF—TBF 

rsLyr Esi 


WRIa,((rcaaa ahl.d-e.ahl. 


iL.ilF'ili 

In. A. onA. IHl A. n. DEA.HLwrBCre 


n 

BC.ra.HL: 


&»'pLDCAIJEXLDLDCAIJ.RETLOLDLDLDIRORRET-TO 




t $ ie0 必專 t 

$ 拿 B 2 0 $ $ 

9 $ lloo 7 挛拿 ^ 

拿 t 0 & o 3 拿霍 B 

B8DA 78 CDEB 3E 21CDD801U21EDB7C9 


2A23222A772134373FC0CDD 8 2134B7C900 


8 霉 8 搴 U. 靠 • t I t 拿 拿 拿 tF 拿 F 拿 tt t 拿 拿 $ 蓴拿 1GO 拿 t 
# I I 1 I I I I 事 ft 拿 l • 1 $ $ $ 窜 f • • 拿零 BCMO •拿 

J 摩拿泊 t ID » t I • p * o 7 F F F F t o lot— 2 必 F $ o 2 Q o t o o t t D 9 I FFFF90 t F o I t 103 tf I I G 
3 * t B t 5 f 搴 7 t I F 1 F T 3 3 3 3 t o —Fit 6oi8 f 8 6 0 8 t F 1 s f 9 拿拿 3333 拿 0 t o 8 I t o o o 3 I t ^ 

011121HD3A323A473AB830CDM3AH647?.4EfiB830CBCHCBCB21165F19E5 3A E6CDCD2A165F1936CD77E1D87723362A165F1936 3A E6C832CDD818 3A 32CBCBCBCB21165F193AE6C877 3A CDEB3H21CDD801n21EDB7r9 


1111111 siiill 11 illl^i 

0000000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000^000000000000000000000000000000000000 











リスト 5 WLB.DEF 

W1B.DEF Header File For WLD 


WLK /P :300 0,/D: 4500 
WLB1,WLB2,WLB/N：P 


全梯曜共通システムインデックス 


_85年6月号 

序論 共通化の試み 
第1部 S - OS - MACE " 

第2部 Lisp -85 インタブリタ 
第3部チェックサムブログラム 

■ 85 年7月号 

第4部マシン語フログラム開発入門 
第5部エディタアセンブラ ZEDA 
第6部デバッグツール ZAID 

■ 85 年8月号 

第7部ゲーム開発パッケージ BEMS 
第8部ソースジェネレータ ZING 

■ 85 年9月号 
インタラプト S -0 S 番外地 

第9部マシン語入カツール MACINT 0 -S 
第10部 Usp -85 入門( I ) 

■ 85 年10月号 

第11部仮想マシン CAP - X 85 
連載 Lisp -85 入門(2> 

■ B 5 年11月号- 

連載 Usp -85 入門 (31 

■85 年12月号 
第12部 Prolog -85 発表 

■ 86 年1月号—— 

第13部リロケータブルのお話 
第14部 FM 音源サウンドエディタ 

■ 86 年2月号 

第15部 S-OS “ SWORD ” 

第16部 Prolog -85 入門⑴ 

■ 86 年3月号一 

第17部 magiFORTH 発表 
連載 Prolog -85 入門 (2! 

_86年4月号一 
第18部思考ゲーム JEWEL 
第19部 LIFE GAME 
連載 基礎からの magiFORTH 
連載 Prolog -85 入門 (3) 

■ 86 年5月号 -—— 

第20部スクリーンエディタ E-MATE 
連載 実戦演習 magiFORTH 

■ 86 年6月号一 

第21部 Z 80 TRACER 
第22部 magiFORTH TRACER 
第23部ディスクダンプ&エディタ 
第24部 " SWORD ” 2000 QD 
連載 対話で学ぶ magiFORTH 
特別付録 PC -8801 版 S -0 S “ SW 0 RD •’ 

■ 86 年7月号一 

第25部 FM 音源ミュージックシステム 
付録 FM 音源ポードの製作 
連載 計算カアップの magiFORTH 
特別付録 SMC -777 版 S - OS “ SWORD ” 
_8 B 年 B 月号 
第26部対局五目並べ 
第27部 MZ - 2500版 S -0 S “ SW 0 RD " 

■ 86 年9月号- 

第28部 FuzzyBASIC 発表 
連載 明日に向かって magiFORTH 

■ B 6 年10月号—— 

第29部ちょっと便利な拡張プログラム 
第30部ディスクモニタ DREAM 
第31部 FuzzyBAS に料理法<1> 

■ 86 年11月号 

第3 2部パズルゲーム H 0 TTAN 
第33部 MAZE in MAZE 
連載 FuzzyBASIC 料理法(2> 

■ B 6 年12月号 


第34部 CASL & COMET 
連載 FuzzyBASIC 料理法<3> 

_ B 7 年1月号 

第 35 部マシン語入カツール MACINTO-C 
連載 FuzzyBASIC 料理法<4> 

■ 87 年2月号 

第36部アドベンチャーゲーム MARMALADE 
第37部テキアベ作成ツール C0NTEX 

■ 87 年3月号 

第38部魔法使いはアニメがお好き 
第39部アニメーションツール MAGE 
付録 “SWORD” 再掲載と MAGIC の標準化 

■ 87 年4月号 一 

第40部 INVADER GAME 
第41部 TANGERINE 

■ 87 年5月号 

第42部 S-OS“SWORD ••変身セット 
第43部 MZ-700 用 “SWORD” を QD 対応に 

■ 87 年6月号 
インタラプトコンパイラ物)語 

第44部 FuzzyBASIC コンバイラ 
第45部エディタアセンブラ ZEDA-3 

■ B 7 年7月号 

第46部 STORY MASTER 

■ 87 年8月号一一 

第47部バズルゲーム碁石拾い 
第 4B 部漢字出カパッケージ JACKWRITE 
特別付録 FM-7/77 版 S-0S“SW0RD •’ 

■ B 7年9月号—— 

第49部リロケータブル逆アセンブラ Inside-R 
特別付録 PC-8001/8801 版 S-0S“SW0RD” 

■ 87 年10月号—— 

第50部 tiny CORE WARS 
第51部 FuzzyBASIC コンバイラの拡張 
第52部 Xlturbo 版 S-OS"SWORD” 

■ 87 年11月号一 

序論 神話のなかのマイクロコンピュータ 

付録 S-0S の仲間たち 
第53部もうひとつの FuzzyBASIC 入門 
第54部ファイルアロケータ& ローダ 
インタラプト S -0 S こちら集中治療室 
第55部 BACK GAMMON 

■ 87 年12月号 —— 

第56部タートルグラフィックパッケージ TURTLE 
第57部XI turbo 版“ SWORD” アフターケア 
ラインブリントルーチン 
特別付録 PAS0PIA7 版 S-0S"SW0RD" 

■ 8 B 年1月号 —— 

第58部 FuzzyBASIC コンパイラ•奥村版 
付録 石上版コンパイラ拡張部の修正 

_8 B 年2月号一 一 
第59部シューティングゲーム ELFES 
_88年3月号 

第60部構造型コンパイラ言語 SLANG 

■ B 8 年4月号- 

第61部デバッギングツール TRADE 
第62部シミュレーションウォーゲーム WALRUS 

■ 88 年5月号- 

第63部シューティングゲーム ELFES II 

第64部地底最大の作戦 

■ B 8 年6月号一 

第65部搆造化言語 SLANG 入門 (h 
第66部 Lisp-85 用 NAMPA シミュレーション 
_88年7月号 

第67部マルチウィンドウドライバ MW-1 
連載 構造化言語 SLANG 入門⑵ 

■ B 8 年8月号- —— 


第68部マルチウィンドウエディタ WINER 

■ 8 B 年9月号一 

第69部超小型エディタ TED -750 
第70部アフターケア WINER の拡張 

■ 88 年10月号 

第71部 SLANG 用ファイル入出カライブラリ 
第72部シューティングゲーム MANKAI 

■ 88 年1丨月号 

第73部シューティングゲーム ELFES IV 

■ 88 年12月号- 

第74部ソースジェネレータ S 0 URCERY 

■ 89 年1月号 

第75部バズノレゲーム LAST ONE 
第76部ブロックゲーム FLICK 

■ 89 年2月号 

第77部高速エディタアセンブラ REDA 
特別付 Si XI 版 S -0 S “ SW 0 RD ” く再掲載〉 

■ 89 年3月号- 

第78部 Z 80 用浮動小数点演算 パッケージ S 0 R 0 BAN 

■ 89 年4月号 - 

第79部 SLANG 用実数演算ライブラリ 

■ 89 年5月号 

第80部ソースジェネレータ RING 
■89 年6月号 

第81部超小型コンパイラ TTC 

■89 年7月号 

第82部 TTC 用パズルゲーム TICBAN 
■89 年8月号 

第83部 CP/M 用ファイルコンバータ 

■ 89 年9月号- 

第84部生物進化シミュレーション BUGS 

■89 年10月号- 

第85部小型インタブリタ言語 TTI 

■89 年11月号 

第 B 6 部 TTI 用パズルゲーム PUSH BON ! 

■ 89 年12月号 

第87部 SLANG 用リダイレクションライブラリ 
DIO . LIB 
■90 年1月号 

第88部 SLANG 用ゲーム WORM KUN 
特別付録再掲載 SLANG コンパイラ 
■90 年2月号 

第89部超小型コンパイラ TTC ++ 

■90 年3月号- 

第90部超多機能アセンブラ OHM - Z 80 

■90 年 4 月号- 

第91部 ファジイコンビュータシミュレーション I-MY 

■ 90 年5月号 

第92部インタフリタ言語 STACK 
■90 年6月号一 

第93部リロケータブルフォーマットの取り決め 
第94部 STACK 用ゲーム SQUASH ! 

第95部 X 68000 対応 S-OS " SWORD ’ 

特別付録 PC -286 対応 S -0 S “ SWORD ” 

■90 年7月号- 

第96部 リロケータフ)レアセンブラ WZD 
■90 年8月号 
第97部リンカ WLK 
■90 年9月号 
第98部 BILLIARDS 


* 以上のアブリケーシヨンは，基本システムてある 
S-OS " MACE " または S - OS “ SWORD ” がないと動作 
しませんのでご注意ください。 


仰細 94H09H5H2H33H30H3H AH 6H4H2H AH 4H2Hg EH g 
>FAIlF9lF9 l 2012el i 200c i lF7lF7lF7lF7lF6lF6lF6lF6lF5lF5 

gsBQUsiGQUEQUsBQUBQUgEQUiEQUisig 


►イラクはクウェートを占領した。原油の供給傲はやはり減るだろう。金が上がった，株 
が下がった。ところで，こんなときだから油田でも掘り当てるゲームはいかがなもんでし 
ょう。 阿妻靖史 （18) 束京都 
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T&E SOFT S 052 (773) 7770 


愛蟲者 

プレゼント 


プレゼントの応募方法 

とじ込みのアンケートはがきの該当項目をす 
ベてご記入のうえ，希望するプレゼント番号 
をはがき右下のスペースにひとつ記入してお 
申し込みください。締め切りは1990年10月18 
日の到着分までとします。当選者の発表は19 
90年12月号で行います。 


❶ 

ルーンワース 
〜黒衣の貴公子 

X 680 M 用 5"2 H □版2枚組 

8,800円 

3名 


プレイヤーのとる行動によって，エンデイングが 
変わる，マルチエンデイングタイプの闩 PG 。 そ 
れだけに自由度が高く，遊びやすい。 




X6MDD 用 5〃2HD 版2枚組 

8,800円 

3名 

ゲームセンターで人気だつたナムコのテニ 
スゲームの移植版。友達とわいわいやるの 
がマル，のゲームだ。 


プロテニス 

ワールドコート 


SPS 00245 (45) 5777 


❹ 


満開製作所 003(554)9282 

電脳倶楽部オリジナルク i ズ 


❸ 


システムサコム Q 03 (635) 7609 

闇の血族 



XB 8000用 
5"2H □版3枚組 

8,800円 

3名 


サコムのノヴェルウェアシリーズ最新作 b 超能力を持 


日.丁シャッ(1\/1，し）各10名 


b. 豆しぼり 10名 

c. えんぴつ 10名 

d. シャープペン 10名 

e. ボールペン 10名 


お馴染み満開製作所から， Oh ! X の 
読者にオリジナルグッズをプレゼン 
卜。全部で60名にさしあげます。さ 
あすが，太っ腹！ （ T シャツはサイ 
ズ明記のこと） 



つ美少女魅由が活躍するアドベンチヤーゲームだ。 


日月号プレゼント当選者 


I ディスブレイ（東京都）牧野博史 2漢字プリンタ(埼 
玉県）加藤健二 3イメージスキャナ（大阪府）追田賢 
一 4サイバースティック（宮城県）及川雄也 5数値 
演算ポード（愛知県）佐原功治 6 MIDI ボード（北海道) 
米田幸弘 7 RAM ボード（兵庫県）松川努 8ビデオポ 
—ド（京都府）笹尾兼右 9延長ケーブル（埼玉県）桑 
原亜砂雄（千葉県）福富友宏（神奈川県）古木健一信 
太徹鈴木康之（愛知県）山本佳孝安尾文教(三重県） 
小掠昌宏（大阪府）土岐太司（愛媛県）渡部圭誠 

以上の方々が当選されました。おめでとうございます。 
商品は順次発送いたしますが，入荷状況などにより遅れ 
る場合もあります。また，公正取引委員会の告示により， 
このプレゼントに当選された方は，この号の他の懸賞に 
は当選できない場合がありますのでご了承ください。 
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♦X-OVER NIGHT (クロスオーバーナイト） 

[第5話] 

2つの人種？ 

TAKAHARA HIDEKI 局原秀己 


先日，ある雑誌に載っていた短い コラム 
に次のようなことが書いてあった。 

「現代の若者はバンドを組んで汗を流して 
大騒ぎするタイプと，部屋の中で AV (2 
通りの読み方があるようだがどちらに読ん 
でいただいても結構） やパソコン，ファミ 
コンに 熱中するタイプと に 分かれる。この 
両者は“人種”としても分かれており，後 
者は前者に比べて生殖能力が劣るのではな 

いか？」 

この コラム， 自分はやっぱり後者だろう 
なあ，などと思いつつ読むとなかなかイヤ 
なところをついてくる。 

暴走少年たちやディスコ大好き少女は前 
者と同じグルーピングとなる。われわれの 
ような“コンピュータ少年”たちは後者に 
属するわけで，いわれてみると，30歳を過 
ぎた独身者がゴロゴロしているのはもちろ 
ん，楽しそうに日夜デートにいそしむ若者 
はかなり少ないように感じる’。逆に髪の毛 
を金色に染めた，一見してそれとわかるバ 
ンド青年たちが，右手に楽器，左手に同様 
の人種の女の子を抱えて楽しそうに生きて 
いる光景はよく見かける。 

先の コラムには 「触れ合うとすぐ に 妊娠 
してしまいそうなエネルギーを彼らは発散 
している」という感じで書いてあった。才 
ーバーではあるが，的は外していない。夜 
に髮を金色に染めた男女のカップルが仲よ 
く1車を降りていったりすると，その後の 
彼らのなりゆきを無意識に想像してしまっ 
たりする。逆にドラゴンクエストを並んで 
買って一目散に帰る大学生が，実は女性と 
同棲していて……というのはあまりにもイ 
メージがわかない。 

氺氺木 

なるほど，ベーシックに考えてみればみ 
るほど，この発想に大きな誤りがないよう 
な気がしてくる。 


歌と踊りとは人間の楽しみのうち，最も 
原始的なものであるという。スピード，暴 
力もしかり。シリコンチップによる産物の 
コンピュータなどという存在との交流とは 
対極を成すものである。 

恋愛ーセックスというプロセスも極めて 
基本的な本能に基づく人間の行為である。 
バンド少年や暴走少年たちのほう力?，この 
ことひとつをとっても有利なポジションに 
いる。ちなみに人間が最もその気になるの 
は，スピードを出し過ぎて疲労に襲われて 
いるときだ，という説もある。 

しかし，そもそも，バンド少年にしろ， 

デ イスコ 少女でも サーフ ァー でも いいの だ 
力 ? ，こういったタイプは他人とのインタフ 
ェイスを持つことが日常茶飯事だし，仲間 
同士で肌を寄せ合って汗を流して共同作業 
をすることが多い。 

同じ目標に向かって生きる男女が出会っ 
て，しかも共通体験をしながら生きている， 
ということで，恋愛感情が極めて生まれや 
すい土壤である。「触れ合えば妊娠」はと 
もかくとして，フラフラになるまで演奏を 
したり，背中に女性を乗せてバイクで飛ば 
したあとに，恋愛感情が生まれるケースは 
十分にあるはず。 

氺氺氺 

一方，条件は極めて悪いながら，コンビ 
ュータ族にとって，同類の男女の接触はな 
いのかといえば，そうではないのが現代社 
会の面白いところ。ある証券会社では， 
「入社したときに手の届く範囲に結婚相手 
がいる」 

などという定説 （ ？ ） があるそうだが，さ 
ほど職場結婚，職場恋愛が急増中であるそ 
うだ。プログラマ， SE もこれに近い状態 
だと力 1 。女性プログラマが増え続けている 
ことを考えると，そうそう悲観したもので 
はないのだろう。 


もうひとつ0ネクラなコンピュータ人種 
同士の究極の出会いの場，といわれること 
の多いパソコン通信ネット。ここでは意外 
なほどカップルが登場するケースは多いよ 
うで，ぼくのようにネットワークの中で生 
活していると，あちこちでそのような成約 
事例を目にする。 

チャット（文字会話）でやりとりをして 
いる間に恋愛感情が生まれ，最初に実際に 
出会った日にホテルに行ってしまった，と 
いう伝説めいた事例もあったとか。そこま 
でいかなくても，パソコン通信ネットが知 
り合う場となり，実際に何回か会ううちに 
交際が始まるというケースはかなりあるよ 
うだ。まあ，結局のところ，出会いの機会 
があれば，事態は關けてくるということで 
はないだろうか。 

ホ氺氺 

近年起こった2大凶悪事件といえば，女 
子高生コンクリート詰め殺人事件と，連続 
幼女誘拐殺人事件。例のコラムの分類によ 
ると，この2つの事件は双方の“人種”が 
起こした事件の典型であるようだ。 

アニメファンやノヽ。ソコンフリークは， 

「自分は M とは違う！」 

と顔色を変えて強調するが，どちらかに振 
り分ければ，やはり M 側のグループに厲し 
てしまうのは否めない。明らかにそちらに 
所属するぼく自身もそう思う。 

パ、 ランスが 崩れると，何が起こるかわか 
らないのが，現代社会の恐ろしいところで 
ある。だからどんな方法であっても，バラ 
ンスを 崩さないためには，僕の横にもカワ 
イイ女の子がいる必要がある。 

なんたって，街を歩くカップルの図はい 
かにもバランスがいい。逆に重そうなシヨ 
ルダー式のカバンをぶら下げた疲れた男と 
では，見た目のバランスはどちらがいいか 
はいうまでもないであろうから。 
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第 42 回知能機械概論お茶目な計算機たち 


続•超能力実験の成果〈透視〉 


/ 視聰者のだまし方 / 

超能力と称したトリック（あるいはイン 
チキ）に僕たちはずいぶんと慣らされてき 
ました。そしてその結果，多くの人は超能 
力現象の存在を信じているというわけでも 
なく，また否定するわけでもなく，ただ適 
度に楽しんでいるように思われます。 

「どうせ，エンターテイメントさ」という 
開き直りは切り札として持ってはいるもの 
の，司会者までがグルだという噂を聞くと 
ちょっと憤りを感じてしまう程度の真面目 
さは，まだ持ち合わせているという人も少 
なくないかもしれません。僕自身も，真面 
目に ニュースを 話す人と奇術師とつるんで 
視聴者をだます人は違っていてほしいと思 
います。 

そのような，いかにもありそうなごまか 
しの テクニックとは 違い，もうひとつの悪 
質な嘘といえば，数学的知識，確率的な計 
算結果を暗に，あるいは露骨に利用して視 
聴者をごまかす方法です。科学的客観的な 
背景を利用して権威づけしてごまかすので 
すから，「司会者= サクラ j とはまた別な意 
味であるいはもっと悪質だといえます。 

確率を利用して嘘をつくやり方で一番単 
純な方法は，何回試したかということを明 
らかにしないというやり方です。 

たとえば，1000回程度に1回しかうまく 
いかない ようなこと，ここでは 「コインを 
10枚まとめて投げ，すべて表を出す」とい 
うのを考えてみましょう。計算してみれば, 
まったく機械的に振った場合，このような 
ことが起こる確率は，1024分の1です。こ 
れは確かに，ずいぶんと珍しい事象なので 
すが，逆にいえば，1000回ぐらい試し続け 
れば1度ぐらいはうまくいくといえるので 
す。ですから，うまくいったときのビデオ 
だけを編集して見せられても，なんとも判 
断のしようがないわけです。 

この間も，朝のテレビで超能カモドキを 
やっていました。なんだかんだと多数のう 
さんくさい実験をやっているのですが，そ 
の中にこんなのがありました。 

5種類の マークの ついたカードを用意し, 
その中から1枚を引き抜き，それを裏のま 
ま4人（そのうち3人は素人という設定） 

が透視して当てるというものでした。透視 
する順番力 ？ ミソでして，向かって左の人か 


ら順番に予想を いい， もし，同じマークを 
すべての人がいったときはそれでいいので 
すが，違うマークを予想した時点で終了し， 
カードを表にするのです。ここがチェック 
なのですが，超能力者は一番右に座ってい 
るのです。ですから，超能力者はめったに 
予想しないのです。 

当然，うまく 4人の予想が一致し，表を 
開くとそのとおりだったという例がビデオ 
で流されました。さて，このような例が出 
現する確率を考えてみましよう。ひとりが 
当たる確率は1/5ですから，4人いるからそ 
の4乗で，625分の1，つまり625回に1回 
起こるというぐらい珍しいことであるとい 
えます。 

レポーターは 比較的よく見る人でして， 
その実験で左から2番目の人を務めていま 
した。ここで，司会者はサクラでないと考 
えてみましよう。でも，500回も600回も実 
験をやったとはとうてい考えられません。 
となると考えられることはずいぶん限定さ 
れてきます。 

まず，超能力者の予想の仕方があるので 
す。超能力者は前の3人が同じ マークを い 
ったら必ずそれと同じ マークを いうのです。 
これにより確率はさっきの計算の5倍にな 
り125回程度やればよいことになります。さ 
らに，超能力者のすぐ左の人は超能力者が 
連れてきた人かもしれませんので，同じよ 
う にいって いると考えられます。 

となると，一番左の人とその次の司会者 
がうまく当てさえすれば，残りの2人はい 
ないのと同じということになり，結局確率 
は，たったの1/5の2乗，つまり25回ぐらい 
やるだけで4人全員の予想が一致し，しか 
もそれが裏返しのカードと当たってしまう 
ということになります。なんというトリッ 
クなのでしよう。 

この超能力実験に秘められた疑惑を列挙 
してみましよう。 

1. 失敗した例は1回ぐらいしか見せない 
ので何回やったかわからない。 

2. 超能力者は毎回予想をしなくてよいの 
で，ボロが出ない。 

3•超能力者（ともうひとり〉は前の人と 
同じことをいうので，当たる確率は大幅に 
増えている。 

もちろん，最初っからすベて（番組制作側 
が）インチキという可能性だつてあります 


けどね。確率を計算しましょうか？ 

L 透視実験の方法 / 

先月紹介した超能力っぽい現象はそれこ 
そ偶発的なできごとだったのですが，今月 
はちょっとだけ厳密に実験を行いま した。 
そして，その結果の解析についても少し確 
率計算に 基づいて 行いま した。 

超能力といってもいろいろな種類がある 
とされているようです力 ? ，ここで対象とし 
たのは先ほど批判したテレビ番組と同じよ 
うに透視です。先月紹介したライン教授が 
使用したのとおそらく同じタイプのゼナー 
カードを使用します。図1にそのカードに 
描かれている5種類のパターンを示します ( 

実験の方法は次のとおりです。図1のよ 
うな5種類のパターンが描かれているカー 
ドを1枚ずつ目印として表を向けて横1列 
に並べます。そして残りの25枚（各パター 
ン5枚ずつ）を裏返しにしてよく切ってお 
きます。 

透視実験は裏返しにしたそのカードのパ 
ターンを1枚ずつ予想することによって行 
います。これだなと思ったパターンのとこ 
ろへ裏返しのまま（下方向に並べて）置い 
ていきます。 

これを25枚すべてに ついて 行うと1回の 
試行が終了というわけです。それから結果 
を調べます。すべてのカードを表にして， 
予想（透視）どおりの力ード（最初に表を 
向けたカードのパターンと一致している力 
ード）の枚数を数えます。この枚数は最小 
なら0で最大ならばすベて当たったときで 
25ということになります。 

注意するべきことは1枚透視するたびに 
表にして結果を見ないことと，各パターン 
5枚ずつというようにわざと枚数を合わせ 
る必要はないということです。前者は，い 
ままでの結果から次のカードの予測のため 
のデータを得ないようにするためであり， 
後者は，最後のほうで枚数合わせのために 
透視をしなくなってしまうことを避けるた 
めです。 

透視実験だけでなく，2人で行うテレパ 
シー実験も記録しようと作ったのですが， 
今回は透視実験だけを行いました。ひとり 
に対して試行を10回やってもらいます。1 
回当たり25枚のカードの透視実験を行うの 
ですから，1人当たり250回透視することに 
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Arita Takaya 有田隆也 


なります。 

L 透視実験の結果 / 

実験結果を表1に示します。10人 （ A さ 
んから J さん） についての データを当たっ 
た枚数の小さい人から載せています。結局 
250回の10人分ということで, 2500回の試行 
を行ったわけです。表の横1行はある1人 
についての データであり，10回の試行それ 
ぞれの結果，そして最後に合計が書かれて 
います。裏側を向いた1枚のカードの種類 
が当たる確率は，まったくランダムに予想 
したとすれば，5回に1回当たる勘定です 
から，確率1/5，したがって10回の試行の合 
計では， 250 X 1/5 ですから50になります。 

実験結果を見ればわかるように50を上回 
っているのは6人，下回っているのは3人 
て、， 全体に成績はいい（透視の実在を裏づ 
ける方向にあるというと誤解を招くか？） 
ようです。一番成績のよい値は1回の試行 
で見てみると， J さんの13ということにな 
ります。13というと半分以上ですからかな 
りのものです。合計成績でも J さんの63回 
が最高です。 

このようにただ結果を出したのではなん 
だかピンときませんので，ちょっと確率を 
使って定量的に調べてみることにしましょ 
う。表2に1回の試行で当たる回数ごとの 
確率を示します。計算の方法は簡単な算数 
で,式で書く なら， ( l /5 )rX (4/5)25 — rX 25 
ことなります。ここで r は当たった回数， 
25 Cr は25から r 取り出す組み合わせです。 

なお，表のカツコの中は，別の表現方法 
で書いたものであり，たとえば，一番起き 
る可能性の高い5回のところのカツコの中 
は， 1.96 ……かける10 の一 1 乗の ことでし 
て，結局左に書いてある数字と同じという 
ことになります。有効数字を考慮するとき 
や，だいたいの大きさを素早く把握すると 


きなどには便利です。 

実験結果の中の最大値である13回当たる 
確率はというと，10000分の2 .92 ……という 
ことですから3400回ぐらいやれば，1回出 
る程度の確率ということになります。13回 
以上当たる確率は10000分の3 . 69……，つま 
り2700回に1回ということになります。今 
回の場合，総試行回数2500回で1回出たの 
ですから，たいしたことないともいえます。 

ちなみに1枚も当たらない確率は 
0.00377……ということですから，これもか 
なりな数だといえます。確率的には11枚以 
上当たる確率と同じぐらいになります。 

今度は1人当たりの総試行回数250回単 
位で捉えてみることにします。表3に250回 
の試行で当たる回数とその確率をあり得そ 
うな回数についてだけ載せておきます。今 
度の表には，その回数だけ当たる確率だけ 
でなく，その回数以上当たる確率も同時に 
示しています。 

たとえば，70回ちようど当たる確率は， 
左側の数字0.000570……であり，70回以上 
当たる確率は右側の数字0.00148……とい 
うことです。ですから，もし自分でこの実 
験を行い250回の試行をやられた読者の方 
が1000人おられたとしたならば，1人から 
2人ぐらいは，この表に載っていないよう 
な大きい回数になって歯がゆい思いをする 
というわけなのです。 

ちなみに，回数を重ねてもコンスタント 
にこの表をはみ出すような方が万が一いら 
っしゃるのならば，これははっきりいって 
超能力であるということができます。飛ん 
で行きますのでご連絡ください。 

25回中で13回以上当たる確率は 
0.000369……でした。もし，この ペースで 
当たり続けるとしたら，250回で130回以上 
ということになります。このような確率は， 
この表には載っていませんが，計算してみ 


ると実は0が29回も続くぐらいの試行を繰 
り返さないと起こりそうにもないようなあ 
り得ない数になってしまいます。 

L 超能力者と判断するのは誰9/ 

今回の実験結果を見て，結局何が言える 
のでしようか？ もちろん知りたいのは超 
能力の存在に関する確証です。ですから， 
できるだけ客観的に解析しようとしたので 
すが，どうも中途半端になりそうで，尻切 
れにしてしまったような気がします。 

どうしてかというと，いくら確率や統計 
的な計算をして客観点なデータを出そうと 
しても，そ9数字をどう解釈するかという 
ことは，結局はそのデータを得た個人個人 
に委ねられるのだと思ったからです。 

たとえば， J さんは13枚も当たるという， 
10000回に 3. 7回ぐらいしか起こらないよう 
な枚数を当て，10回の試行を足しても，63 
回という100回に 2. 6回程度しか出ないよう 
な結果を1回やっただけで出したのだ，と 
いっても，あまりピンとはこないような気 
がします。データをもっと並べてもよけい 
わからなくなるでしよう。 

このようなことは全然別の例を出したほ 
うがわかりやすいかもしれません。将来， 
天気の予報が完璧なものになって，明日， 
雨が降る確率が 11. 28%とわかったとしま 
しよう。しかし，だからといって，この数 
字をどう受け取るかは人によって異なる， 
というよりはむしろ，責任は受け取る側に 
あると思います。もちろん，予想が完璧に 
なれば，雨か晴れ力、100%確実にわかるのだ 
と主張する人もいるかもしれませんが，そ 
れは理論的に不可能ではないかと思われま 
す（素粒子の振る舞いが完全に確定できる 
のならば話は別でしようが)。 

手斗学はあくまで厳密に客観的に真理とい 
うものを追求してきたように見えます。た 
だ別の面では，逆に主観的な最終的な判断 
や貴任とでもいえるものを逆にだんだんと 
人間のほうに つきつけ てくるようになって 
きたといえるのではないでしようか。 


表1実験結果 


図1ゼナーカードの5種類のパターン 





表21回の試行の確率分布 


表310回の試行の確率分布 


当たる枚数 

«串 

0 

1 

24 

25 

0. 0037778931862957215 0(3. 777893¢-03) 

0. 02381 183241434825000 <2. 361!83〇-02) 

0. 000000000 00000033564(3. 355443 e -16) 

0.00000088600000000336(3. 355443 e -18) 


当たる回 Rn 

n 回当たる《爭 

n0 以上当たる 《 串 

37 

0. 0073037526438598 562(7. 3037536 *03) 

0. 986106280832491290 0(9. 861063 e - ei ) 

38 

0. Bli 2348838022509860< I . 623486 e -82) 

0. 978802528188 0314400(9. 788025 e *6 l ) 

69 

0. 00088305295 IS 838789 <8. 830530 e -04) 

0. 062369587109626426 2(2. 369587 e -03) 

70 

0.0806708306579881506(5. 708307 e -04) 

0.001 486534 1 580426472 (1. 480534 e ^03) 
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猫とコンピュータ 


『文豪』錄爾嫌 

Takazawa Kyoko 

__ 高沢恭子 __ 


きのうの熱が部屋の中にまだ漂っている 
というのに，新しい太陽は，また昇ってく 
る。風をもとめて開いた窓も，じっと息を 
ひそめているだけ。 

早く目ざめたつもりでも，リビングはも 
う光がいっぱいで，休日の朝はとっくに始 
まっていたらしい。食卓の上の読みかけの 
本だけが，ゆうべのページをひろげたまま， 
時を止めている。 

そんな朝でも，マシンルームをのぞくと 
独特のひんやりした静けさがあって心地よ 
い。きょうは日曜日だから，夫と2人，こ 
の部屋にちょっとした改造をくわだててみ 
た。 

毎日，変わらぬパワーで攻めてきたお日 
さまも，わずかずつ優しさをみせて，夏は 
遠ざかろうとしている。夏休みのリズムが 
身についたと思うまもなく，トオルには新 
学期が待っている。 

ラしろがコワイ 

こどものころ新宿の家にいた白猫のチロ 
は，すぐに誰かの肩の上に飛び乗ってきて 
困った。 

困ったといっても，それは子猫のときに 
肩に乗せて遊んだことが習慣になったため 
で，原因をこしらえたのは，私だった。 

小さなうちはよかったのだけれど，チロ 
はオトナになってもこれをやめなかったか 
ら，まったく困った。しかも相手は私ばか 
りでなく，誰彼かまわずやった。 

はじめに肩に乗せたとき，子猫も前向き 
にしていたので，チロは自分から乗ってく 
るときも，かならず人間の背中がわから飛 
び乗るようになった。つまり，チロが肩に 
乗ろうとしているとき，人間のほうは気づ 
かないことが多いわけだ。 

子猫のころは毛糸玉のように軽かったチ 
164 Oh!X 1990.10. 


口だ力す，オトナになって 3 kg を越えた体 
になると，そっと乗せてもズシリとこたえ 
る。それが，何も知らないでいる後ろ向き 
の肩をめがけて，1，2 m も離れたところ 
から，跳躍力にまかせて飛びついてくる 
のだ。ねらわれたほうの驚きと衝撃はい 
つもたいへんだった。 

あるとき， ガレージの 隅にある整理棚の 
前で，何かしごとをしながら背を向けて立 
っていた父に，ブルーバードの屋根に乗っ 
ていたチロは，絶好の期待をかけて突進し 
た。こともあろうに，その瞬間振り向いた 
父の顔と，飛びつくためにすでにツメ出し 
ていたチロは，凄絶な空中衝突をとげたの 
だ。 

動物好きだった父はチロに憤慨すること 
はなかったけれど，チロのほうは、深い反省 
があったのか，それ以後，父の肩はねらわ 
ないようになった。 

同じように青い目をした白猫，わが家の 
ホン ニャ ア が，なぜ夫の肩にだけ飛び乗る 
ようになったのかわからない。 

あるいは，夫はじぶんでも気づかずに， 
何回か肩に乗せたことがあって，ホン ニャ 
アもそれを交流のひとつに取り入れるよう 
になったのかもしれない。 

とくに朝の洗顔中に夫が体を前にかがめ 
るとき，かならずといっていいほどジャン 
プしてくる。傾斜が真横に近いときは，背 
中のまんなかでしばらく くつろぎ，体が起 
きると，肩に移動して，夫のこめかみのあ 
たりを熱心にナメあげる。ザラザラの舌は 
耐えかねるような痛さだそうだ。 

ホン ニャ アの 場合，相手は夫に限られて 
いて， スペースの 足りなそうな私や，安心 
感にとぼしいトオルは対象にされない。 

その ジャンプが，きよう は マシンルーム 
で行われた。 


狭い部屋をいかにラまく使うか，これは東 
京に住むラえでの重要なポイント。キヨウ 
コさんちでもちょっとした“改造”が行わ 
れたのですが，やはりホンニヤアがいると 
なかなかコトは5まく運ばないよろで……。 


矛盾の出入り口 

マシンルームは6畳ほどの大きさだ。 

転勤で住まいが変わるたび，生活全体の見 
直しができるというのはとても得がたいこと 
なのに，面積だけを見て，「東京に近づく 
につれて，家が小さ〈なるネ」と，新宿の 
おばあちゃんは言う。 

弟夫婦と3人暮らしで，ジャンボな部屋を 
いくつも含めた7 LDK もの家に住む母か 
ら見たら，わが家はエレベータみたいに小 
さいそうだ。 

でも，必要部分だけでできているコンパ 
タトな家に住みなれてしまうと，この便利 
さからは離れがたいものがある。メンテナ 
ンスや冷暖房の簡略さも経済的だ。それに 
どうしても，広さに代わる機能面でのくふ 
うに力を入れるようになるから，この楽し 
みは，またこたえられない。 

広い家に，無用なものを並べて死んだ空 
間をいくつもつくるより，無限に近い機能 
を持った最小限のコーナーがほしい。 マシ 
ン ルームは そんな希望をかなえる，たのも 
しい部屋なのだ。 

ここはわが家が目ざしているマルチ空間 
どして，少しずつ成長をつづけてきた。15 
年にわたるパソコンの旅から，それなりの, 
〈ふうも生まれて，むしろ以前よりシンプ 
ルなシステム配置で，豊富な機能が発揮で 
きるようになってきた。 

一見，簡素に見えるこの部屋は，望みし 
だいで書斎になり，図書館になり，ゲーム 
センターになる。いくつもの使いみちがあ 
るとき，その場所は小さいほど役割が大き 
く評佃 i さネ1る。 

マシンの おかげで，データや文書は，も 
っとも小さく圧縮して保存でき，必要なら 
いつでも引き出してみることができる。だ 












から，マシンと周辺機器，それにイスがひ 
とつあるだけで，書類も原稿もディスクの 
中に吸い込まれてしまう。 

だが，じつのところマシンルームも矛盾 
を抱えている。情報の圧縮をしてくれる便 
利なはずのマシンが，わが家には正反対の 
結果をもたらす一面を持っているのだ。ひ 
とつはパソコン関係の書籍の増加と，もう 
ひとつはパソコン通信だ。 

通信は商業データベースと，草の根通信 
( BBS ) の両方を利用している。夫はビジ 
ネス関係で NIFTY - serve や，化学技術関 
係専門のネット STN へのアクセスが多 
く，私はもっぱら若いお友だちにあうた 
めに， FBI — NET に通いつづける。 

データベースで 検索し た 記事や情報は， 
プリントアウトして書類イ匕したほうが扱い 
やすい。くりかえして確認もでき，複写の 
必要にも応じられる。これは資料としての必 
然性があるが，問題なのは FBI やナツメな 
どの BBS 通信だ。 

5 年前の創始時期のような熱中とはちが 
うものの，アクセスするたび，活気のある 
親密なメッセージが尽きることなく書き込 
まれている。連載の感想も聞かせてくれる 
し，イベントの打ち合わせもある，電報も飛 
んでくる。そうなるとダウンロードしない 
なんて考えられない。 

ダウンロードとは，通信内容をわが家の 
記録装置におさめることだ。これを編集し 
てディスク内におさめておけば問題はない 
のだが，どうしてもプリントアウトして， 
内容を活字で確認したくなる。それも家族 
がひととおり目を通してしまえば，その役 
目も価値も半減してしまうのに，これがや 
められない。プリントの山は通信のたびに 
積み重ねられ，しかたなく製本したら，2 
cm ほどの厚さの本が 60 冊にもなった。 

情報の圧縮と小型化のためのマシンが， 
半面，情報の拡大化をさせているこの矛盾 
を，どう解決するか，それが当面のわが家 
の課題になっている。 

玉突きジャンプ 

ライテイングデスクがマシンルームの中 
央に置かれ，この中に 98 が収められて久し 
い。この 98 のキーボードの乗っているデス 
クの面が少し高すぎて，入力するときに腕 
の疲れが気になる。きようは，これを改善 


するために，デスク面の 
下側に，スライド式のプ 
レートを取り付けて，そ 
こからキーボードを引き 
出して使えるようにしよ 
うという計画なのだ。 

きのう，夫が東急ハン 
ズから材料を仕入れてき 
た0左右一対のレール金 
具と，塗装した白い木製 
のプレート，引き出すた 
めの金属の取っ手。 

デスク面そのものも，もとは開閉式の1 
枚のプレートだから，その下にもう1枚の 
プレートを取り付けるのは，構造的に不 
安もあった。でも，アイデア実現の夢は， 
とてもおさえられない。 

朝食のあと，さっそくマシンルームに入 
る私たちは，ホンニヤアもいっしょだとい 
うことを，あまり気にとめなかった。 

準備が整い作業が始まる。図画工作は私 
の専門だから，ノコギリ，ペンチ，ドライ 
バーを見るとうれしくてたまらない。新し 
いしかけのコーナーをじぶんたちでこしら 
える喜びで，ワクワクしてくる。 

そして，順調に構想どおりのものができ 
あがっていった。 レールの すべりぐあいが 
とても良いので，水平に取り付けるために， 
とくに注意が必要だった0ボルトのしめつ 
けにも，このごろは便利な工具があるので 
ありがたい。 

ホン ニヤアの見学好きは子猫のころから 
だった。きょうは， X 68000 の収まったラ 
ックの頂上で，ウッラウッラとながめてい 
たらしい0ドリルの音は昔から気に入らな 
いのだが，電気ドリルではないのでガマン 
していた。でも，なかなか終わらない。そろ 
そろ別の部屋に移動しようかと立ち上がっ 
たとき，ちょうど中腰になった夫の背中が 
あったのだ。 

「文豪 MINI 7 HR 」 は，単独でキヤスタ 
一（小車）付きのラックに乗っている。 

これはキーボード用の台が折りたたみ式 
でつ いているが，だいたいは いつでも 使え 
るように，台をひろげ，キーボードも乗せ 
られている。 

キヤスターのおかげで，どこにでもころ 
がしていける「文豪」が，今日は工作中の 
夫のすぐそばにきていた。 


ホンニャアはいつもの気分で，夫の背中 
めがけてジャンプした。中腰の夫は，いき 
なりの重みに，バランスを失ってよろめき， 
「文豪」から突き出したキーボード用の台 
に接触した。 

このときばかりは，キヤスターがわざわ 
いして，ラックは前倒れになり，「文豪」本 
体は，まずキーボードを直撃，そのあとも 
ちろん床まで落下した。ホンニャアの一撃 
が，玉突き状につぎつぎと事件をひきおこ 
したのだ。 

1周年記念日 

おそるおそる電源を入れた「文豪」のモ 
ニタは，「キーボードが正しく接続されてい 
ません」と表示されるばかりで，何も反応 
しなくなった。あれだけの墜落をしたのだ 
から，モニタに文字が出るだけでもふしぎ 
なくらいだった。 

「文豪」に倒れられては一大事。こんな 
ときは，「真光無線」のタカダ部長に頼るし 
かない。さっそくアキバのラジオ会館に本 
体とキーボードを運んだ。 

さりげなく話を聞いて〈だ令ったタカダ 
さん。「保証書が利〈かもしれませんよ」。 

まさか，「故障状況」の欄には「モニタ 
落下，キーボートの足破損，正常動作せず」 
と，堂々と書かれているのに。 

数日後，タカダさんからのお電話。 

「本体は異常なし。キーボードはユニッ 
卜交換するそうです。それから，保証書が 
使えましたよ。1日違えばダ'メでした j 
「文豪 MINI 7」から 「 MINI 7 HR 」 に買 
い換えた日から，丸1年目のできごとだ 
ったのだ。ひとつの創作から，ひとつの 
破壊をつくった日だったけれど，ラッキー 
な判定をいただいた日でもあった。 
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PRODUCTS 


高輝度液晶ビジョン 

XV-H1/H1Z 


シヤープ 


XV-HI 



シャープは従来の液晶ビジョンより明る 
さを向上させた高輝度タイプの液晶ビジョ 
ン. 「 XV - Hlj, 「XV — H 1 Z 」 の2機種を 
発売した。 

「 XV - H 1」 は液晶パネルとランプの改 
善により従来機 「 XV -100 Z 」 に比べ2倍 
明るく，しかも固定短焦点レンズの採用に 
より 3 m の投影距離で100型の映像を映し 
出すので（従来機では 4.6 m ), 6畳間でも 
大画面が楽しめる。 

「 XV - HIZj は従来機比 1.7 倍の明るい 
映像を実現，また20型から100型までのサ 
イズフリーで楽しめる1/2倍ズームレンズ 
を搭載している。 

どちらの機種も従来機比約80%の体積， 
重量というポータブルなものになっていて, 
入力は S 映像端子 X 2,ビデオ X 2が用意 
されている。また，設置時に面倒なコンパ 
ーゼンス（色合わせ）調整がいらないため， 
取り扱いがフォーカス合わせだけの簡単な 
操作になっている。さらに，映像左右反転 
機能が採用されていて，背面（透過）投影 
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などにも対応している。 

「大画面シアター」をトータル的に提案 
するクリアタイプの新スクリーン， AV サ 
ラウンドアンプ，スピーカーシステムなど 
のシステムアップ機器もあわせて発売。 

価格は 「 XV_Hlj が450,000円 ，「XV 
- HIZj が500,000円（どちらも税別）。 

<問い合わせ先〉 

シャープ ㈱ 003(260)1161,06(621)1221 



ビデオレセプター 

XC-100P 

シャープ 



シャープは会議や講演会などで手元資料 
を披大して映し出す，画像入力装置「ビデ 
オレセプター」 を発売した。 

「ビデオレセプター」は平面原稿はもと 
より商品などの立体物もフルカラーで撮影 


し，液晶ビジョンやモニタテレビに映すこ 
とができる。画像は75万画素 (25 万画素 X 
R , G , B ) の高解像度を実現。1画面を記憶 
させ必要なときに引き出せる「画像コール 
バック機能」や，文字などを重ね合わせて 
映せる「スーパーインポーズ機能」なども 
備えている。 

また，撮影画像にタイ トル やグラフなど 
のパソコ ンで作成した画像を スーパー イン 
ポーズす ることもできる。 X 68000 シリー 
ズのほか，水平同期周波数 15 kHz /15 ピン 
アナログ RGB 出力のモードを 持つパソコ 
ン カ 5 ' 接続できる 0 パソコンとのシステム 化 
で画像のフアイリングなどが可能なように 
パラレル インタフェイスが装備されていて， 
読み取り領域が容易に設定できるカラーイ 
メージスキャナとしても使うことができる。 
映像出力はビデオ / S 端子/ RGB アナログ 
端子が用意されている。 

価格は398,000円（税別)。 

<問い合わせ先> 

シャープ ㈱ 003(260)1161,06(621)1221 

電子手帳で測量 

PTS-DI シリーズ 

旭精密 

旭精密とシャープは電子測: a 機と電子シ 
ステム 手帳を システム 化し，旭精密ブラン 
ド （ PENTAX ) として トータルステー 
ション 「 PTS - III シリーズ」を発売した。 

このシステムは従来，手入力あるいは高 
価な専用のデータコレクタを利用して行っ 
ていた測定データの入力を，自動的に電子 
手帳のカードに記憶させ，測量設計 CAD 
システムに転送できるものである。 

付加的な機能として，記録したデータを 
用いて座標計算を行い面積を求める計算機 
能 もついている。 

価格（いずれも税別〉 

トータルステーション PTS-III シリーズ 
1，600,000/2,000,000円 














1 C カードと専用ケーブル 
DT -21 A / MB -65(66) 91，000 (88, 000)円 
データコンバータ 105,000円 

カードリーダライタ 40,000円 

<問い合わせ先> 

旭精密 ㈱ 003(593)0421 

電子手帳で過去帳管理 

お寺さんカード 

シャープ 



シャープと株式会社ぴつばらは電子シス 
テム手帳で過去帳管理ができる「お寺さん 
カード」を開発，発売した。 

この「お寺さんカード」は壇信徒と正確 
な法事スケジュールを立てるために，膨大 
な過去帳を手帳方式にして，常に携帯でき 
簡単なキー操作で各壇信徒ごとのスケジュ 
ールが即座にわかる。 

価格は30, 000円(税別)。 

<問い合わせ先> 

㈱ ぴっぱら ©0742(27)1737 


BOOK 


トクマインターメディアムック 

X 68000 COMPLETE BOOK 


徳間書店 



徳間書店から X 68000 の本， 「 X 68000 C 
OMPLETEBOOK 」 が発売された。ツー 
ル や ゲームなど さまざまな ジヤンルのソフ 
卜紹介，最新ハードウェア紹介，シャープ 
液晶映像システム事業部の岡本，金井両氏 
へのインタビュー，巻末付録関連商品大力 
タログなどから構成されている。 

価格は1，200円(税込)。 

INFORMATION 


第7回 

ホビーマイコンショウ 

FORESIGHT 10 周年，きまぐれコンピュ 
ータクラブ10周年， FBI - NET 5 周年を記念 

して ホビーマイコンショウが 開催される。 

FORESIGHT ， きまぐれコンピュータ 
クラブは TK -80 や PC - 8001ユーザーを母 
体とするパソコンクラブで， FBI は草の根 
BBS ネット。 

いずれも ホビーと してのマイコンを愛す 
るクラブで会員の制作したハードおよびソ 
フトをマイコンのメッカ，ラジカンで展示 
する。 

おおいに，マニアの皆さんと交流したい 
とのこと。アキバショッピングのついでに 
立ち寄ってみては。 

日時：10月14日（日）11時〜17時 

会場：ラジオ会館8階大 ホール 

出品： Xl ， MSX 2 などのホビーマシンから 


最新のマシンまでを利用したソフト，ハー 
ドまで。また，パソコン通信の新システム 
なども。 

く問い合わせ先(事務局)〉 

亍134江戸川区西葛西 5-7-8-503 
峰岸順二 S 03 (675) 1964 

第4回 

全国(草の根) BBS 大会 

1. テーマ 趣味から実用へ向かうパソコ 

ン通信 

2. 開催日時1990年10月21日 

10時30分〜16時30分 

3. 会場 東京：北の丸科学技術館2階 

千代田区北の丸公園 2-1 
003(212)8471 

4. 開催内容〇 ISDN を使ったバソコン通信 

の講演と実演 

〇抽選会豪華商品が当たるゲ 
ーム大会 

〇協賛企業，諸団体，関係官庁 
の展示 • 実演 

〇 BBS へのフリーアクセスタ 
ーミナル 

〇懇親会（ティーパーティ交歓 
会を会場で行います） 

〇オンライン3分間クッキング 
実演 

〇全国 BBS 連絡協議会総会 

5. 主催 全国 BBS 連絡協議会 

6. 協賛 パソコン通信関連ソフトハウス 

• メーカー•諸団体，出版社， 
商用ネットワーク 

7. 事務局 ㈱ 新企画社 

ポプコム編集部大藤謙 二 
003(263)6940 

□ h!X SOhlFM 

バックナンバーフェア 

Oh ! X , Oh ! FM の創刊号から最新号ま 
での バックナンバーが 特設 コーナーで 展示 
販売される。少数ずつながら，いまや入手 
しにくいものまで一堂に展示される予定。。 
場所：書泉グランデ 5 F 

東京都千代田区神田神保町 1-3-2 
003(295)0011 

期間： 9月20日(利〜10月20日出 
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このインデックスは，タイトル，注記一 
筆者名，誌名，月号，ページで構成されて 
います。暑かった夏ももう終わり，秋の行 
楽シーズンの到来です。さあ，何して遊ぼ 
うかな（実は年中遊んでいたりして……)〇 


参考文献 

I / O 工学社 

ASCII アスキー 

コンブティーク角川書店 

THE COMPUTER ソフトバンク 

テクノポリス徳問書店 

POPCOM 小学館 

マイコン電波新聞社 

マイコン BASIC Magazine 電波新聞社 

LOGIN アスキー 


一般 

►今こそパソコン通信を始めよう 
パソコン通信をめぐる現状の紹介に始まって，必要な 
機器，主なネットやパケット通信サービスなどの体系ま 
で掲載している。一山田憲 一， マイコン，9月号，114 
— 133 pp . 

► MUNEPI 上のゲーム探検隊 

旧 M 用の 「 STARWARSj を紹介。ベクタースキャン方式 
ではないけれど，ゲーセンの興奮が AX 286 などでも味わ 
えるぞ。—— MUNEP け，マイコン，9月号， 204-205 pp . 

► LETS PROGRAM 

今月の宿題発表は「3 X 3の魔方陣の解法」。 X-BASIC 
での解答のほか， XI マシン語で 4 X 4 の魔方陣の組み合 
わせを計算するプログラムも寄せられている。一藤本 
健，マイコン，9月号， 224-232 pp . 

►やまさんのアルゴリズムブック 

データ処理の一環として，リスト処理について考える。 
リストの基本的な梢造，データの追加処理について。—— 
やまさん.マイコン，9月号，304 -305 pp . 

►実践ハード入門 

今月は液晶ディスプレイを使ってのメッセージボード 
の製作にチャレンジ。液晶の仕組み，液晶ユニットの使 
い方についても解説する。 一 石川至知，マイコン，9 
月号，309 -313 pp . 

►マイコン認定試験受験講座 

7月に行われたマイコン認定試験の4級 • 3級の全問 
題と解答例を掲載。——マイコン認定試験受験研究会， 
マイコン，9月号，382 -399 pp . 

►失敗しないプリンタ選び’90 

プリンタに閲する基礎知識，.カタログ用語の解脱に関 
する文章と，熱転写，インパクト，インクジェット，ペー 
ジの各方式の代表機種の紹介 • 比較記事が掲載されてい 
る。——編集部， ASCII , 9月号，226 -248 pp . 

► MEDIA BREAK 

CES において発表された Commodore 社の CDTV は t Amiga 
500に CD - ROM ドライブを組み合わせてシェイブアップ 
したものである。その狙いと今後の計画について開発賁 
任者にインタビューする。一編集部， ASCII , 9月号， 
362 -363 pp . 

►ワン.ステップ通信 

ゲームメーカーと して知られる株式会社 ナムコの 福祉 
機器分野への取り組みについてレポートする。一編集 
部， ASCII , 9月号， 380-38 Ipp . 

►なんでも Q&A 

All in Note の ソフト，ハードに閲する4 つの 質問に答 
える。同梱ソフト以外にどんなソフトが使えるか，辞害 
ROM の用途は，などなど。——編集部， マイコン， 9月 


号， 4 12-413pp. 

► 田原総一朗のコンピュータ • ルポ 

ノートパソコン“ All in Note ” を発売し， AX 互換路線 
における本格的な展開を開始したシャープ。この AX 路 
線に賭けるシャーブの意気込みとバソコン再生構想を， 
コンピュータ事業部長の西岡郁夫氏に伺う。——編集部. 
THE COMPUTER , 9月号， I 2 l - I 3 lpp . 

►ネットワーカー•ホリック第27回 
PDS が，ウイルスの標的となっていることを述べ，ダ 
ウンロードする際の注意点，主なワクチンの入手法を紹 
介。——編集部， LOGIN , 16 *17 号. 254 -255 pp . 

MZ シ 1 J ーズ 

MZ-700/1500(Hu-BASIC) 

► KABE '89 

迫りくる壁の間を逃げ回るゲーム。——江崎実，マイ 
コン BASIC Magazine , 9月号. I 70 p . 

MZ -1500 

►都市計画 

シムシティーを意識した都市シミュレーションゲーム。 
——山野辺太郎，マイコン BASIC Magazine , 9月号，12 
8 - 130 pp . 

MZ - 2500 ( BASIC - M 25) 

►二トラス 

じっくり考えるブロックパズルゲーム。——アラケン 
& ken / ichiro , マイコン BASIC Magazine , 9月号，131 - I 
33 pp . 

Xl/turbo/Z 

XI シリーズ 

► WING X 

ゼロ戦で敵戦艦に特攻する。一菊池光吉，マイコン 
BASIC Magazine , 9月号，158 -159 pp . 

► MICRO WARS 

細胞内が舞台のシューティングゲーム。一栗林良樹， 
マイコン BASIC Magazine , 9月号，160 - 16 1 pp . 

►誌上公開質問状 

XI G モデル10に接続できるフロッビーディスクの種類 
に答えている。——多田太郎，マイコン BASIC Magazine , 
9月号， 92 p . 

X 1 +FM 音源ボード （ 要 NEW FM 音源ドライ パ） 

►ナイトストライカー 

タイトーのナイトストライカーより 1 ■アーバン•トレ 
イル j のミュージックプログラム。—— Com , マイコン 
BASIC Magazine , 9月号，185- 187 pp . 

XI turbo シリーズ 

► How To Win 



本書のタイトルがライフゲームではなく 「ライ 
フゲイム j というのは，訳者のこだわり。なかな 
かこだわる訳者で，「マックスウヱルの悪魔」と 
いわずに， r マックスウェルのデモン」という。 

原題を訳すと「再帰的な宇宙」。これはライフ 
ゲームの織り成すさまざまなパターンの考案から, 
フォン • ノイマンが研究した自己再生オートマト 
ンなどを経て「ちようど自己再生する動物のよう 
なふるまいをするライフゲームのパターン」へと 
至るライフゲームの奥の深さを楽しむ本なのだ。 
なかにはビッグバンやマックスウエルの悪魔など 
などさまざまな話がからんでくる。 


ライフゲームでは驚くほどのパターンが現れ， 
そのほとんどは研究されて名づけられている。形状 
から名づけられた船やカヌー。一定のパターンて形 
を変えながら移動していくグライダー。グライダ 
一に出会うとそれを破壊しながら自分は無傷なイ 
，ター。ライフゲームのアルゴリズムは極めて簡 
単であり， BASIC ですぐ組める程度のものだ。本 
書には試してみたい人のための BASIC とアセンブ 
ラ（共に IBM - PC 用）も掲載されている。 （ K ) 
ライフゲイムの宇宙ウイリアム•パウンドスト 
ーン著有澤誠訳日本評論社 003(987)8611 
A 5 判 275ページ 3, 800円 


168 Oh!X 1990.10. 
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三國志 II , セレクテッドソーサリアン 5 の紹介。—— 
編集部，コンブティーク，9月号， 132-135, 148- 149 pp . 

►ソフトレビュー 

セレクテッドソーサリアン5の紹介。——編集部，コ 
ンブティーク，9月号， 33 p . 

► NEW SOFT 

セレクテッドソーサリアン5,ミスティ Vol .4 の紹介。 
——編集部， LOGIN , 16 • 17号， 14-15 pp . 

X68000 

► X 68000 マシン語入門 

今月まで3回にわたって掲載してきたプログラムの詳 
しい解説を行う。グラフィック関係のシリーズの総まと 

め。-高橋雄一 ， マイコン，9月号，356 -364 pp . 

►なんでも Q&A 

Hyperword で外字を使うには， C コンパイラのエラー 
フ アイルを出力できるか， Communication PRO -68 K の概 
要は，などの質問に答える。一編集部，マイコン，9 
月号， 410-41 Ipp . 

► AV プログラミング講座 

アナログジョィスティックのハード面，ソフト面から 
の解説と， IOCS を使ったサンプルゲーム。スプライトプ 
ログラミングの項ではスプライトの基礎的な知識につい 
て解説する。一中山進•仲田津宏， ASCII , 9月号, 289 
-296 pp . 

► zboot.sys 

X 68000 の SRAM を利用したブートデバイスセレクタ。 
複数の 0 S で複数のパーティションを設定したハード 
ディスク， SRAM 上のプログラム， ROM などからブート 
することが可能。——中山進， ASCII , 9月号， 317-318 
PP . 

► ps.r 

現在メモリ上にロー ドされているブログラムのリスト 
をまとめて報告するコマンド。 PROCESS とは違ってフッ 
クされているべクタの表示も行える。——中山進, ASCII ， 
9月号，31 9 p . 

► AV STRASSE 

S 映像出力対応の低価格ビデオポード CZ -6 BVI , パー 
ジョンアップされた Communication PRO -68 K , ポリゴン 
処理のフリーウェア 「 CAPTAIN 」 などが紹介されている。 
—編集部， ASCII , 9月号，337 -340 pp . 

►長期ロー ドテスト 

Human 68 kver 2.0 と ASK 68 K , 日本語ワープロを試用す 
る。 ASK 68 K に関しての評価は高いが，カスタマイズを 
無視するワープロ，「かな」「ローマ字」などのキーが遠 
い点に関しては厳しい見方をしている。今月は17時間使 
用。——編集部， ASCII , 9月号，384 -392 pp . 

►GAME BOX 


「クォース」「ダウンタウン熱血物語」の紹介。—— 
編集部， I / O , 9月号，121 -127 pp . 

► Small-Tool 

Human 68 k 用の便利な命令集。属性変更 •ワイルドカ 
- ド 対応 DUMP • 0 PMDRV 解除 •コントラスト 調整•ウ 
エイト.ドライブ 制御の6つの コマンドが 掲載され てい 
る。-暴りときどき晴れ， I / O , 9月号，155- 163 pp . 

► CRTDRV.X 

X 68000 の画面の色を手軽に変更するためのプログラ 
ム。定義ファイルでカスタマイズも可能。一高橋美幸, 
I / O , 9月号.168- 173 pp . 

►プリンタデータ*キャッチャ 

プリンタに対して送られるデータをファイルに落とす 
プログラム。グラフィックを加工して何度もプリントア 
ウトを行う場合などに便利。——市原昌文， I / O , 9月 
号，174- 176 pp . 

► PCG SAVER 

PCG の内容を セーブす る。市販の ゲームの キャラクタ 
などを使用したいときに使おう。—— Soft 工房の職人 
Sugar , I / O , 9月号，177 -179 pp . 

► SOFT BOX 

シャープからリリースされた 「Communication PRO -68 
Kj の新パージョン “2.0" を紹介。一桜井智史， I / O , 

9月号，224 -225 pp . 

► SOFT BOX 

単体で発売になった 「 SX - WIND 0 W 」 の概要を紹介。 
—川田義治， I / O , 9月号， 229 p . 

► E PRINT.X 

エラー出力をリダイレクト機能を使ってファイルに結 
果を残すために，エラー出力を標準出力にしてしまうユ 
ーティリテイ。—— L & M , I / O , 9月号，244 -245 pp . 

► TR 0 N 

2人で遊べるゲーム。 I ドットを見極められるか。—— 
高橋潤，マイコン BASIC Magazine , 9月号， I 62 p . 

►ボンバータコくん 

時限爆弾を仕掛けて，その爆風でモンスターを倒すゲ 
ーム。——高橋秀之，マイコン BASIC Magazine , 9月号, 
163- 165 pp . . 

►先取りおすすめゲーム 

クォータースタッフ，銀河英雄伝説 II を紹介 6 —編 
集部，テクノポリス，9月号， 6-1 Ipp . 

► GAMING WORLD 

発売予定の麻雀ゲーム 「 RYU 〜哭きの竜 j を紹介—— 
編集部，テクノポリス，9月号， 22 p . 

►新作ゲーム先取り！ Soft Flash 
新作ゲーム「ペルセウスの冒険」を紹介。——編集部, 
テクノポリス. 9月号， 28 p . 

► How To Win 

ウルテイマ▽の紹介。——編集部，コンブティーク， 


9月号，140- 143 pp . 

► X 68000 SPIRITS 

トンネルズ&トロールズ，幻獣鬼，プロテニスワール 
ドコ_卜，バル_サの復簪，ジェミニウイングなどの新 
作ソフトを紹介。——編集部，コンブティーク，9月号, 
240-243 pp . 

►最新ソフト徹底紹介 

ウルティマ V の攻略法を紹介。——編集部，コンブテ 
ィーク，9月号， 86-8 フ叩. 

► WE ARE THE X 68000 WORLD 

新作，制作中のソフトを紹介。幻獣鬼，ザ•マジカル 
シヨット，プロテニスワールド コート， F . S . S . ペルセウス 
の冒険。——編集部，コンブティーク，9月号， 90-92 pp . 
►新作 HOT 情報 

シムシティーを紹介。——編集部， P 0 PC 0 M , 9月号, 

20 p . 

►ミュージックパビリオン大全集 

おどるポンポコリン，ゆめいっぱいのミュージックプ 
ログラム。—— P 0 NP 0 K 0 RIN GOTOH ， P 0 PC 0 M , 9月号 
付録2, 2-8 pp . 

► NEW SOFT 

第4のュニット第5弾 「 D - Againj を紹介。-編集 

部， LOGIN , 16 • 17号， 27 p . 

► X 68000 新聞 

イメージファイト， AXIS 〜 FZ 戦記〜，幻獣鬼，三國志 
II ，提督の決断，第4のュニット5 . D - Again を紹介。 
——編集部， LOGIN , 16 •け号，180- 183 pp . 

►最新ゲーム徹底解剖 

シムシティ ー， ウルティマ V ,ギャラガ W 8 を徹底解 
剖する。——編集部， LOGIN , 16 • 17号， 212-215, 228 
-231, 240-24 Ipp . 

ポケコン 

PC - E 500 
►稿•縮 

自分と敵が表示されないゲーム。敵は自分の足跡を消 
していくから，そこから敵の動きを推理して，捕まらな 
いように画面上のドットを拾う。—— Calling , マイコ 
ン BASIC Magazine , 9月号， I 67 p . 

► AG 0 UK の野望2 

死んだはずの AG 0 UK が再び攻擊してきた。——森高周 
作，マイコン BASIC Magazine , 9月号，168- 169 pp . 
PC -1500 
▼誌上公開質問状 

PC - 1500で PC - 1245用や PC - 1251用のプログラムが使 
えるか。また，卩0-1245用のプログラムを？0-124608や 
PC - I 248 DB で使えるか，などに答えている。—— Akiko , 
マイコン BA&C Magazine , 9月号，9 1 -92 pp . 


コンピュータ 

ソフト マニュアルの■き 方 

♦設計•作成と珐チェックポイント 


HOW TO WRITE 

A COMPUTER 

- ------ AHafldbock Q | 

Software OoctiMRtalion 



コンピュータ ソフト マニュアルの 書き方 
最近，ドキュメントの書き方に関する本が増え 
てきた。これもそのひとつ。原本は APPLE IIのユー 
ザー教育グルーブのために書かれたもの。 APPLE 
IIのマニュアルといえば当時，手本とされるほど 
できがよかった。本書も読みやすく，具体的によ 
いマニュアルを書く方法について述べている。訳 
はひどいが本書に従って書くことができればもっ 
とましなマニュアルが増えるだろう。 （K) 

ジョナサン•プライス著辻新六監訳ユーザフ 
レンドリー研究会訳日刊工業新聞社 003(222) 
7111 A 5 判340ページ 3,000円 



ザ • ゲーム カタ ロ グ’90 

光栄の書籍だからといってバソコンゲームとは 
限らない。本書は大人でも遊べるゲームを集めた 
カタログである。一度に遊べる人数で区分けされ 
ており，カタログとしては非常にみやすい。パソ 
コンゲームやエッセイ，モノポリー名人戦誌上再 
録ものなどなどバラエティは豊富だが，一番楽し 
いのは カラーで 輸入もののポードゲームを紹介し 
たカタログページだ。特にボードゲームのセンス 
あるゲーム盤は見ていて飽きない。 （K) 

光栄編集部編集 JAGA 監修光栄 0045(561) 
6861 A 4 判変形157ページ2, 800円 
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XlturboZ と X68000 のユーザー 
です。 CZ-8PC4 を使って 1/4 の 
大きさの 48 ドットカラーハード 
コピーを取りたいのですが，残念ながらマ 
ニュアルには， 1/4 の大きさのハードコピ 
ー プログラムが用意されていません。そこ 
で， Oh!MZ1 987 年 9 月号掲載の CZ-8PC1 
用のダブルサイズのハードコピープログラ 
ムをうまく改造すれば， 48 ドットプリンタ 
では 1/4 の大きさになるのではないのかと 
考えたのですが，素人の浅知恵でしよう 
か？ 京都府福知健 

モノクロプリンタでカラー画面 
のハードコビーを取りたいので 
すが，カラー画像をモノクロ画 
像に変換するにはどんなやり方があるので 
すか。 埼玉県菅野公紀 

質問の意図は1/4の大きさのプ 
リントを取るというよりも， 4 
倍密度のプリントアウトを行い 
たいということだと思います。 

プリンタの制御コードだけ見れば24ピン 
ビットイメージ印字を行うか48ピンビット 
イメージ印字を行うかの指定は簡単に変更 
できますが，実際に印字を行うには一度に 
48ドット X 横幅 分の データを セッ トしてお 
かなければなりませんので，単糸屯な変更で 
はた^めでしよう。 

48ピンビットイメージプリントを行うた 
めに 必要なこと は 48ドット幅のパターンデ 
ータを用意して，48ドットイメージ印字命 
令とともにプリンタに送るだけです。印字 
命令に ついては プリンタの マニュアル にあ 

り，速度さえ無視すれば操作は BASIC 上 
でも可能です0まず， プリンタマニュアル 
の サンプル などを見て用意した デ ータがど 
のように印字されるかを実際に確かめてみ 
てください。 

次に菅野さんの質問に答えましよう。モ 
ノクロでの表現力は白か黒かに限られてい 
ます。しかし，それだからといって馬鹿に 
してはいけません。身近なところには新聞 
に印刷されている写真などがあります。こ 
れらは色の濃淡で像を表現していますが， 
これでも十分に綺麗な像が得られることが 
わかると思います。 

昔からカラー画像を モノクロ プリンタに 
打ち出すときによく使われる方法に，ピク 
セルの カラーコードを複数の点で表すもの 
があります。この複数の点の集まりをマト 


リクスと呼びます。 3 X 3 のマトリクスな 
らその中に点が何個入っているかによって 
10個のマトリクスパターンを作れることに 
なります。つまり10段階の濃淡表現ができ 
るわけです。 

あらかじめ画面の表示色に対応したマト 
リク スパターンを 用意しておき， カラーコ 
ードを対応するマトリクスに置き換えるこ 
とでモノクロ変換するのです。これは簡単 
でわかりやすいのですが，変換後の画像が 
元絵より大きくなってしまうことが欠点と 
いえば欠点です。また，自然な感じのマト 
リクスパ ターンを 作ることが大変だし，元 
絵の色数が多い場合はお手上げの状態にな 
ります。 

元絵の大きさが変わらず，しかも，かな 
り良質の モノクロ 画像が得られる アル ゴリ 
ズムが本誌1988年11月号に棄野雅彦氏によ 
って発表されています（最近，誌上で引用 
されることが多いですね）〇この アル ゴリ 
ズムの基本的な考え方は，色を明るさで考 
え，その明るさの総和を等しくしようとい 
うものです。いま黒の明るさを0，白の明 
るさを1として，明るさ 0.7 の点と 0.2 の点 
が横方向に交互に8個並んでいるデータを 
モノクロに 変換することを考えてみまし よ 
1〇 

まず最初の点を見ると明るさは 0.7 です。 
これは白の明るさである1を満たしていま 
せん。ですからこのドットは黒にして，ひ 
とつ右にデータとして 0.7 を送ります。2 
つめは 0.2 です。これに送られてきたデー 
夕 0.7 を足すと 0.9 になります。ここも黒で 
す。データとして 0.9 を送ります。 

しかし，3つめのデータは 0.7 に送られ 
てきた 0.9 を足して1.6，ですから白です。 
次に送るデータは白 （1.0) を引いた 0.6 に 
なります。4つめは 0.2 + 0. 6=0. 8。だか 
ら黒。 0.8 をデータとして次に送ります。 

5つめは0.7 + 0.8=1.5。白。次に送るデ 
ータは小数点以下の 0.5 です。6つめは 0.2 
+ 0.5 = 0. 7。だから黒。送るデータは0.7。 
7つめは 0.7 + 0. 7 = 1. 4。つまり白。送る 
データは0.4。8つめは 0.2+0.4 = 0. 6。す 
なわち黒。変換後は白が4つ，黒が4つと 
なります。 

明るさの総和は 0.7 X 4 +0.2 X 4 =3.6 
ですから，白が3つ黒が5つでだいたいよ 
いことになります。ここでは右にしかデー 
夕を送っていませんが，実際には輝度デー 


夕を4分割して左下，真下，右下にもばら 
まいています。 

カラーコードを明るさに変換するには， 

0.30 R +0.59 G +0.11 B 
を計算します。8色なら RGB は0か1で 
す。黄色なら R = 1, G = 1， B = 0ですから 
明るさは， 0.30+0. 59+ 0 =0. 89となりま 
す。 RGB をすベて1にして計算すると1 
になります。これが白の明るさです。 

これでカラーグラフイックをモノクロ 
データに変換できます。マトリクス式の変 
換では，どうしてもマトリクスの大きさで 
変換像の大きさが制限されることが多いの 
ですが，棄野式ではちょっとした処理を加 
えることでドット単位の大きさ変更も可能 
です。プリンタへの出力にはもってこいの 
アルゴリズムといえます。（影山裕昭） 
X68000EXPERTII を購入して 4 
力月になりますが， N88-BAS 
SIC の WINDOW 文， VIEW 文に 
あたる命令は X-BASIC(Version 2.0) には 
ないのでしようか？もしなければ, WIND 
OW 文， VIEW 文と同様の機能を実現する方 
法を教えてください。神奈川県小川敏昭 
Oh ! X の読者の方は N 88 -BASI 
C といわれてもピンとこないと 
思いますので簡単に説明してお 
きます。 PC -9801 はグラフィック画面に対 
して3つの座標系を持っています。以下，そ 
れぞれの座標系について説明していきまし 
よう（なお，以下の説明は PC -9801 RX のマ 
ニュアルを適宜引用させていただいてます）〇 
〇オリジナル座標系 

この座標系は，常にディスプレイ装置と 
結びついた座標系です。すなわち，この座 
標系の大きさは，ディスプレイ装置と対応 
しており，座標上の各点が画面を分解する 
ドット数と一致しています。 X 68000 のス 
クリーンモード0では <0，0 ) -(1023, 
1023) を四隅とする座標系であり，スクリ 
ーンモード1および2では， （0, 0)-(511, 
511) を四隅とする座標系です。 

〇スクリーン座標系 

BASIC の命令を使って描いた図形を表 
示する際には，ディスプレイ画.面の中で表 
示領域を限定することができます。その限 
定した領域をスクリーン画面とか，ビュー 
ポートとかいい，そこでの座標系をスクリ 
ーン座標系といいます。このスクリーン座 
標系を設定する命令文， VIEW 文を使用 
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して， 

VIEW (100,100,200, 200) 

とすれば，オリジナル座標系にして（100, 
100)-(200,200) の範囲に,(0,0)—（100， 
100)の大きさのスクリーン座標系をとる 
ことができます。 

〇ワールド座標系 

この座標系はデイスプレイ画面に対応し 
たものではなく，いわば論理的な画面です。 
PC -9801 の場合， BASIC での描画命令 PS 
ET 文や CIRCLE 文は，この画面に対して 
描画を行います。ここに描かれたものが， 
スクリーン画面に投影されると考えます。 

普通，ワールド画面は，途方もなく広い 
ので，（今回の場合，縦横ともに，一3.595 
3862697246 E + 308から 3. 5953862697246 E 
+308までとれる），画面のすべてをスクリ 
ーン画面に投影していたのでは，見にくく 
てしょうがありません。 B 5 判の東京都全 
道路地図でも考えてください。こんなもの, 
使い物にならないでしょう。こんなわけで， 
もの凄い縮小率になるのを避ける方法があ 
ります。 

スクリーン画面に投影してやる範囲を， 

リスト1 


限ってやるのです。（東京ロードマツプだ 
ったら，池袋駅周辺だとか，高田馬場駅周 
辺だとか）その限定された領域をウインド 
ウ領域といいます。前述の東京ロードマツ 
プだったら，ウインドウ領域に，高田馬場 
駅周辺を指定してやると，手帳サイズの高 
田馬場駅周辺の地図になるわけです。 

そのウインドウ領域というものが ， WI 
NDOW 文で指定できます。その領域内に 
対して行う操作(線を引くだとか，円を描く 
だとか）は，すべて， VIEW 文で指定され 
たスクリーン画面に，移されてしまいます。 

さて，これらの概念が X - BASIC でもサ 
ポートされているかどうか，ということで 
すが，残念ながら X - BASIC では，完全に 
はサポートされていません。一応，論理画 
面，実画面，表示画面といいう分け方はあ 
るのですが，表示画面は論理画面の中央に 
固定されているので，座標系の変更などは 
できません。 

具体的にプログラムを組んだのが，リス 
卜1です。方針としては，線や円を描く前 
にそのパラメータを横取りして画面操作の 
前に簡単な1次変換してやります。そして 


その変換をしたあとに，描画を行います。 

行番号10〜60，1000，1490が私の作った関 
数で，行番号70からが，サンプルプロダラ 
ムです。関数 「_ line 」 は，プログラム中 
で私が定義した VIEW 文に対応している 
関数です。 X - BASIC に備わっている関数 
「 line 」 と取り替えてみると，その動作の 
違いがよくわかると思います。 

行番号10，20, 30で宣言されている変数 
は，それぞれ，あとの処理で使う グローバル 
変数ですので，貴方の作ったプログラム内 
で同じ変数を使用しているようならば，変 
数名を変更してください。 

使い方ですが，まず，プログラムの先頭 
に，リスト 1 の 10 行から 60 行までをコピー 
します。そして，どこでもよいですから， 
1000 行から， 1250 行までをコピーします。 
そうして，グラフィック描画関数の前にア 
ンダーバー，をつけます。今回サボー 
卜し た関数は以下のとおりです。 
view , window , line 
_circle (ただしパラメータは x ， y,p 
の3つだけ ）， _box 
ほかのものはこれを参考にすれば簡単に 
作成できるでしよう。あ，そうそう 1060 行， 
1070 行の 511 という数字は，このサンプル 
プログラムでのスクリーンモードの表示画 
面サイズ (512 X 512) からきているので， 
ほかの画面モードを使うときはここの値も 
適当に変えてください。 （石上達也） 


質問にお答えします 

日ごろ疑問に思っていること，どんなこ 
とでも結構です。どんどんお便りください。 
難問，奇問，編集室が総力を上げてお答え 
いたします。ただし，お寄せいただいてい 
るものの中には，マニュアルを読めばすぐ 
に回答が得られるようなものも多々ありま 
す。最低限，マニュアルは熟読しておきま 
しょう。質問はなるべく具体的に機種名， 
システム 構成，必要なら 図 も入れてこと細 
かに害いてください。また，返信用切手同封 
の質問をよく受けますが，原則として，質 
問には本誌上でお答えすることになってい 
ますのでご了承ください。なお，質問の内 
容について，直接問い合わせることもあり 
ますので，電話番号も明記してくださいね。 
宛先：〒108東京都港区高輪 2-19-13 

NS 高輪ビル 

ソフトバンク株式会社出版部 
「 Oh ! X 質問箱」係 


10 float __ mx, __ my /* 編横の倍率 

20 float — wxl ,― wx2, — wyl , 一一 wy2 
30 int ― sxl ,— 3x2, — ayl ,— ay2 

40 wxl=0 ： wyl=0 ： __ wx2 = 511 ： __wy2 = 511 /» 初期値設定 

50 ~~axl=0:_ayl = 0:__ax2 = 511:_sy2 = 511 /» スクリーンモードで変えて下さい 

60 7* 

70 screen 1,1,1,1 
80 _window( 0 ,0,639,399) 

90 view(0,0, 511,511) 

100 box(0, 0,639,399, 7) 

110 for x=0 to128 

120 _line(x*5,0,639-x*5,399,3) 

130 next 
140 end 
150 /* 

1000 func _window(xl;float,yl;float,x2;float,y2;float) 

1010 一 wxl=xl ： __wyl=yl 

1020 — wx2=x2:__wy2=y2 

1030 endfunc 
1040 /* 

1050 func _view(xl ； int,yl ； int,x2 ； int,y2 ； int) 

1060 if x2>511 then x2 = 511 /* スクリーンモードによって変えて下さい 

1070 if y2>51 1 then y2=511 
1080 window(xl,yl,x2,y2) 

1090 — axl=xl :― syl=yl 

1100 ― ax2=x2 :― ay2=y2 

1110 — mx=( — sx2 -— axl) / ( ― wx2- — wxl) 

1120 __ my=(__sy2-__syl)/(__wy2~__wy1) 

1130 endfunc 
1140 /* 

1150 func _line(xl ； int,yl ； int,x2 ； int,y2 ； int,p ； int) 

1160 line(__sxl+(xl-__wxl)*—_mx, — syl+(yl- — wyl)* — my, — axl+(x2 - 一 wxl)*__mx し 

_syl+(y2-__wylT* — my,p) 

1170 endfunc 
1180 /* 

1190 func _circle(x ； int,y ； int,r ； int,p ； int) 

1200 circle< 一一 axl+(x-__wxl)*__ mx, __syl+(y-__wyl)* 一一 my,r*__mx,p,0,359,256 * 一一 

/— mx) 

1210 endfunc 
1220 /* 

1230 func _box(xl ； int,yl ； int,x2 ； int,y2 ； int,p ； int) 

1240 box( ― axl+(xl- — wxl)* — mx, ― syl+(yl- ― wyl)» — my, ― axl+{x2- 

ayl+(y2-__wyl)*__my,p) 

1250 endfunc 
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♦ハードディスクつきの X 68000を買ったのは 
よかったが， 3 DK の男3人住まいではブレーカ 
一が飛ぶ飛ぶ（笑)。おかげで怖くて 80 M バイ 
卜が使えないのであった！ 悲劇！ 

鳥居伸英 (20) 愛知県 
ブレーカーって電子レンジが「チーン」と 
いった瞬間とかに，よく落ちますよね。昔, 
うちの家も「チーン j といった途端に部屋 
が真っ哜間になったりしましたものです。 
しみじみ。 

♦わっ，私はとうとう愛機 X I turbo model 10を 
裏切ってしまった。そう私はついにあの X 68000 
EXPERT II を買ってしまったのだだだっっっ。し 
かし，その代償はあまりに大きい。まず何よりも 
車の保険と合わせて月3万円 X 男の30回払い！ 
そして，いままで使用していた CZ -8 PK 2 という 
ブリンタが X 68000では使えないのであった。 

X Iturbo の怨念か？ 野村耕嗣 （19) 千葉県 

かもしれない。ところで，男の30回という 
のはよく音楽雑誌に敕っているどっかの栾 
器屋の広告の「男の120回払い」の真似な 
んでしょうね。あの広告は最初見たとき， 
結構笑えました。 

♦ポビュラスの世界には女性がいないのに，ど 
うして人口が增えるのだろう。 

影山秀和 （18) 広島県 
そういや，そうですね。やっぱり，細胞分 
裂かな。 

♦私の X 68000が死んだ。 IPL の ROM を取り替え 
てもらったけれど,直らず，再修理。今度は行っ 
たきり帰ってこない （ 丨力月経過)〇ディスプ 
レイとキーボードが残った机を見た友人は「お 
っ！ ワークステーションみたいじやん！ か 

っこいい！ j とバカにする……ううっ . 。ち 

ゃんと直って早く帰ってきておくれ。うるうる 
……。 松尾和浩 (29) 新潟県 

そういう場合は，「いいだろ 一， カチカチ 
カチ」とか口で言いながらキーボードを叩 
いてごまかすんですよ。で，相手がしらけ 
ちゃったらこっちのものです。ん？ 
♦はっきりいって ，X 68000はマウスがないと 
ただの箱になってしまう。だから，マウスがな 
くて もカーソルを 動かせるような機能がほしい 
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暑い，暑いといっているうちに，すっか 
り，いまはもう秋になってしまった。あ 
あ，涼しいなあ。本当に本当に涼しいな 


♦先日，下のチビ（我が子のことです）があん 
まり泣いて駄々をこねるので，「怪獣を見せて 
やる！ j といってドラゴンスピリツトをやらせ 
たら，「ボボーッと火を吹くよお！ j と夢中に 
なってしまいました。それから，毎夜「怪獣を 
見にいこう！ j と親の私の手を引くのでした。 
ちなみに，もうじき3歳になりますが先が思い 
やられるのでした。くわばら，くわばら……。 

伊沢範庸 (30) 東京都 
そういう場合は見るも耐えないようなっま 
らないゲームを見せるとか，聞くに耐えな 
いようなものすごい音楽を鳴らすようにす 
ると，二度とコンピュータに近寄ろうとし 
ないでしよう。 

♦コンピュータが登場する映画を古いむのから 
順に紹介する，という企画はいかがでしようか？ 
コンピュータ％ロポツトというところでしよう 
か？ 「禁断の惑星」のロビー，「2001年宇宙の 
旅」の HAL etc .。 

佐藤信一郎 (32) 東京都 
そういや結構いっぱいありますよね。「メ 
トロポリス j のロボットのマリアとか〇「沲 
判」に出てきた古めかしくてやたらでっか 
いコンピュータとか。でも，いちばん古い 
のはどの映画だろう。 

♦ボケコンの連載が開始されることなど久しく 
ありませんでしたね。これからも定期的な掲載 
を希望しております。それから， Oh!X LIVE in 
•90 には硬派な R & R を求めています。プリテイッ 
シュビートかグラムロックを載せていただきた 
い！ 野口穂積 (22) 大阪府 

似せていただきたいといわれても投稿が米 
ないとね。僕としてはアル•デイ•メオラ 
の「スペイン高速悪魔との死闘 j とか，イ 

ングヴェイ•マルムステイーンの「トリロ 

ジー•スーツ OP :5 j とかを送ってきてほ 
しいな。 

♦編集部ではいつも対戦ポピュラスをしたり， 
YET のスコアを競ったりしているのですか？ 

山中政宣 （16) 三重県 



TO THE EDITOR 


あ。うそじゃないよ。こんなに涼しいと 
思わず月見にでも行ってしまいそうにな 
るなあ。ああ，；示しい。 


いや，そんなこ.とばかりしていると疲れち 
やうので，たまには息抜きに仕氓もしてい 
ますよ。 

♦ 2 力月前のディスクをやっと解凍しています。 
最初はわからず子供に話していました。電子レ 
ンジでチーンしようか，水に浸けて解凍しよう 
か。子供に笑われました。5年たっても初心者 
です。 矢野博志 (46) 福岡県 

いやあ，2力月もたったから自然解凍して 
しまったんですね。ああ，よかった，よか 
った。 

♦浪人してとうとう前期が終わってしまった。 
あっという間に過ぎていってしまった感じだっ 
た。 3年の頃はあんなにのんびりしてたのに… 
…。大学に行った高校の友人に会うとなんか劣 
等感を感じてしまう自分が情けないです。編集 
部の人やライターの人はやっぱり浪人した人は 
いないのでしょうか。木下卓也（丨 8) 椅玉県 
いや，結構いますよ。う一ん，それにして 
も浪人というのはやっぱり変なプライドを 
持っているものだと思うんですけど。その 
へんの大学生よりも贤いんだと言い張ると 
か。そうでもしないと浪人なんかやってら 
れませんよ。 



、索夫神条 m / ぃてます.か、ば。つ 
I でやらし0 i ない匕鹿ぅんてす 
る匕別にやら I 
匕見て—.... 
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えも多少崩れたようだ。もちろん，本は薄くて 
も中身は濃いと定評のある Oh ! X も宣伝しました 
よ。 内匠勇二 (31) 和歌山県 

やっぱり，メジャーだという点では PC -98 
01には大幅に負けていますからね。こうい 
う草の根迎勋で輪を広げていきましょう？ 
♦暑いですね！ ところで，パソコンの冷却フ 
アンから冷風が出るようになりませんか？ あ 
れば，ぜひハードウェアエ作入門で取り上げて 
ください。 水谷潔 (43) 三重県 

簡単じやないですか。まず，氷を手に入れ 
ます。そして，それを冷却フアンの前あた 
りに置きます。ほら，涼しい風が。ちよっ 
と，湿気が多くなって体がベたつくのと， 
機械に水がかかるのが怖いけど……。 
♦いったいどうしたら，ハミダシに載せてくれ 
るんでしょうか。 松尾保孝 （18) 奈良県 

そうですね。しいていえば，まず短くまと 
まっていること。そして，なによりも面白 
くなければね。あっ，それともうひとつハ 
ガキを早めに出すことも必要です。 

♦駅前の本屋で Oh ! X があったので（丨冊きり！） 
ジュースを我 1 ！曼して買った。しかし，あとで後 
悔した。家に着くまでノドはカラカラ。きわめ 
つけは汗。さあ読もうというときになって表紙 
のきれい‘な CG の上に4本の指の跡がくっきり。 
読む気がまったくなくなった。 

渡辺安唯 （16) 千葉県 
さあ，蜜り絵の時間です。絵の具を買って 
きて，自分で表紙に色を塗って直しましよ 
ラ。 

♦ 7 月19日 ， AM 10 : 20。頼んでおいた T & T 
が届いた。 Oh ! X の8月号を見たときは，やっぱ 
り遅れているんだなあと思っていたが今日届い 
た。これって本当に12枚組だったんですね〜え。 
数年前 （X Iturbo が出た頃）は，たしかフロッ 
ピーディスク丨〇枚で7, 000円ぐらいしていたと 
思うんですが . 。すごいなあ。 

川口哲也 (23) 岐阜県 
やっぱり，12枚組っていうのは多すぎます 
よね。手が12本ぐらいあれば全然問題ない 
かもしれないんですけどね。でも，出ない 
よりはまし？ 


♦ Kamikaze を使って丨学期の成績をつけたら， 
「先生は冷たい。俺たちを機械で分別するのか j 
と詰め寄られた。でも，人間的に成績をつけるっ 
てよくないよ。ついつい好き嫌い（ひいき）が 
出ちゃうからね。だから，これからも Kamikaze 
で クールに 成績をつけるつもりだけど，「先生 
が使っている）< 68000って，でっかいフ ァミコ 
ンみたいなもんでしよ j はないと思う。おこる 
よ，ホントに。 村井裕弥 (32) 東京都 

データを入力するときにひいきが出ち ゃっ 
たりして。そんなことはないか。 

♦ “ SWORD ” を超えた S - OS といえば，その名 
前は “ PEN " しかないだろう。 

根内賢一 （19) 千葉県 
うまい！ ざぶとん1枚やっとくれ。 
♦何年振り かで 海に行った。そして，足が届か 
ないところまで泳いでいったら溺れかけた。自 
然に対して人間の力というものが，いかに小さ 
なものなのかということを思い知らされた丨日 
でした。 干葉浩貴 （17) 宮城県 

う一ん，ただ単に泳ぎが下手なだけだった 
かもしれない。今度は山にでも行ってなに 
が起こるか試してみましよう。 

♦初めて手紙を出します。これを軎いていて気 
づいたのですが，「あなたの愛機は j のところ 
に"ない"とあるの fc はビックリ。あの A SO 
〇〇でもないのに，パソコンも持たずに Oh ! X を 
買っているなんて。そんな人，本当にいるんで 
しょう力 . （いたら失礼)。 

佐々木剛宏 (21) 北海道 
ちゃんと，いますよ。いっぱい。 

♦しかし，僕みたいにパソコンも持っていない 
のに OWX を読んでいる人はどのくらいいるんで 
しょうか。早く X 68000を買いたいが，その資 
金もいつコンポや S - VHS のビデオやレーザーデ 
イスクに変わるか定かではない。さらに，スー 
パーファミコンにもポピュラスやシムシテイー 
が出るという。僕はこの誘惑から身を守り無事 
X 68000 を買えるだけのお金をためることがで 
きるか。 近藤英二 （19) 愛媛県 

ほら。 

♦もうすぐ X 68000 を買うと思うので，これか 
ら " Oh ! X ” を買っていこうと思っています。面 


( Amiga にはあったような気がしたけど)。つま 
り， OPT . 丨を 押しながら カーソルを 押す とマウ 
スカーソルが 動いて XFI , XF 2 キーがマウスの 
ボタンに対応するとかしてほ•しい。これはただ 
単に アフター バーナー， ダンジョン マスターで 
マウスが 危なく，それでいて金がないからだっ 
たりする。 浅沼博明 (20) 北海道 

う一ん，あったらいいかもしれない。でも， 
その場合，つぎはキーボードがこわれてし 
まってもっとお金がかかるかも。 

♦ メガドライブの大戦略を買った 。X 68000版 
よりも面白い。船はあるし， MUSIC もあるし， 
戦いもァニメしている。これでマウスが使えた 
ら……。もし ， X 68000 に大戦略 II を出すのな 
ら，メガドライブ版を超えたものがほしいと思 
いませんか？ 大戦略 III もほしいけど。 

中村岳夫 （17) 東京都 
そう力、，やっぱりマウスが使えないという 

のが . 〇ところで， スーパーファミコン 

にもポピュラスやシムシティーとかダンジ 
ョンマスターが 出るみたいだけれども，全 
部ジョイパッドでやるんでしようか。指が 
っりそう。 

♦今度のディスクの付録には，皆さんの声をサ 
ンプリングして入れてみてはどうでしようか。 
もちろん，容置が余ったときにです。でも，デイ 
スクのほとんどが編集部の会話の声だったら面 
白いかもしれませんね。宮浦慎司 （17) 香川県 
編集部の会話を入れたりするとほとんど僕 
の声しか聞こえないかもしれない。 

♦部屋の壁いっぱいに国土地理院の5万分の I 
地形図を張り付ける。布団を敷いて電気を消す。 
暗閒に目が愼れた頃に壁を見る。う一ん，ラン 
ドサットの気分（いま夜だったりする）。 

松浦範明 （16) 広島県 
寝っきのいい人だと目が惯れる前にすっか 
り寝てしまったりして。 

♦いやあ，とうとう100号ですか。早いもので 
すね。あっ，はじめまして。私，小島というも 
のです。これからももっと面白い記事を書き続 
けてくださいね。 P . S . 私，聞きましたよ。 Oh!MZ 
が出始めた頃，表紙のね一ちゃんがいやらしい 
ので，なんと " Oh ! マゾ”と間違えられてエッ 
チな本といっしよに並んでいたということを。 

小島勇人 （18) 青森県 
そうか，そんな恥ずかしい過去がこの雑誌 
にはあったのか。 

♦私の職場は F 社のパソコンー色である。しか 
も，ワープロとして使用するだけである。なぜ 
なら， MS - DOS もあまり知らない職員ばかりだ 
からだ。その中で私は念願の X 68000 を買った。 
そこで職場の連中に X 68000を買ったぞ！と 
いうと.それなに？ PC -980 I なら知ってると 
きた。頭に来た私は買ったばかりの X 68000 と 
シンセサイザで買ったばかりのソフトを使って 
ゲーム，グラフィック， MIDI 演奏をしてみせて 
やった。それ以来 ，X 68000の知名度はもとよ 
りパソコン買うなら X 68000 ! と株が上がっ 
たよ。パソコン=ワープロというわが職場の考 
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を発表します。 • 

4月号未来都市 
5月号ノアの箱船（かな？） 

6月号 UFO 

7月号幽盟の徘徊（こじつけ） 

8月号月の異常接近 
う一む，やっぱり「ムー j してますね！ 

倉田泰幸 (20) 茨城県 
ちょっと苦しいけど，よくこじつけました 
ね。9月号の表紙はどうでしたか。 

♦なぜ，ハガキが汚れていると思いますか。な， 
なんと私の部屋が水浸しになったからなのです。 
上の階のやつが水を流しっばなしで放っておい 
たためだった。天井をつらぬいて落ちてくる水 
は泥水に変わり果て，2日前に来たばかりのス 
キヤナやディスブレイなどを襲っていた。買っ 
たばかりの Oh!X もグシヤグシヤであった。これ 
は，外出中に起きたことで防ぎようがなかった。 
その晚，私は徹夜でリモコンやマウス，スキヤ 
ナなどをお手入れするはめになった。テスト期 
間中だった。次の日のテストは全滅だった。部 
屋はまだ工事中でX 68000は友人宅。この怒り， 
わかってくれます？ 野田博 （19) 群馬県 
本当にハガキが黄色いもんなあ。泣くしか 
ないってやっですね。 

♦本日，1990年7月29日（日）午後2時10分， 
「バック. トゥ •ザ•フユー チ ヤー 3 」を観 ま 
した。前2作に負けず劣らず，とても面白かっ 
たです。制作 スタッフの 皆さんには，ただただ 
敬服の念を抱くばかりです。僕も来年は就職。 
夢のある職場に就きたいと思っています。編集 
部の皆さんも暑さに負けず読者に夢を与えてく 
ださい。 中島靖 (20) 福岡県 

まだ，パート2も見ていな L. 〇レンタ 

ルビデオを借りて見てみようかな。ほかに 
もいっぱい見たいのがあるんだけれど，な 
かなか時間がなくて最近全然映画は見てい 
ない。しくしく。 

♦対戦ポピユラスの記事，楽しく読ませていた 
だきました。 Oh!X の中では珍しく心底笑わせて 
くれる記事でした。私も友人の PC-980I 相手に 
勝たせていただいていますが，今回の記事で大 
変勉強になり，ここ3日12連勝しています。夏 


白い記事をどんどん載せてください。 

野坂隆征 （15) 滋賀県 

ほらほら。- 

♦最近 JR 各社は新しい特急列車用車両をどんど 
ん投入していますが，ラップトップパソコンや 
ワープロを使えるように座席の下にコンセント 
がほしいと思っているのは私だけでしょうか。 
また，車内の電話からパソコン通信ができるよ 
うにデジタル化してほしいと思っているのも私 
だけでしょうか。 溝渕誠 （19) 大阪府 

コンセントほしいですよね。ないと洗濯も 
できないし0ところで，よく.ビルの外側と 
かにコンセントがあったりしますけど，あ 
そこにコタツとかをつないで人が住んでし 
まうんじゃないかと思ってしまうのは私だ 
けでしょうか。 

♦ついに 明日から北海道だ。待ってろよクッシ 
一， 待ってろよロシア兵，待ってろよオーロラ 
の下の白夜の土地よ一！（すでになにかを間違 
えている）俺の VT250F はもう燃えているせ！ 
(ちなみにカラーは赤。ううっ，なぜだか恥ず 
かしいぞ！）ピッカピカに洗車してイオンコー 
卜までしたもんね一！ 紅いイナズマと呼んで 
くれ。さ一て，あとは3万円がどれだけもつか 
だ……（お土産？ ひゅるるるるう〜)。 

大津和之 (20) 福岡県 
3万円だと結構きっいような気が。いきな 
り，いろんなところが壊れて補修赀用がか 
かったりするかもしれないし0やっぱりス 
ナフキンのように歩きで行かないと。それ 
だと，無一文でもなんとかなるし。 

♦ああ，2 M バイトユーザーはいいよなって本 
当に感じてしまった。ワールドコートを見たと 
きにはなんともいえない気持ちになった。それ 
にしても， SPS にひと言いいたい。 2M バイト 
いるならいると事前にはっきり広告に載せてく 
れ，もう発売当日にこんな悲しい目に遭いたく 
ない。楽しみにしてたのになあ，ワールドコー 
卜（うるうる……)〇 今井武史 （16) 福岡県 

う一ん，こういう人は結構いるんだろうな。 
なんで， 2M バイトいるんだろう。本当に 
必要ならしょうがないけど。 

♦脱「ムー j 誌を図った新しい表紙の分析結果 


休みに入ってから大学に出向く機会があり•ふ 
と電算機室に人がいるのに気づき，先生と話で 
もしようと行ってみると，電算部のやつらと先 
生が学校の PC-980I を使ってプロミストランド 
の対戦をしているのです。考えてみれば学校の 
ものということで費用が一切かからず，いまで 
は結構なゲーセンと化しています 

吉葉勝幸 （19) 栃木県 
結構強そうですね0ポピュラス大会に応募 
してくれたらよかったのに。 

♦対戦ポピユ•ラスはとても面白かった。祝氏が 
小差で勝つと思ったら，西川氏が勝っていた。 
やはり年齢差がものをいったか。マップの作り 
方もうまいと思う。中野氏も結構強いかもしれ 
ない。これからもこのような企画お願いします。 

清水達朗 (21) 岐阜県 
たしかに，中野さんも強いですよ。ひよっ 
としたら，自分でやるのよりもいじわるな 
マップを作るほうが好きかもしれないけれ 
ど。 

♦こんにちは。「対戦ポピユラス」を見て，つ 
いポピユラスを買ってしまいました。9月には 
シムシティーが出るというのに困ったな 一。 と 
ころで，うちのワープロによるとポピユラスを 
漢字で害くと「歩避ゅ羅州」になるということ 
です。 村上淳一 （19) 福岡県 

あっ，本当だ。そういうふうに変換される。 
いつもカナに変換するので，気づかなかっ 
たけど。 

♦先日，期末試験から解放され，気啃らしに散 
歩に行った。近くに利根川があるので，その土 
手に行ってみた。そこで，である。土手を見た 
瞬間，僕の頭の中をよぎっていったのは 「この 
土手を平地にするには，何回クリックすればよ 
いか」という問題である。思わず考え込む自分 
が怖くなった。どうやらポピユラスにハマッた 
ようだ。試験勉強もせずにやってたからなあ。 
だけど，夢にまで出てくるとは……テトリス以 
来だ。 足立義宗 （15) 埼玉県 

僕もゲームボーイでテトリスをやりすぎて 
夢に出てきたことがあるなあ。まあ，どち 
らもそれほど面白くて熱中できるというこ 
とでしょうけど。 

♦ウルティマVをやってますが，そのあとポビ 
ユラスをやって人を沼に落としたり，騎士の周 
りの土地を削って海で溺れさせたりしていると, 
自分は本当にアバタールなのだろうかと心配に 
なることがあります（んなわきゃねぇよ！）。 
あと，ウルティマで誰でもいいから Fuck you と 
入力すると面白いメッセージが返ってきます 
(徳が崩壊するという噂も……) 〇 

小笠原洋 （16) 東京都 
そんな下品なことは私にはとてもできな… 
…なるほど。 

♦風呂を沸かし始めた。沸くまでポビユラスを 
やって待つことにした。熱中した。気がつくと 
風呂のフタが熱でゆがんでいた。翌日の朝，い 
い湯加減になっていたので，朝風呂に入って学 
校へ行った。ばちがあたるかもしれん。 
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福岡裕和 (21) 茨城県 
朝風呂はやっぱり気持ちいいよね。 

♦祝一平 VS 西川善司は海原雄山 VS 山岡士郎を 
見ているようだった。どうせなら，祝氏に「こ 
の祝に Oh ! X のスタッフの汚い手垢のついた X 68 
000でポピユラスをやれというのか」とかいっ 
て，数日後に満開製作所から新品の X 68000 が 
送られてくるとか，「この祝に猿や豚といっしょ 
にポピユラスをやれというのか」とかいってほ 
しかった。残念だ。しかし，完全に「美味しん 
ぼ」に毒されているなあ。 

高麗道也 （19) 香川県 
やっぱり，多かったポピュラスのハガキ。 
ということで今月の STUDIO X は終わり 
です。あっ，それと8月号の A . T . さんの 
編集後記に対する「僕もトマトジュースが 
好き」っていうハガキもすごく多かったで 
すよ。では，さようなら。 


茇なハガキ 


最近，ちよつと変わったハガキが目についたので特別に載せてみました 0 



If 

わず 


Y \ __ 呼 

[まくらの掲^^ 


I 仲間 

★よろずサークル劇団まいむ • まいむでは現在， 
新規会員を募集しています。現在会員は45名（う 
ち女の子2名）で，主な活動は月丨回の会誌発 
行です。会誌ではゲームレビューやフリートー 
ク，小説やイラストの掲載など，いろいろなこ 
とをやっていて，パソコンを持っている人も 
持っていない人も十分楽しめるようになってい 
ます。女の子も入会した劇団まいむ•まいむ， 
みんなで楽しく活動しましょう。詳しくは62円 
切手同封のうえ下記まで。入会案内書をお送り 
します。〒〇 93-05 北海道常呂郡佐呂間町永代 
176小野富二雄 

★古箱一浩& EXTRA からのお知らせ。 MZ -700/ I 5 
00, X I / turbo , MSX , etc . のグルーブ ， EXTRA で 
は会員募集中です。今回は Mew サウンドルーチ 
ン Ver .8.0 と MML . C の配布のお知らせです。割り 
込みを使用していますので，音楽を聞きながら 
エディタで修正も可能です。注文の際には，メ 
ディア（カセット， QD , FD ) を明記してくだ 
さい。詳しくは EXTRA までご連絡をください。 
また，サウンドルーチン Ver .8.0 と上位互換のサ 
ウンドルーチン Ver .9.0 もマニュアルはありませ 
んが専用 MMLC II と配布します。一応 Ver .8.0 と 
Ver 9.0 には約100曲楽譜から変換されています 
が，現在は配布できません。どの曲が変換され 
たのかは EXTRA vol .45 に掲載予定ですのでそち 
らを見てください。また ， Picture Compiler も新 
しいバージョン ( Ver . l . l ) になりましたので， 
こちらのほうもよろしく。サウンドルーチン以 
外にも S - OS 関係のソフトの配布，未発表のゲ 


•掲載ご希望の方は，官製ハガキに項目（売る•買う•氏名•年齢•連 
絡方法…… ） を明記してお申し込みください。 

•ソフトの売買，交換については，いっさい掲載できません。 
•取り引きについては当編集部では資任を負いかねます。 

•応募者多数の場合，掲載できない場合もあります。 

•紹介を希望されるサークルは必ず会誌の見本を送ってください。 


ームや， System -7 B のグラフィックエディタや 
ツールなども配布しています。また， MZ -700/ 

1500/2500 /X I / turbo / MSX / X 68000のいずれか 
でプログラムを組める人も募集中です（特に M 
Z -700 + System -7 C ! でプログラムを組んでくれ 
る人)。詳しいことは，皆さんお誘い合わせの 
うえ，下記の住所までお問い合わせください(パ 
ソコンなんて持ってなくてもかまいません）。 
MZ -700/1 500/2500/ X I / turbo / MSX / その他のユ 
—ザーの皆さん， EXTRA に入会しよう！ 〒811 

-42 福岡県遠賀郡岡垣町戸切 794-3 筑紫高宏 

★サークル「夢幻史 j では第2期後期会員募集中 
です 。X I / turbo , PC -8801 ユーザーを対象とし 
ており，活動内容は2力月ごとに発行する30ぺ 
ージ前後の会誌が中心。 BASIC , 音楽， 雑談， 
Q & A などの記事を掲載。あと，自作プログラ 
ムの発表なども。また，会誌の原稿を窨いてく 
れるスタッフも募集しています。興味のある方 
は62円切手同封のうえ下記まで。亍593大阪 
府堺市東八田 40-7 藤田淳一 「0 WX 読んだぜ j 
係 

|売ります 

★コルグの T 3 (新同）をマニュアル，保証害， 
付属品一式すベて付けて専用スタンド 「 KSSB 」 
といっしょで27万円で譲ります。 MIDI ケーブル 
(5 m ) を2本サービスします 0 連絡はハガキ 
か手紙でお願いします。〒328栃木県栃木市 
惣社町1619毛塚健次 （17) 

★オムロンのモデム r MD 24 FPj とジャストシス 
テムのハンディカブラ 「 JS - HC 00 I 」 のセット 
を送料先方払いで 5 万円。新品同様，付属品， 


マニュアル， 保証害すべ て あり。連絡は往復ハ 
ガキで。〒713岡山県倉敷市玉鳥中央町 3-1-39 
松浦正章 （18) 

★カラーイメージユニット 「 CZ -6 VTI 」 を3万円 
程度で。新品同様。連絡はハガキでお願いしま 
す。〒629-23京都府与謝郡野田川町岩屋356 
安田真二 （17) 

★ X 68000 用数値演算プロセッサボード 「 CZ -6 BP 
lj を2万5千円（送料込み）で。完動，箱， 
マニュアル， 付属品す ベて あり。連絡は往復ハ 
ガキで。亍 960-02 福島県福島市飯坂町平野字 
八龍前 1-20 大内一之 （18) 


買います 


★ X 68000用増設 RAM 「 CZ -6 BEI 」 を送料込みで 
2万円ぐらいで（完動，付属品付き）。連絡は 
ハガキで。〒341埼玉県三郷市彦成3三郷団 
地 9-9- 1203白木準三 (38) 

★ XI 用データレコー ダ 「 CZ -8 RLU (完動， 箱， 
マニュアル あり）。送料込み4千円から6千円 
で。〒355埼玉県東松山市材木町 6- 14杉田 
裕之 (17) 

バックナンバー 

★ Oh ! X の1988年12月号，1989年6, 7, 8月号を送料 
込み各1200円で。切り抜き不可。傷，汚れは可。 
連絡はハガキで。〒515三重県松阪市上川町4 
21松浦邦博 (20) 

★ C マガジンの1989年10月号から12月号を。切り 
抜き，汚損不可。丨冊2千円で。連絡は往復ハ 
ガキで。〒31卜04茨城県日立市東河内町1227 
石川満章 (22) 
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編集室から 
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□RIVE ON 

このコーナーでは，本誌年間モニタの方々の 
ご意見を紹介しています。今回は8月号の内 
容に関するレポートです。 

•「ADVANCED 2 D GRAPHICS 」 について。い 
きなり難解な数学の話になるのだろうかと思 
ったらグラフィックツールの紹介から入って 
いるのは初心者でも安心して読めたと思いま 
す。そして，やはりきましたね， Oh ! X ならでは 
のストロングな記事が，アンチエリアスとい 
う言葉は日頃グラフィック画面をただのグラ 
フ表示か，たまにやってもレイトレ程度とい 
う私にはよくわかりませんでしたし，恥ずか 
しながらジャギーという言葉は初めてです。 
要するにペイントするときの境界処理ですね 
……。とにかく，理解するためにもペイント 
関数を早速 「 SLANG 」 に移植すベく解析してみ 
ます。ソドリッドスキヤンコンバージョンに 
ついては以前 「MAGICj (いまは読者のうち 
「 MAG に j を知っているのはどれくらいかな 
あ）掲載のときに同じような解説が多角形表 
現についてなされていたので予備知識もあり 
わかりやすかったです。ジャギーの除去もな 
んとか理解できましたが，それ以降は私には 
よく理解できませんでした。でも，プログラ 
ムを解析してでもモノにしたいですね。 Oh!X 
( MZ ) はドラゴンだ(懐かしい！ ） というポリ 
シーが表れた特集だと思います。 

梅本英之 (20) XIGmodel 30, PC -8201, PC - 


1251奈良県 

•バグのために暴走するならともかく，引数 
が制御範囲を起えると暴走するというのなら 
ば，一切問題ないと思う。もし，暴走が怖い 
のなら使わなければよいのであって，その選 
択はユーザーに任されているのだから。それ 
に， XROTO . X のようなルーチンを実際に使い 
たいと考える人なら，バスエラー回避のルー 
チン程度なら作れるはず（回転プログラムで 
画像の劣化が激しいともなればゲームとプレ 
ゼンテーシヨン以外にはあまリ使えないでし 
ようから）だし，それ以外の人はどうせオモチ 
ャにしかならないのだから，無視してもかま 
わないだろう。 1 ■その筋」なプログラムの登場 
を歓迎をします。 

高村信 (20) XI turbo mode 130, PC -8001 mk II 
東京都 

籲正直いって「まだ100号か j という気がしま 
す。僕が買い始めたのは1984年からですが， 
それよりもずっと前から Oh ! X ( MZ ) はあった 
かのような錯覚に陥るのです。 

しかし，それとは逆に僕の本棚に収められ 
た計83冊の Oh ! MZ や Oh ! X を見ていると6年と 
いう月日がとても短く感じられるのです。僕 
にとって Oh ! MZ から Oh ! X へ変わったのはほん 
のちよっと前のことであり， X 68000 の登場も 
つい最近のことのように思えます。それは， 
Oh ! MZ , Oh ! X ともに持っている情報の普遍性 
から来ることではないでしようか。 

たとえば，僕はいまだに他機種からの 
BASIC プログラムの移植には1986年 I 月号か 


らの対照表を使うし，プリンタについて凝り 
たくなればプリンタ関係特集をやっている 
Oh ! X ( MZ ) を全部出してきます。 

つまり， Oh ! X ( MZ ) の記事はほとんどが(す 
ベて とはいいません）タイムリーな情報だけ 
を扱ったものではないのです。そこがポイン 
卜なのです。そこがパソコン情報誌の本来負 
うべきところであるのです。このような雑誌 
はほかの分野に類を見ないでしょう。何年た 
っても使える雑誌など考えられません。だか 
ら，これからも Oh ! X のスタッフは変わってい 
くでしょうが， Oh ! MZ の持っていた素敵なパ 
ソコンの使い方をこれからも載せていってほ 
しいと思います。 

長谷川敦士 （17) MZ -2521, MSX 2 山形県 

•私はこの CARD . FNC がここまでメジヤーに 
なることを予想できませんでした。それだけ 
にこの CARD . FNC がよくできていたというこ 
と，ひいてはユーザー側で関数をメーカーの 
ものとまったく同様に拡張できるといった優 
れた汎用性(拡張性）があったということでし 
ょう。こういうときに 「 X 68000 でよかったな 
あ」と思うわけです。ついでに，私個人が希 
望したいものとしては， RS -232 C を使っての 
対戦型ポーカー， GP - 旧を使って10人プレイ 
可能な大富豪， SCSI インタフ x イスを使って 
のスピードなんかがやりたいですね（はっき 
りいってむちゃですね)。 

浅野憲 （19) X 68000 PRO , XI turbo III , XI 

Fmodel 20, MZ -80 C , PC -6001, M 5 Jr ” PC -1245 
大阪府 


図 1 



図 2 



ごめんなさいの 

□ーナー 

9月号 BILLIARDS 

リストに一部見にくい箇所がありました。 
大変申し訳ありませんでした。以下に正しい 
リストを掲載いたします。 

P . I 48 リスト2 

18 var a ， b ， bk ,. r l , rf 2 r v 

9月号ハンデイイメージスキャナアダプタの製作 
P .9 I の図3の回路図および P .92 の表丨の部 
品表に一部誤りがありました。 I 0 k (2 の抵抗が 
I 本抜けています。図丨が正しい回路図です。 
お詫びいたします。 

また，図2のようにするとカラースキャナ 
が使えます。電源は I 2 V のものを使用します。 
ただし，取り込みプログラムは各自で作成し 
てください。 


バグに関するお問い合わせは 

〇的 (54 的)1311(癱通) 

月〜金曜日16 : 00〜18 : 00 


お問い合わせは原則として.本誌のバグ情 
報のみに限らせていただきます。入力法.操 
作法などはマニュアルをよくお読みください。 

また.よくアドベンチャーゲームの解答を 
求めるお電話をいただきますが，本誌ではい 
っさいお答えできません。ご了承ください。 


17 b Oh!X 1990.10. 










































はっきりいって 
オーバーフローだ 
もっとページを1 

▼ X 68000 の2大特殊機能といえば，なんとい 
ってもサウンド & グラフィック。ですが，言己 
事の反響は，目に見えるだけにグラフィック 
のほうがいいのが普通です。プログラム自体 
か丽なグラフィックに比べ，サウンドのほ 

うはデータの作り方さえわかれば比較的手軽 
に本体の機能を引き出せます。音楽はわから 
ないなどといわず，織毛氏の用意したサンプ 
ルなどを入力して聞いてみてください。 

▼以前予告した，同人ソフトの紹介ページが 
今月の 「THE USER’S WORKS 」 です。今後も 
できる限リカラーぺージを使って紹介してい 
きたいと思いますので，ぜひとも編集部まで 
お送りください 0 お待ちしております。 

▼THE SOFTOUCH では AFTER REVIEW に載 

せる皆さんのゲーム評価を募集しています。 

言己事には載ってし、なかったけど実はここか面 
白かったとか，なんとかシステムはこうすれ 

ばもっとよくなるとか，やり込んだ人だけに 
この楽しさがわかる……など，実際にプレイ 
した感想をハガキのメッセージ欄に記入し 
てお送りください。ちょっと古いゲームでも 

かまいません。採用させていただいた方には 

言己念品をお送りいたします。 

▼というわけで今回は， Oh ! MZ の創刊3号 
(1 982年8月号）を3名の方に差し上げたい 
と思います。ご希望の方は綴じ込みのアンケ 
—トハガキのプレゼント No . に0と記入して 

お送りください。 

そして，お待ちかね「創刊号プレゼント」 

の当選者発表です。森敦史さん(東京都),平 

義晴さん(大阪府)，赤城豊和さん(兵庫県)の 

3名の方が当選されました。おめでとうござ 
います。また， STUDIO X に掲載された小川一 

行さんにも特^に創刊号をお送りしたいと思 

います。 

▼今月はページの都合でいくつかの連載がお 

休みになってしまいました。「マシン語カクテ 
ル inZ 80’ sBar 」「 X - BASIC プログラミング調 
理実習」 「 PASCAL プログラミングへの招待」 

は次号までお待ちください。 

ネ■領 

春 原稿には，住所•氏名•年齢•職業•連絡 

先電話番号 • 機種.使用言語.必要な周辺 
機器•マイコン歴を明記してください。 

•プログラムを投稿される方は，詳しい内容 
の説明，利用法，できればフローチャート， 

変数表，メモリマップ（マシン語の場合） 

に， # 文献を明記し，プログラムをセー 
ブしたテープ（ディスケット）を添えてお 
送りください。また，掲載にあたっては， 

編^ h の都合によリ加筆修正させていただ 
くことがありますのでご了承ください。 

春 ハードの製作などを投稿される方は，詳し 
い内容の説明のほかに回路図，部品表，で 
きれぱ実体配線図も添えてください。編集 
室で検 1 寸のうえ，製作したハードが必要な 
場合はご連絡いたします。 

♦投^のモラルとして，他誌との二重技 
他機種プログラムを単に移植したものは 
固くお断りいたします。 

あて先 

〒丨08東京都港区高輪 2-19-13 NS 高輪ビル 

ソフトバンク出版部 

Oh ! X 「© ㊀ ®®」係 
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「•BREAK 

►今月は怒濤の FM ^ 源特集〇ちよっと難しいけど一 
度は楽しんでほしい世界だあね 0 なんといっても人 
に自分のプログラムを聞かせるの力棚味だから。 

悪友に聞かせて「けちよんけちよん」に言ってもら 
うとかなり上達するからやってみるべし。井の中の 
蛙力挪び出して蛇にのまれて胃の中の蛙になったん 
じゃ洒落にもならんしの(意味不明)。 （織） 

►オーデイオぐらし4刀見でいじれるし，パーソナル 
ワープロだって打てる。こんなところにいるぐらい 
だから電イ im ? 口に弱いつもりは全然ないのだが…" *〇 
エラー音が出るたびにびびりまくるのは多機有 M 舌。 
再生押して，短縮押しながら3押して……と，操作 
は隠しコマンド以上である。誰か助けてぇと〇ん恐怖 
おじさんの身になっている昨今だ。 （浦） 

►何を勘違いしたのか, CommunicationPRO -68 K の 

Ver . 1.0 を買ってしまった。しかし，それにもめげず 
パソコン通信にハマルのであった。世の中のフリー 

ウェア & PDS はよくできていて，投稿すればずいぶ 
ん)^斗がもらえるのになあと思うものも多い。そ 
れを無^斗で配ってしまうとは， なんとお^ < D 広い。 

感謝，感謝。 （亀） 

►最近*頭の中身がポエムである。または，鳥頭と 
でもいうべきであろうか。1週間も前にあったこと 

など，ほとんど忘れているし.同窓会の_が回っ 
てきたときには，30^#ち合わせ時間を聞き間違え 
た。同窓会では2/3ほど名前のわからな L 、人がいて， 

家に帰ったあと，卒業アルバムを見ながら復習をし 
てしまう僕であった。 （純） 

► 某店でアサルトの ROM を1 , 000円で打っていた。こ 
れは「買い！」と思い店員に声をかけるとパネルが 
ないのですが…… j との答え。そうかアサルトは特 
殊パネル（あの2つのジョイスティック上にボタン 
のついてるヤツ）だったのだ。だれか，アサルトの 
特殊パネルを譲ってください！ 

(システム II があれば彼女はいらないと思う善） 
►こつこつためる。ちょっとたまったところでいい 

気になって/ヽデに使う。なぜか直後に大きなマイナ 

スがくる。じり貧になる。を狙って思刀 

った行動に出る。しくじる…… „ 教訓：余裕を持っ 
て使いたいものですね ^ お金もマナも。ポビユラス 

は人生の縮図だったのだ。それでは対戦ポピユラス 
を人生にたとえてみよう。きっと怖いよ。 （ A . T .) 
►なかんずく，私にも落ち込むときはある。たとえ 
ば，自分 力嗜 きたいと思っていた内容を，自分より 
ずっとうまく，面白く窨かれたときである。才^の 
なさを感じる。続いて，自分の写真をあるべき場所 
ではないところで見たときである。生理的に恥ずか 
しいものがある。いうまでもなく，可愛い女の子に 
冷たくされたときも落ち込む。一応ね 0 ( K ) 

►結局，駐車が見つからないまま車の契約をして 
しまった。しょうがな1、ので不動産屋に行ってみた 

が，不動産屋は駐車場だけを探しに来る客に対して 
は愛想が悪い。そこを我慢して話をしたのだがやは 

り空いた駐車場はない。納車は駐車場を見つけて2 
週間後とディーラーに言われているが，果たしてそ 
れはいつだろう。 （どうにかなるさの K 0) 

►「 MSXturboR 」 の発表会に半分仕事，半分趣味で 
行ってきました。 Z 80 には思い入れがあるのでワ 

クワクしてたんだけど，実際の仕様を見てみると， 

AV 機能も強化という割には， MSX 2 十の CPU を 

R 800 にして PCM 音源を積んだだけみたいなんです 

よね。ちょっと期待外れかな。 R 800 だけでも心を惹 
かれるんですけど，それだけじゃあね 0 やっぱり 。㈧ 
►ああ，夏が終わった……〇思えば今年の夏は引っ 
越しに始まり引っ越しに終わったんだよなあ。サー 
ファーだった私が 丨 回しか海に行かなかったなんて 
••…*〇まあいい，副_長も誕生したことだし，冬 
はたっぶりスキーに行かせてもらおうっと。さあて， 
新しいウェアでも買いにいこうかな。 

(薄い水清の跡が悲しい E . 0.) 

►帰省してみると軒並み X 68000 ユーザーが増えてい 
ることに驚いた。さて， K 0 氏に刺激されたのか，某 
所の社長さんがいきなリベンツの値段を聞いてきた。 

う一む，この人はいったい…… 。 でもどうやら本気 
で車（それも外車）を買う気になったらしい。そこ 
で，とりあえず強力にボルボをすすめておいた。さ 
て？ （ U ) 

► FM の音源の特集なわけだが， X 68000： i _ ザーで 
も肝心な 0 PM ドライバを持っていない人が僅か 
ながらいる。初代機で，かつ，ほとんどシステム環 
境を整備していない人だ。いま持ってるソフトの中 
身はチェックしておくといい（なにか買えばたいて 
い付いてくる)。とりあえず, SX - WIND 0 W を買うのが 
いちばんお得かな。 IOCS . X も入ってるしね 0 ( T ) 
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東京ってやつは不思議な街だ。来る者を拒ま 
ないこの街は，なにかとてつもないパワーと引 
力を持っているかのように君臨している。誰も 
がこの街にあこがれ，集まってくる。かくいう 
私も，生まれてから25年間この街を離れらずに 
いた。けど，なにかがいつも足りないのだ。こ 
んなになんでも揃っていて，飽きさせないだけ 
のオモチャや場所も腐るほどあるのに，なにか, 
足りない。刺激に憤れちゃったのかな，なんて 
ナマイキにも思ってたりしたんだけど……。 

でも。独り暮らしを始めてしばらくしたとき 
に，わかったね，足りないものがなんなのか。 
いいきっちゃうよ，もう。足りないもの，それ 
は人間同士のコミュニケーションなのだ。 

いまの日本は雑誌や TV が氾濫しきっている。 
いわゆるマスメディア全盛ってやつだ。我々は 
それらに取り囲まれているというよりは，逆に 
それらに翻弄させられている感がある。雑誌に 
オシャレな店が載っていると聞けばそこへ走り， 
新聞のテレビ撊や電車の中吊を見れば，まるで 
その番組や記事を熟知したかのように錯覚させ 
てくれる（ように害かれている）。もちろん流行 
もすベて情報まかせ。で，マスメディアってや 
つは主に東京を中心にはびこっている。その 
ド真ん中に住んでいるもんだから，安心感も手 
伝って余計に自分からなんかしようなんて思わ 
なくなるし，すべてが受け身，それで十分周り 
に頎応できるように仕組まれている。特別他人 
と話をする必要，すなわち他人とのコミュニケ 
ーションを持たなくても平気なように，だ。で 
も，これってかなり非人間的なことよねえ。 

なぜ，こんな寂しいことに気がついてしまっ 
たのかというと f 私は独り暮らしを始めて6年 
間同じアパートにいたにもかかわらず，他の7 
人の住人と一切話をしたことがなかったから 
だ！ 6年といえば，中学と高校を卒樂できて 
しまうぐらいの期間だぞ，おい。その間"同じ 
屋根の下〃にいた人たちとすれ違ったのだって 
20回くらい，はっきりいってこれは異常！ 

確かにこの街はいつも動いているわけだから， 
そんななかで生活するのはかなり疲れる。だか 
ら，わずらわしいコトはどっかに置いといて， 
情報を仕入れてラクに暮らしたい。が，それが 
悪循環の始まりだったりする。疲れるからと周 
りとのコミュニケーションを断つ。でも，ひと 
りでいるのは寂しい。友達はへっちゃったし 
……。さて，どうしよう。そこでいきなり異性 
にいくんだな，これが。で，同棲，2人の世界 
よ。私のいたアパートなんてほとんどそうだっ 
たもん。女の子しか住んでいないはずのアパー 
卜のそこかしこに男の声が聞こえる，げげ っ。 

コミュニケーションの少なさ=世間の狭さだよ 
ね。いいよ，同樓したって。でもね，あとどうすん 
の，振られたとき。もともと寂しくて始めちゃっ 
たもんだから，いなくなったらもうタイヘン。 
なぐさめてくれる友達もすでにいなくて，さ。 

いま，横浜に引っ越してよかったと思っている。 
団地のせいもあるけど，全然知らない人なのに 
ちゃんと挨拶してくれる。それがすごくうれし 
い。あったかい気持ちになるもん。人間同士の 
コミュニケーション，やっぱりそれって人を好 
きになるうえでの最低条件だよね。 （ E . 0.) 
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特集理科系の GAME REVIEW 

続報 C compiler PRO -68 K 
ドローツール CANVAS P 闩 0-68 K 

全機種共通システム 

スクリーンエディタ 

CARD. FNC 用ゲーム 

ローリングストーン 


東京 




神奈川 

厚木 

有隣堂厚木店 

ンクナンバー常備店 

平塚 

0462(23)41 II 
文教堂四の宮店 





0463(54)2880 



干葉 

柏 

新星堂カルチェ5 
0471 (64)8551 




船橋 

リブロ船橋店 

神保町 

三省堂神田本店 5F 



0474(25)01 11 


03(233)3312 


// 

芳林堂窨店津田沼店 

// 

書泉ブックマート BI 
03(294)001 1 


千葉 

0474(78)3737 
多田屋干葉セントラル 

// 

害泉グランデ 5F 



0472 (24) 1333 


03(295)001 1 

埼玉 

川越 

黒田害店 

秋葉原 

T-ZONE 7F ブックゾーン 



0492(25)3138 


03(257)2660 


川口 

岩浏 II 店 

八重洲 

八重洲ブックセンター 3F 



0482(52)2190 


03(281) 1811 

茨城 

水戸 

川又軎店駅前店 

新宿 

紀伊国屋窨店本店 



0292(31)0102 


03(354)0131 

大阪 

北区 

旭屋窨店本店 

高田馬場 

未来堂害店 



06(313) 1191 


03(200)9185 


都島区 

駸々堂京橋店 

渋谷 

大盛堂害店 



06(353)2413 


03(463)051 1 

京都 

中京区 

才ーム社軎店 

池袋 

リブロ池袋店 



075(221)0280 


03(981)01 11 

愛知 

名古屋 

三省堂名古屋店 

// 

西武百貨店 9F 



052(562)0077 


コンピュータ，フォーラム 


" 

バソコ ン2上前津店 


03(981)01 11 



052(251)8334 

横浜 

有隣堂横浜駅西口店 


刈谷 

三:洋堂窨店刈谷店 


045(311)6265 



0566(24) 1134 

// 

有隣堂ルミネ店 

長野 

飯田 

平安堂飯田店 


045(453)081 1 



0265(24)4545 

藤沢 

有隣堂藤沢店 

北海道 

室闌 

室閜工業大学生協 


0466(26)1411 



0143(44)6060 


定期購蹺のお知らせ 

0 WX の定期購読をご希望の方は綴じ込みの 
振替用紙の「申込害」欄にある「新規 J 「継 
続」のいずれかに〇をつけ，必要事項を明記 
のうえ，郵便局で購読料をお振り込みくださ 
い。その際渡される半券は領収軎になってい 
ますので，大切に保管してください。なお， 
すでに定期購読をご利用の方には期限終了の 


少し前にご通知いたします。継続希望の方は, 
上記と同じ要領でお申し込みください。 

海外送付ご希望の方へ 
本誌の海外発送代理店，日本 IPS (株）にお 
申し込みください。なお，購読料金は郵送方 
法，地域によって異なりますので，下記宛必 
ずお問い合わせください。 

日本 IPS 株式会社 

〒1〇1東京都千代田区飯田橋 3-11-6 
003(238)0700 


■ 1990年10月 I 日発行定価560円（本体544円） 

■発行人孫正義 
■編集人橋本五郎 
■発売元ソフトバンク株式会社 

■出版事業部〒108東京都港区高輪 2-19-13 NS 高輪ビル 
Oh!X 編集部 003(5488)1309 
出版営業部 003(5488)1360 FAX 03(5488)1364 
広告センター 003(297)0181 
■印刷凸版印刷株式会社 

©1990 SOFTBANK CORP . 雑誌02 179-10 本誌からの無断転載を禁じます。 
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9月30日までにお申込の方には、2枚組から希望と明記していただければ、第28号から 
発送します（当日消印有効)。 

購読方法：通信販売でのみ扱っております。御*;主文は、現金害留または郵便振替で、 
定期購読料6ヶ月分6,000円(送料サービス、消費税込）を下記の宛先へお送り下さい。 
籲穿令書留の译合. 

〒171東京都豊島区要町卜 19-3 いさみビル 4 F 満開製作所 
♦郵便振替の場合：東京 5-362847 満開製作所 

※御注文の際は、郵便番号 • 住所 • 氏名 • 電話番号を忘れずに御記入下さい。 
•お問い合わせ先 TEL (03)554-9282( 月〜金午前丨丨時〜午後6時） 

(製品の性格上、返品には応じられませんが、お申し出があれば定期購読を解約し残金をお返ししま to ) 


© 薄開の®孑今やん 


作：ぃゎぃぃフ喷、 
え：间材漦 



特に、 8 月 18 日発売の 
9月号は2枚組/ 

LISP インタプリタ、 

バッハの平均律48曲、 

技モノグラフイツクツ—ル 
からマイクロ EMAcs 
まで載つちやつてお買得よ 





9 西川善司 
(埼玉県) 

よく昔から「隣の客はよくきや 
き食う柿だ」などと言いますが、 
私は スイカが 大好きです。そんな 
時「なだしお」の如く現れたのが 
屯脳俱栾部でした。 a : ぐに眯読を 
開始して、届いたディスクの内容 
の多彩さにびっくり。しかし、何 
より婿しかったのはプログラムの 
殆どにソ—ス リストが ついている 
ことでした。 X 6 8 K をバリバリ 
に使っている人達のソ—スを 月千 
円で見れてしまうとは、私はなん 
てラッキ—ボ—イなんだろうと神 
様に感謝してしまったくらいです。 
特に通信をやっていないユ—ザ I 
には必携のアィテムですね。 















































































































シリーズに新製品登場.グ 



1回線専用ホスト入門用ソフト 



HOST PR068K Personal 概要 


対応回数 1回線 

使用モデム AT モデム MNP ( RTS / CTS ) 可 

通信速度 敁大960 0 bps 

会贤数 最大999人 

揭示板数 敁大4〔)個 

機 能 電子掲示板 • 電子手紙 • m 子会議（チャット）*会 ms 報 


これらは、コンフイグファイルで設定できます。 


注1:このホストはテキスト形式の転送方法を採用しております。 

特長 


*各«议定のコンフイグファイル化 
籲 R S — 2 3 2 C 回躲とは別にキーポードからのアクセス. 

ダウンロード，アップロードが可能 
* モニタで.各チヤンネルのユーザーの打ち込んだコマンド 
や ifiU 状®を確这 

拳？ WtSW 板利に S 丨 G . ポードパスの投定 
• メンテナンス作龙がオンライン太行能 
(ボードインデックス.メールインデックス〉 

镛オンラインサインアップ等.ゲストへの設定が可能 


(オンライン簡 W エディタ）拽能 

* その他 

シスオペレペルで会11悄«の变史が" j 能 
タイムアウトによる M « yj 祈 
PDSWHI 掲示板の採川 
<1齐込中で.ドキュメントとテキストブ 
ログラムの分離）接絞 MNP タイプの*別 
ログイン.ログアウト時111〗の 
非アクセス時のモニタ Itfiirtiirt 去" f 能 


<差額交換について〉 




回線を多回線に拡張する場合ユーザー登録を行っていただいた方に 
限り多回線用ホストと差額にて交換をさせていただきます。 

HOST Personal 

岭 

HOST 3 

¥20.000 

HOST Personal 

岭 

HOST 9 

¥40,000 


fr 


好拜雜亮中 

HOST 9 9 回線用 

矚酬 g^H ¥59.8DDm 
HOST 3 3 回線用 

■置威 Ml ¥39,800円 

TSUK UMO-N E 丁モデル運用中 ." 



ユ-ザ-靈視の赌を搭載して 

好評発売中 

17.800円 


SBOOO 專用 

パソコン通信ソフト 


「た〜みのる」力 1 
装いち新たに 

「た〜みのる2」として登観/ 

「た*〜•みのる」 

通信人門版な 
「た〜みのるは 
フニアタイブの通信ソフトです/ガ 

「た〜みのるは X 68000 用に製作された»«ソフトです。 
X 68000 の溅能を充分に引き出して、：！ーザーの方々か__ 
に賺作できるよう工夫•製作されてい浅す,， 


ブロクラマ藝集ガ 

SPS でゲームを作ってみませんか7 

アセンブラでプログラムの組める優秀な人材を若干名募集してい 
ます。就職希望の方は62円切手同封の上、「就職案内係大和」ま 
でお手紙<ださい。折り返し就職のご案内をお送り致します。 

尚、デザイナー、音楽プログラム等の専門職は募集しておりません。 


-編 


糊 

バス停 


(株)マイコン八ウス 

SPS 

于960 a 應市太平寺字町/内 5-3 «0245)45_3777 
FAX(0245)45.1804(G U.GIII) 


■表示価格に消費税は含まれておりません 


当社の製品は全 H の有名デパート、パソ 
コン シヨツプでお求めになれ J す，埘、お 
求めになれない壜合、«便局にてお-申し 
込みください， * 口座番号 W 山 5-12298 
* 加入者名撕エス•ビー.エス♦金 W 代 
金に3%の消贄税を加)！した》*通111職 
(裏面）ご希»ゲームソフト名、》簠，代金 
含針、年齡、氏名、《櫓名 > テープかデイス 
クの!*«。（一 a 閗以上かかりますので、 
お急ぎの方は現金書 a をご利用ください. 
その壜含、おつりのいらないようにお« 
いします。 


漢字•文字コードシフト J 旧 

通®速度300/1200パ2400(自勦判別 MNP 7) 

通《方式:全二霣 
テ ータ ビット畏:日ビット 
パリテイー•チェック：なし （ NONE ) 

ストッフ•ビット：1ビット 

フロー制御( X コント□ール）：行なう （ XON ) 

シフト制御 ( S コントロール）：行なわない ( SOFF ) 
ケスト IDGUEST 

ケスト•八スワード：なし 


入会方法離 3 删_ 

下記の用紙に商接記入するか又は、コビーして記入し、72円 
切手同封の上、 「 SPS - NET 係」までお送り下さい。届さ次第、 
仮登録を行い ID m 後 SPS-NE T 禅用の郵便振込み用紙 
ならびに運用の手引きをお送り.いたします。それに促い、3ケ 
月以内に登録料3,000円(税別)を御人金ドさい。 

人金確認後正式会 W として再登録します。 


例◎バスワード = SPS-NET 

/ (8 文字ま rx 小文字麵りハ 


◎本名=大和大五郎 (8 文字まで） 


◎ペンネーム=大ちやん (4 文字まで） 


◎年齢=30(現在の年齢） 


◎電話= 0245-45-5777( 市外局番から） 


◎職業二株式会社エス•ビー•エス (1 眩字まで） 

( ) 

◎住所 =■ 市太特娜ノ剛 -3(2 収字まで） 

(〒 ) 

◎自己紹介二 SPS - NET をよろし< 

/ (24 文字まで)\ 


◎システム構成： X 6_ ACE-HD MD 2400巳 

/ (1 収字まで)\ 




ホストコンピュータ 

X68KX2 台 

(H0STPR0 68K16) 使用 


SPS~NET (0245)46-1 167¢(¢ 

■ Tri-P 接続ホスト局 


PKO -60 K 


PRO -60 K 


RO -60 K 


通信制御手順 






















































今すぐもよりの電話から 

仙台 022-864-3704 

名古屋 052-452-3271 

広島 082-295-6873 

札幌011-611 -5104 

新潟 0252-75-4175 

大阪 06-311-3931 

福岡 092-481-2494 



高価下取り、 

買取りいたします、 
お問合せ 
下さい0 


Welcome/ 
ご来店もどうぞ 


X 68000 の情報のすべて/(当店は X 68000 の認定代理店3す。お気軽〖こご相談下み J ) 


XX B 8000 待望の新しい仲間登場, 


PERSONAL WORKSTATION _ 

EXPERTS EXPERTS SS 


EXPERTH- 
EXPERTD HD 

集積度を高めた"マンハツ 
タンシヱイプ〃 3 M の大容置 
メモリを搭載。本格的なウ 
インドウシステム、 SX - WIN - 
DOW 搭載。 


I のモニタは別充てす,〕 




rc；^603cy 標準価格 ¥ 338,000 
CZ-613C" 標準価格 ¥448,000 




US 日000 

PERSONAL WORKSTATION 

PRon-PRon ise 


PROE-PROn HD 

拡張 I / O ポートを 4 スロットを搭載し、汎用 
と低価格が魅力。 

ろん、 SX - WINDOW 搭載,， 


〔写具のモニタは別売です。〕 


CZ-653C 標準価格 ¥285,000 
CZ-663C 標準価格 ¥395,000 


AVC 特価 


CZ -8 PC 4 

お勧めディスプレイコーナー組合せは自由、価格はお気軽にご相談下さい。 

48 ドット 熱転写 プリンタ 
—。 精密な 文字、ハード 
コビー も可能。 

•0.31 mm ドットビッチ 

摞準価格 ¥94.800 參 2 モードオートスキヤン 
AVC 特価 •ステレォスピ-力搭敝 

參チルト台同梱 

O^-gl^D •ドットピッチ 0.31 mm 
標準価格 ¥135,000 * TV チューナー搭載 

AVC 特価:搭載 

Q 7—0030 •0.3 lmm ドットピッチ 

摞準価格 ¥84.800 像 TV チューナ無し 

AVC 特価 *3 モ-ドオートスキャン 

參チルト台同梱 

Wk CZ - SI '- C 4 V 99,800 

AVC 特価¥ ? ? ? 

rLUlHD •◦52 mm ドットビッチ 

襟* 価格 ¥148,000 參 21 型ディスプレイ 

AVC 特価 *3 モードォートスキャン 

•ステレオスピーカ搭載 

^7-60^0 •ドットビッチ 0.39 mm 
檷準価格 ¥115,000 チューナー搭載 

AVC 特価== -力， 

C7_6(PD •ドットビッチ 0 39 mm 
標準価格 ¥99.800 暑 TV チューナ-搭 K 

AVC 特価 •チルト台同梱 
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XXB8000 

PERSONAL WORKSTATION 

SUPER SSJ 



80 MB ハードテ V スク、 
SCSI インターフエース 
搭載/ 

CZ -623 C-TN 

. ¥498,000 

CZ -613 D-TN 

¥135,000 


AVC 特価 


お電話で 


X68000 PRO-EXPERT SET 


• CZ -602 C & CZ -603 D • 
• CZ -602 C & CZ -602 D • 
• CZ -602 C & CZ -613 D . 
• CZ -602 C & CZ -604 D • 


定価 ¥440,800 + 特価 ¥292,000 
定価 ¥455,800 特価 ¥298,000 
■ 定価 ¥491,000岭 特価 ¥335,000 
定価 ¥450,800 特価 ¥298,000 


❿ CZ -652 C & CZ -603 D . 
• CZ -652 C & CZ -602 D . 
• CZ -652 C & CZ -613 D . 
• CZ -652 C & CZ -604 D • 


• 定価 ¥382,800 岭特価 ¥254,000 
定価 ¥397,800 特価 ¥258,800 
■ 定価 ¥433,000岭 特価 ¥300,000 
• 定価 ¥392,800 4特価 ¥263,000 


ICZ -612 C & CZ -602 D - 
> CZ -612 C & CZ -603 D • 


定価 ¥565,800 特価 ¥375,800 
定価 ¥550,800 + 特価 ¥365,800 


ICZ -662 C & CZ -602 D • 
ICZ -662 C & CZ -603 D • 


定価 ¥507,800 特価 ¥329,800 
定価 ¥492,800 特価 ¥319,800 


※セットでお買上の方に、 SX - WINDOW 、 ジョイカード、“グラデーウス”デイス 
ケット10枚プレゼント/ 


•頭金なし(手軽な電話クレジット)•製品先取り(お支払いは約卜2ヶ月後から）•低金利クレジット（ I 回の支払いは2.700円以上で 3-48 回。ボー 
ナス併用も可）•カレッジクレジット(保証人なし。但し満20嫌以上の学生の方）籲18歲未滴の方（ご両親が代理購入者としてお申し込み下さい） 
•納期(通常の場合、当社に申込書が到着後 I 週間以内。特に人気のある商品で品薄の場合、少々納期が遅れることがありますので御了承下さい） 
•兜全保証（すべてメーカー保証害付。アフターケア万全）•全国代引（お届けした者に、代金をお支払いいただく方法です> 但し手数料1.000円） 


AM 10 時から PM 7 時 

まで受彳寸日曜•祝日ち営業 

































































◎ 

栃木県庁 



micro computer shop 


■MylllBl 


宇都宮店 & 大田原店 


PROSHOP 





CZ-653C 


CZ-6 織 


‘Basic 


XBBOOO 用八ードディスク 

アイテック itx-680. 

アイテック ITX-640. 

アイテム HXD-040. 

アイテム HXD-042.^mreoo 

ロジテック SHD-40.Basic 特価 

シャープ CZ.64H.Basic 特価 


XB 的00用 SCSI 予約大募集 

シャープ 

光磁気ディスクユニット 
CZ-6M01 
SCS レボード 
CZ-6BS1 


予約受付中 


予約受付中 


X 6 的00用 PRINTEFTS 


シャープ CZ-8PC4 〜 
シャープ CZ-8PG1 ••• 
シャープ CZ-8PG2 •… 
シャープ CZ-PK10 …- 
エプソン AP-850 …… 
エプソン AP-550EX" 
エプソン VP-1350"" 
エプソン VP-2050 ••… 
NEC PC-PR201GS- 
スター CR-3415CL .… 



•Basic 特価 
•Basic 特価 
•Basic 特価 


通信関連品 

NEC COMSTER2424/4- 
NEC COMSTER2424/5. 
OMRON MD24FS5 …… 
OMRON MD24FS7 …… 
CommunicationProV2 … 
た〜みのる 2 . 


•Basic 特価 
•Basic 特価 

• M ^4 r 800 


ゲーマー必須アイテム 

CYBER STICK. 

XE1-AP. 

XE1-PR0. 

XE1-ST.. 


^23rS0(J 

MOO 

• M ^4 r 900 


クラフィックツー JL 

スキャナパラレルボード • 

CZ-8NS1. 

GT-6000. 

GT-1000. 

HS-10RII. 

HS-7RII. 

CZ-6VP1. 

IO-735X. 

ジーズスタッフ PR068K- 

デジタルクラフト . 

マジックパレット . 

サイクロン Expressa68 -- 


• M ^ r 800 
•Basic 特価 
•^7^800 

•Ml^raOO 
•M24M00 
•Basic 特価 

•Basic 特価 


その他周辺機器 

拡張 I/O BOX 
アンプ内蔵 スピーカー 
カラー イメージ ユニッ 
ビデオボード _ 

RGB システムチューナー 
CRT フィルタ 



CRT 

CU-21HD. 
CZ-605D.. 
CZ-604D- 
CZ-613D- 
CZ-603D •• 



ロケットキャッシャー完成！ 

新アルゴリズムの採用により従来比約3倍の高速化を実現。 


N — ドディスクキャッシャーのみのバージョンア， 


となります。旧製品のディスクのラベルを同封のうえ， 
1,500円（送料•税込）を現金書留でお送り下さい。 


ビデオボード (CZ-6BV1) を外付けに! 

ビデオボード！！又納ケース （ KGB-BVBX) 

近日発売予定 

( 通信販売のみで一般販売はしません） 


全国どこでも発送可長期クレジット OK 送料全国均一¥1,000宅配便にて即日配送 


台数限定電子手 

A SET 

PA -8600 

CE-200L 

CYBERNOTE PR068k 

: •帳特別セツト 

B SET 

PA -8600 

CE-200L 

Stationary PR068k 

PLA 

ASET 

CM-32L 

SX-68M 

MusicStudio Mu-1 

f THE MIDI M 、 

B SET 

CM-64 

SX-68M 

MusicStudio Mu-1 

USIC 

CSET 

MT-32 

SX-68M 

MusicStudio Mu-1 

Basic 特価 ¥41,800 Basic 特価 ¥37,800 

Basic 特価 ¥93,000 Basic 特価 ¥1 43,000 Basic 特価 ¥88,000 


本社営業部マイコンショップ通販部宇都宮市竹林町 503 〗 TEL0286 22 9811 FAX 0286 25 3970 
林认万十ェ 6 丁 / 只!又 flTT 大田原営業所マイコンショップ 大田原市美原 1 13- 4 TEL0287 23 5352 FAX 0286 23 5364 


マイコン ショップ 


I / n'JlXWl 大田原営業所マイコンショップ 大田原市美原 113~4 TEL0287 23 5352 FAX0286 23 5364 

L いぶ 1 胃お申し込み.お問ぃ合せは ^ 0286 - 22 - 9811 (^) 


NEWS 


NEWS 1 


競輪場通り 









































































































































2 枚のホ , ~ F が1枚になった 





広大なメモリ空間を実現する最大 4 M 八イトの 

高速増設メモリ 


高速演算を約束してくれる 

数値演算 
プロセッサ 


• メモリアクセスノーウェイトによる高速アクセス 

♦ CZ -6 BE 2/ CZ -6 BE 4/ CZ -6 BP 1 との混在力 < 可育巨です 
• 複数枚の KGBX 68 PRK の実装が可能です 

參ジャンパの変更により任意のアドレス空間にメモリの配置が可能 
です 

春ジャンパの変更により数値演算プロセッサの1枚目2枚目/未使用 
の選択が可能です 

•1 M /2 M /3 M メモリモデルは購入後にメモリをボード上に追加可 
能です 

• 数値演算プロセッサにはデ/、イスドライノ <( FL 0 AT 3 X ) が付属します 


«写真は KGB - X 68 PRK -1 4です 

製品価格一覧 


* メインメモリが 1M ノ、•イトの機種では 2M ノイト以上に拡張じ C ある必要があります。 
※メモリアクセスノーウェイトのため拡張 I/O ボックスで動作しません。 

糸メモリの増設は当社にポードを送り返じ a、 ただいて行ないます。 


KGB-X68PRK-01 ¥ 58,000 

(1 M メモリ/数値演算プロセッサ無し） 

KGB-X68PRK-02 ¥ 74,000 

(2 M メモリ/数値演算プロセッサ無し） 

KGB-X68PRK-03 ¥ 98,000 

(3 M メモリ/数値演算プロセッサ無し） 

KGB-X68PRK-04 ¥122,000 

(4 M メモリ/数値演算プロセッサ無し） 


KGB-X68PRK-10 ¥ 72,000 

(メモリ無し/数値演算プロセッサ付属） 

KGB-X68PRK-11 ¥ 96,000 

(1 M メモリ/数値演算プロセッサ付き） 

KGB-X68PRK-12 ¥ 112,000 

(2 M メモリ/数値演算プロセッサ付き） 

KGB-X68PRK-13 ¥136,000 

(3 M メモリ/数値演算プロセッサ付き） 

KGB-X68PRK-14 ¥160,000 

(4 M メモリ/数値演算プロセッサ付き） 


購入後の増設費用 


メモリ 


1M バイト 

¥24,000 

2 M バイト 

¥51,000 

3 M バイト 

¥76,000 

数値演算プロセッサ 

MC 68881 RC 16 ¥38,000 


充実の巳 ASIC HOUSE 八ードウェア S ソフトウェア 


高速 12BIT ， 16CHA/D コンバータボード (KGB-AD12) XI ¥118,000 
フォトアイソレーション 16BIT デジタル入出カボード (KGB-PIO) XI¥ 42,000 
ハードディスクインターフェースボード (KGB-HDIF) XI ¥16,000 

アイソレーション 16B ぼデジタル入出カボード (KGB-X68PIO)X68000 ¥ 68,000 
ハンテ V プリンタ & インターフェース （ HANDYPRINTjack) X68000 ¥ 24,800 


高速 12BIT ， 4CHD/A コンバータボード (KGB-DA4) XI ¥ 98,000 

汎用ローコスト A / D & PI 0 ボード (KGB-X1S) XI ¥ 19,800 

高速 12BIT ， 16CHA/D コンバータ (KGB-X68ADC) X68000 ¥128,000 

64180 CPU ポー ド Mach180(KGB-CPXB) X68000 ¥ 98,000 

口ーコスト MIDI インターフェース （MELODY BOX) X68000 ¥ 16,800 


BASIC 拡酬数パッケ - ジ №6301) ¥9.800 C 言語ライブラリ （ B6-6305) ¥6,800 BASIC 拡張関数パッケージ C 言語ライブラリ付 （ B6-6306) ¥14,800 

ディスクキャッシャ - (B6-6304) ¥6,800 Toys & Tools (B6-6307) ¥6,800 アイコンエディタ （ B6 -6303) ¥4,800 CP/M68K エミュレ - 夕 (B6*6303 ¥ 19,800 


BASICHOUSE TECOSYS NET 


TEL 0286-27-1829 1200 2400ボー MNP クラス5 8ビット 
ゲスト ID なし(オンライン サインアップ）_ 


<リティ無し X 制御無し 


全国どこでも発送可長期クレジット OK 送料全国均一¥1,000宅配便にて即日配送 


本社営業部マイコンショップ通販部宇都宮市竹林町5031 TEL 0286 22 9811 FAX 0286 25 3970 
W XV, Tx t-L p | /RIJ 1X^71 大田原営業所マイコンショップ 大田原市美原 1 13 4 TEL 0287 23 5352 FAX 0286 23 5364 

マィコンショップ m h I 臓 お申し込み.お問い合せは腫 22 歷 (代） 






















ADO-TOYOMURA 


TZOIf ティ -• ゾ -: 


Micom Zone 

〒1〇1東京都千代田区外神田 4-4-1 0257-2650 


SHARP Authorized 


海外でち使える 

「 DNECLUBj 

カード会員募集中ガ 

r オリエント j 「 UCj r マスター J カードが 1 つになつた。 

「ボーナスー拮払い」 0K/ 「醒販売」 も 

お手軽にご利用頂けます。そのほか、便利てお得な 
特典がいつぱい/今がチャンス， 

詳しくは、店頭にてどうぞ.グ 


在庫処分•堀り出し物一気に大処分しちゃいますガ 


8000 s 

PRO SHOP 


OS-9 


/XI 68000 


1QS9/68000 ( sharp ) ¥29.800 

JCSPRO PACK (マィクロゥェア） ¥58.000 

1C SOURCE LEVEL DEBUGGER 

(マィク a ゥ i ア〉 ¥ 39.800 
]MW-BASIC (マィク a ゥェア） ¥60,000 

^ L ( forks ) ¥12,800 

□BTree09 ( ark ) ¥36.000 

MW - BASIC 用の旧 AM 用 B - T 「 ee パッケージです。応用例と 
して住所»と販売管理プログラムが付属。全ソースコード付です。 
(このソフトを動かすためには MW - BASIC が必要です。） 

□UD-CACHE(ark) ¥16.000 

すべての RBF デパイスに対応するキャッシュです。 

□FBU(ark) ¥38,000 

八ード.ディスクパックアップユーティリティーです。巨大フアイ 
ルを分割バックアップしたり、日付管理を行なったパックアップも 

OK 。 

□VSED ( FORKS ) ¥28,000 

OS 9/68000 で唯ーオートパツフアリングをサボートしたスクリーン 
エディタです。 


¥44,的0 

お待たせの C コンパイラ Ver 2.0 ソースコード 
デバッガ等多種のツールを搭載して遂に登場// 


□ CSG IMS ( 星光電子） ¥118.000 

高度の処理に対応可能な言語型リレーシヨナルデーターベースです。 


XIB8000 

新ライ厶ナツブ大好評発売中ガ 
EXPERT U-EXPERT OSS 
PROn PROnSS* SUPER SB 

■新高速巳 IOS 、 SX - Window 等、期待の X 6_0 
新シリーズを全品超特価販売中です。 

もちろんクレジツトも OK / 

X 68000 シリーズは " TZONE におまかせ下さい。 


T - ZONE 正社員•長期アルバイト募集中/ 

☆お問い合わせは総務課川崎まで (TEL 03-257-2630) 


SX-WINDOWvcrJ.O 


¥6,800 

御存じ SX-WINDOW 好評発売中.グ 

X68K ユーザーなら 買わずにいられないはず!？ 

OS や/細000 テクこカル 7 ニユアル 

by マイクロウ; t アシステムズ nnn 

オマケのソフトが人気の素!？ ■山 UUU 


Oh/ FM5 - ナー 


fM シリーズ用〇 S 9 に新ソフト登場/ 


日本ソフトバンク 

□ 日 _09 ( FM -7, 77, AV , 11 ) ¥ 18,252 / 

OS9 上で走るリレーシヨナルデータベースマネ 
— ジヤーです。問い合わせ形式で取扱い簡単 0 
なんと C による全ソース付。 


-下記 TZONE 各店でも扱っています。 


宇都宮店： 00286(63)4949 川口 店： 00482(68)7826 静岡店： 00542 (83) 1331横 
大宮店： 0048(652)1831 東ラジ店 ： Q 03 (257)2694 パーツショップ：© 03 (257)2655 


浜店： 0045 (64〗 ）7741 


•マイコン通肽利用の方ハ 


:現金書留て送金され4際は、住所•氏名. TEL # 号、赤望商品名 （ i 羊しく）を明 I 己して下さい热込を御#3?の方は下 IfiiR 行へお W いします 
尚、いすれも予め TEL : こて.刺予約•送の上御送金下さい（振込口座埼玉餌行秋 葉 原支店当座2705株 5 土 電子ェ麵） 


☆この広告の提示価格には、消費税は含まれておりません。 


☆お知らせ:9月28日(泡は、棚卸しのため臨時休業とさせていただきま1% 






































































































































注文書 


ソフト名 

機種 

メディア 

販売価格 


■■ 

■ 







WWV 


お名前 


住所 


印 


霣取依頼書 


ソフ 


「自 奄で学ぶアセ 

4SflHS»»= 



新品ソフト 15 %OFF 


: M±H : UI 弗秘：> T . ただし、北海道•沖繩、雕島 

PC 4911312の 方は 200円プラスして送 


金じ C 下さい.， 

定価5.000円未满の商品についてはプラス300円。 


PC98 シリ. 

ーズ 

| 

商品名 

定価 (m 


s 国志11 

14.800 

12.500 

ポビュラス 

9.800 

8.300 

ブロミストランド 

4.800 

4.300 

ダンジョンマスター 

9.800 

8.300 

シムシティー 

9.800 

8.300 

大航海時代 

9.800 

8.300 

キャンペーン版大戦略 II 

9,800 

8,300 

栄冠は君に 

9.500 

8.000 

FOXY 

6.800 

5.700 

ドラゴンナイト 

6.800 

5.700 

D •欧州蜃気楼 

12.800 

10.800 

パズルトビア 

7.800 

6.600 

エイトレイクスゴルフクラブ 

4.800 

4.300 

レジオナルバワー 

9.800 

8.300 

ク: T ース 

9.800 

8.300 

バトル 

12.800 

10.800 

46* 年物語 

9.800 

8.300 

機甲師団 

9.500 

8.000 

天と地と 

12.800 

10.800 

RYU 

11.600 

9.800 

ロンメメレ 

8.800 

7.400 

戦略空: i ： 

8.800 

7.400 

中 

古 


PC98 シリーズ * 


9.800 

6.800 
6.800 

9.800 
8.700 

8.800 
3.600 
8.800 


銀河英雄伝说 II 
ストロベリー大戦略 
デ•ジャ 

大戰略 111*90 
DUE し 

インペリアルフォース 
大戦略 m 「 赤の逆！*編 j 
プリンスオブペルシャ 
杆ンペーン版大戦略 n マップ4.800 
麻雀悟空一天竺への道 9.800 
クォータースタッフ 9.800 

サイレントメビウス 14.800 

BLACK RAINBOW 8.800 
ごくらく天国おめみえの巻 9.800 
ぶりんぐあつぶ 9.800 

バトルチェス 9.800 

D . P.SSG 6.800 

3.51®も在庫あります。 


PC88 シリース 


商品名 定価(円）販売価格 

DUEL 8.700 7.300 

三国志 II 14.80012.500 

FOXY 6.800 5.700 


8.300 

5.700 

5.700 

8.300 

7.300 
7.40 C 

3.300 

7.400 
4.000 

8.300 
8.300 
12.500 

7.400 
8.300 
8.300 
8.300 
5.700 


ドラゴンナイト 
雀ポーグすずめ 
大航海時代 
天使たちの午後番外3 
セーラー服戦士フェリス 
エメラルドドラゴン 
クリムゾン出 
夢幻の心臓 m 
鳴門卷秘帖 


6.800 

7.800 

9.800 

8.800 
6.800 
8.800 

8.700 

9.700 
6.800 


きゃんきゃんパニースペリオール6.800 


リップスティック AD VII 
DPS 

トンネルズ&トロールズ 
うろつき童子 
ランペルール 
ランペルール CD 付 
その他多数在庫あり 


6,800 

5.400 

9.800 

6.800 
9.800 
12.200 


5.700 
6.600 

8.300 
7.400 

5.700 
7.400 

7.300 
8.200 
5.700 
5.700 
5.700 
4.500 

8.300 
5.700 

8.300 

10.300 


袖8000シリーズ 


商品名 
グラナダ 
天下統一 
サーク 
メネシス‘90 


定価(円> 販売価格 

8.800 7.400 

9.800 8,300 

8.800 7.400 

8.800 7.400 


ダンジョンマスター 
RYU - 哭きの竜 
ポビュラス 

ワンダラーズフ□ムイース 
レインフォーサー 
ジェミニウイング 
スト□ベリー大作戦 
閽の皿族(上巻）（下巻） 
三国志 II 
闓の血族(上巻） 

ワールドコート 
ルーンヮー•ス 
シムシティー 
クオース 


提督の決断 
遥かなるオーガスタ 
ラグーン 
アンデッドライン 
遥かなるオーガスタ 
機甲師団 
AXIS 

映画狂殺人事件 
その他多数在雎あり 



大処分 


中古ソフトリストご希望の方は 
62円切手3枚をお送り下さい。 


商品名 
三国志 II 
ポピュラス 
ダンジョンマスター 
サイレントメビウス 
キャンペーン版大戦略2 
トンネルズ&トロールズ 
FOXY 
ドラゴンナイト 
栄冠は君に 
インペリアルフォース 
ダークレイス 

エイトレイクスゴルフクラブ 

シムシティー 

ブリンスオブペルシャ 

ドラゴンスレイヤー VI 

維新の嵐 

提督の決断 

水滸伝 

バトル 

ワンダラーズフ a ムイース 


定価(円) 

14.800 

9.800 

9.800 

14.800 

9.800 

9.800 

6.800 
6.800 
9.500 
8.800 
9.600 

4.800 

9.800 

8.800 
8.700 

9.800 

14.800 

9.800 

12.800 
8.700 


販売価格 


に 

て 

お 

問 

い 

合 

t ) 

せ 

< 

だ 

さ 

し： 


46億年物語 
機甲師団 
戦略空軍 
□ンメル 
天と地と 
RYU 

a —ドス島戦記 
ブルトンレイ 
エメラルドドラゴン 
デジャ 
斬アナログ 


9.800 
9.500 

8.800 
8.800 
12.800 
11.600 

9.800 

8.800 

9.800 

6.800 
9.800 


に 

て 

お 

問 

い 

わ 


アークス2 

3.5' 版も在庫あります。 

9.800 

せ 

PC88 シリーズ 

商品名 

定価(円） 

販売腿 

ドラゴンナイト 

€.800 


FOXY 

6.800 

< 

DUE し 

8.700 

だ 

ドラゴンスレイヤー VI 

8.700 


信長戦国群雄伝 

9.800 

〇 

I \ 

水滸伝 

9.800 

い 

三国志 II 

14.800 



トンネルズ&トロールズ 
雀ポーグすずめ 
ソーサリアン 
イース1 
イース2 

イース3 

夢幻の心臓 III 

きゃんきゃん^ニースペリオール 

ストロベリー大戦略 

DPS 

維新の嵐 

アークス2 

ラストハルマゲドン 

ルー ンフース 

その他多数在庫あり 


8.800 

9.800 

7.800 

9.800 

7.800 

9.800 

7.800 

7.800 

8.700 

9.700 

6.800 
6.800 
5.400 
9.800 

9.800 

7.800 

8.800 


に 

て 

お 

問 

い 

ム 

t > 

せ 

< 

だ 

さ 

い 


X68000 シリーズ 


商品名 定価(円）販売讎 
アークス2 9.800 

アールタイプ 7.800 . 


アフターバーナー 

ィース3 
AXIS 

信長戦国群雄伝 

シムシティー 
グ计ダ 
1ージャックス 
ジェノサイド 
ナイト アームス 
サラマンダー 
スーパー ハングオン 
天下統一 
ダンジョンマスター 
ポビュラス 
デスブリンガー 
大海令 

ラストハルマゲドン 
三国志11 
メタノレサイト 
V’BA しし 
源平鬪®伝 
その他多数在庫あり 


9.200 

8.700 
8.800 
9.800 

9.800 

8.800 
8.800 
8.800 

9.700 
8.800 
8.800 
9.800 
9.800 
9.800 

9.800 

12.800 

9.800 

14.800 

8.800 
7.900 
7.800 


に 

て 

お 

問 

い 

ム 

わ 

せ 

< 

だ 

さ 

い 


高中 
価古 
買ソ 
取フ 


シムシテイー¥8,300 


送料 • 消費税 

要りません/ 


乂.阳(キサナ)¥5,700 


要りません/ 



•代金は注文害を添えて、現金窨留で送って下さい、（小為替不可） 

後払いシステムもあります， 

籲新品ソフトをご注文の場合は、商品代金を送って下さい1(送料、消黄税込み） 
• 中古ソフトをご-;主文の場合は、必ず電話にて在庫確認をして下さい 
籲未 発売ソフトの場合は、予約扱いとさせていただきます 


• 買取り希望の場合は、まずソフトを当店に送って下さいこちらで高額査定のうえ、 TE しで 
ご連絡させていただきます，値段が合わない場合、商品はすぐ返送しますので、安心して 
お送り下さい。 

•ディスケットの送料は、100枚まで500円です。 

籲 DISK シャトルフランチャイズ店募集開始 


ブランド品 

5'2 HD 

10枚 

1.000円 

ノーブランド 

57 HD 

10枚 

600円 

ノーブランド 

5*2 D 

職 

400円 

ノーブランド 

3.57 DD 

10枚 

600円 

ノーブランド 

3.5.2 HD 

10枚 

1,500円 


消費税3%及び送料 
500円をプラスじ r 送 
金じ r 下さい。 


^ 4 , I II て i ’ m れ山町 12—13 

□ ISK ソヤトル向概 s 二;;== 

く大阪地区〉 く東京地区〉 

00726 ( 83)9907 803 ( 713)1424 



























































新店舗才""フン記念セ""ル実施中/ 



1TSS 囉 

CZ -653 C ： 
+ CZ 綱げ 




(京王線•北野 j 


mbit 

アイビット電子株式会社 


9月30日まで期間中に限0、大奉仕特価品/ 

CZ -8 PC _ 桁ネッテン、カラー漢字）特価¥64,800 
CZ -8 PK 10 ⑽衍ドット漢字） 特価 ¥69.000 

CZ -8 NJ 2( サイパ-ステ功) + CZ -239 AS (サンダづいド) 
定価 ¥33.3004 特価 ¥23,800 




1各種特選•特価品 


离植能 M 数ポケットコンピュータ 

PC - ES 50 〈新製品〉 

¥32.000 ■►特価/ 

/r ノコンフアクス MZ -1 V 01 〈限定セット販売/》 
• MZ 25 セット(ィンタ-フドスソ廟 . 

镙準価格合計¥3 42 .8〇〇岭 ¥120,000 
• Mz-ivm (本歸 ） 

標準価格合計¥278.000岭 ¥98.000 〆 



漢字カラー熱転写プリンタ 

シヤ _7 MZ -1 P 22 

標準価格 Y 59.800岭特価 ¥25,000 

キヤノンし ASER SHOT プリンタ 

LBP - B 40 BS 

定価 Y 498.000岭特価/ 

LBP - A 404 S 

定価 ¥2 M .0004 特価/ 

64 K バイト RAM を標準装儀 
參関數電卓モード搭載 
參充実の 124 M 数檄能 

PC -500 と 各! •パソコン♦つなぐインター 
フエ_スケープル 

CE -140 T ¥8,800 



シャープ MZ -1 X 30 モテムホン 

( lx 〗9 上位 機種） 〈在庫限り〉 

標準価格¥ 98.000岭¥ 29, 8 D 0 

ビテオボード CZ -6 BV 1 

¥21,000 岭特価 


CTOWW^ 1 TOWNS-1 (糊 ¥338.000 

X. *7^ 11 -r 2. FMT-ME 1 M 隱刑 -)¥ 60.000 

あ霣い用セツト 3. FMD - F 03 Ql (_ Da^rt ¥ SB .000 


I 4.FMT-KB101 ( 卜 TWO 
1 5.FMT-DP531( 力 5~f ィスル 0 


¥ 80.000 
¥ 89.800 

6.TOWNS-Q3 VI. 1 LP0 ¥ PQ.0Q0 

定価合黔 ¥555.800 

大将®/ ¥385.000 


SHARP 

AXS 86 L-F 

ラップトツプ 


定偭 #428.000 

►特価 ¥2380101 


8HARP 

AX286N<H8 
All In Note 

定価 ¥398,000 

岭大特価 4 


NEC 

PC - 9801门 
NOTE 

定価 ¥248,000 

岭特価¥198,000 


TOSHIBA 

J 31008 S 
Dyna Book 

定価 ¥198.000 

峰特価 ¥149-000 


- . 1アイビット推奨デイスブレイ匚 


參 シャー ブ CZ -860 D_BK I 

カラー ディスプレイ 

0.31チルト付 A/D 15/24 
定価¥92,200ベ 
特価 ¥59.800 1 

CZ -860 D 対応/、•ソコン櫬欞： CZ 880 C /88 IC .. XI / 
H TURBO シリーズ。ケーブルは本体付属を使用 

■ NEC PC -880 い9801シリーズ （ XA . XL のみ不可） 

■ MZ 700/1 500/2000/2200/2500各シリーズ（搰奨 
品シャープ 8 D 8 K )。 （ドットヒッチ 0.39) 

•シャープ CZ -603 D - GY-BK 
(15 型カラーディスプレイ） 
ドットビッチ 3.3 
定偭 ¥84,8004 

特価 

「一 CZ -603 D 対応パソコン機根：* XI シリーズ/* 
Jj || XI turbo シリーズ /XI turbo 2：シリーズ/ X 68000 
シリーズ / PC 88( n シリーズ/ PC -980 I シリーズ/ 

. . PC -286 シリーズ 

(* は接妍ケーブル ANI 506 が必要です） 

參シャープ CZ -830 D.BK « 
(14 型） 

2モードオートスキャン方式 
(アナログ/デジタル） 

定価 ¥98,0004 

特価 ¥54.800< 在 靡限1 

^■|nk CZ -830 D 対応/、•ソコン檄櫓: CZ 880 C /88 1 C 。 X 1/ 

■ TURBO シリーズ。ケーブルは本体付属祕用 

1 NEC PC - 8801.9801 シリーズ （ XA ， XL のみ不可） 

■ MZ 7 00 /l 500/2000/2200/2500 各シリーズ（抱奨 
_品シャ-プ 8 D 8 K ),' 

♦シャープ OZ -602 D-BK g 

(15 型アナ〇グ TV /3 モード I 
オートスキャン） 

定価 ¥99,80( H > 

特価 ¥75,000 、 

CZ -602 D 対応パソコン 後 襦：嬝 XI シリーズ/* 

T XI turbo シリーズ /XI turboZ シリーズ/ X 68000 
i シリーズ / PC 880 I シリーズ/ PC -9801 シリーズ/ 

^ PG -286 シリーズ 

(東は接統ケープル AN 1506が必要です） 


•三菱 XC - I 498 CII 
(14 型アナ□グ〉 
ドットビッチ0.28 
定価 ¥ I 07,00 (K 

特価 ¥59.800 


XC -1498 CH 対応パソコン機櫓： PC -980 I シリーズ 
/ PC -286 シリーズ / PC -386 シリーズ/ PC -8801 
シリーズ 

(上 K 機種には付厲の接統ケーブルで、接可能） 


* シャープ周辺機器(拡張、プリンター他)も常時取り扱っております0 〈全商品新品完全保証付〉■シャープポケコン全商品販売中:,カタログ、特価表ご tt 求ください（〒72〉 


广0426-45 -3001—3 

FAX_0426.44.6002 

•営業時間/10:00-19:00_電括受付/20:00迄可•定休日/日曜日(祭日営業) 


SHARP SUPER XEX SHOP 


アイヒ•ツト _ 子相 i 式会社亍192東京都八王子市北野町 560-5 


( て店詡販売 


★送料はご iK 文の除にお問い介わせド 
★掲覦の商品は、すべて斬品、保趾 W イナ&です> 

★报故の商品は充分用息して：6りますが、ご it. 文の晚 
は、在陬の確組の上、说金絍钳 i たは、餌彳 rtti 込で 
お中し込み下さい„令商品クレジツトでも极っております. 
★お中し込みの PW は必ず屯坫番 tj •を明 3ci してドさい， 


全通販 
国信売 

北海道から沖純まで★商姑、•㈣れの節はご減ドさい。 

富士銀行八王子支店（普）1752505 


•本誌発売時には上記価格よりさらにお求めやすい価格に変更されている場合がありま t ； •この広告の商品にはすぺて送料•消費税は含まれておりません 
















































































今月の特価品(限定)お早目に// 


★ CZ -888 C ( BK ) シャープ 


定 ] …大特価 ¥80,000 


★ CZ -603 C ( BK ) シャープ 

展示品3台限定 ]•••• 大特価 ¥ 236,000 


• OZ-653C(BK) シャープ 

雇示品3点 WI 龙 . 

• WD»A300( ワーブロ）シャープ 
定儀 ¥ 165.000 

籲说〇众330(ワープ〇> シャー 

龙:油¥ 

• WD-HL30( ワープロ〉シャー 


>(ワープ〇 

15.000 . 

0(ワープ 
龙イ 1¢ ¥ 198,000… 
• PW9I0( ワーブロ 


特価 VI 99,000 

轔優¥1 10*000 

特優 ¥125,000 
特価 VI 34,000 
鶫儡 ¥85,000 


• PC-KD853( アナ a グ GRT〉NEO 
籲 XC-I498C( アナ a グ ORT> 三 • 

參 CLM4FD (アナ〇グ CRT) シャーフ 

• PA 8500( 電子乎帽〉シャープ 

• PA.7500( 電子手糴）シャープ 


特価 ¥5 CM >00 
特儡 V 54300 
特信 IV 46,000 
特価 VI 4,800 
特儸 VI 6,000 


PC -980 IRA 5. ¥338,000 上リ 

PC -980 IRA 2. ¥265,000 » 

PC -980 IRX 2 . ¥199,000 よリ 

PC -980 IEX 2. ¥190,000 より 

PC -980 IVX 2 I . ¥170,00 0 W 

PC -980 IUX 2 I . ¥165,000 より 

PC -980 IVX 2 . ¥160,000 ょり 

PC -980 IVM 2 I . ¥150,00 0 W 

PC -980 IUVII . ¥148,000より 

PC -980 ILV 22. ¥160,000より 

PC -286 VE . ¥150,000より 

PC -286 US . ¥155,000 よリ 


PC -286 VS . 

CZ -600 C . 

CZ -60 IC . 

CZ -6 IIC . 

CZ 652 C . 

CZ -6 I 2 C . 

68000用 モニター . 

PC -980 I 用サウンドボード 

PC -88 SR.FR . 

PC 88 FH.FA . 

400ライン CRT . 

200ライン CRT . 


アフターサービス 万全 

のサポート体制 
優良パソコン販売店 


； 0 . A ■抑ド 


4 琴 

ふで、びン呼 t 


•お近〈の方は、お立寄り下さい。 

専門係員がアドバイスいたします。 
• ビジネスソフト、ゲームソフトのこと 
ならおまかせ下さい!！ 


セール期間 

<，90 9.15. 


10-14 


一足お足にガドカ〜ンとプレゼント 
0 A ランド恒例オータムセール実施中 



►毎週日曜、第2 •第4土曜日は、定休日と 
させていただきます。 


SHARP X68000 シリーズセット 


拳次代のイ 

X68000 EXPERT II 

• CZ -603 C - BK/GY 

• CZ -605 D - BK/GY 

• MD -2 HD 20枚 
定価 ^ t 


クレジ 

•ツト 



多 (- WINDOW 搭戴.グ 

X68000 EXPERT II-HD 

參〇 Z -6 I 3 C - BK/GY 
• CZ -605 D - BK/GY 

MD -2 HD 20枚 _ 

価¥計 

¥563,000 


周辺機器 コーナー 


12回 

¥30.000|24 Hl |¥15.700 

36回 

¥10,900 

クレジ 
ツト 

12回 

¥37.300 

24回 ¥19,600 

36回 |¥13.500 


翻00 PRO II 

• CZ -653 C - BK/GY 

• CZ -605 D - BK/GY 

• MD -2 HD 20枚 
定価合計 

¥400,000 

クレジ 

ツト 


春 SX - WIND 0 W 塔載.ヴ 




12回 

¥26.500 

24回 

¥13.900 

36回 

¥9.600 




X68000PROII-HD 

• CZ-663C-BK/GY 

• CZ-605D-BK/GY 

• MD-2HD 20 枚 _ 

定価合計 

¥510,000 


¥33.700 240 ¥17.700 36® ¥12,200 


X68000SUPER-HD 

• SX - WIND 0 W 搭載 

• S 〇 SI インターフ1ース装備 

• 80 MB ハードディスク搭載 

• 3 MB 大容置メモリ装備 
•高解像度グラフィック 


SX ^ WINDOWJIK // 


クレジ 

.ント 


X68000SUPER-HD 

CZ-623C-TN (チタン） 
CZ-6I3D-TN (チタン） 
D-2HD 20 枚__ 

¥633,000 

I 回 ¥明0,630 12回 ¥41,900 24回 ¥22,000 


ADC 

fin 


セットで購入のお客様に、デイスケット （ io 枚）、ゲームパックサービス中•グ 
さらに、期間中ゲームソフトが1本付きます。詳しくは、お電話下さい。 


新製品コーナー 


ISX-WINDOW 

( 次代インテリジェントソフト） 


定価 ¥6,800 

OA ランド特価 // 



■CZ-6BV-1 

(ビデオ•ボード） 


定価 ¥21,000 

OA ランド特価ガ 



プリンターセツトコーナー 

• CZ -6 PVI (カラービデオプリンター） 

定価 ¥ 198,000 . ►特価 ¥152,000 

* CZ *8 PC 3(24 ドット熱転写カラーブリンター} 

定価 ¥ 65.800 ►■特価¥ 53,000 

參 CZ *8 PKI 0(24 ビン漢字ドットブリンタ ー13 晰) 

定価 V 97,800 . ►特 AS / TEL 下さい！ 

• CZ -8 PG I (24 ヒンカラー;烫字ドットフリン . 80桁） 

定価¥ 130,000 ►•特じ F さい！ 

• 〇 Z -8 PG 2(24 ヒンカラー澳字ドルフリンター • 136析） 

定価¥ 160,000 . ►特価/ TE じ F さい！ 

• I 0*735 X ( カラーイメージエットフリンター） 

定価¥248,000 . ►特価/ TEL 下さい！ 


OA ランド特選品.グ 



■ CZ-8PC4 ( 定価 ¥99,800) 

特価 msoa 


*48 ドット熱転写カラー 
漢字ブリンター 


X 680[) D 用ソ フトウ： T アーコーナー 11~ X 68 而〇用周辺 H 器 コーナー ~~] 

定価 Y 38.000►特価 ¥ 30,000 
定価 Y 26.800►特価 ¥ 21,000 
定価 Y 88.000►特価 ¥ 69,800 
•定価 Y 69.800 ^ TE ： し下さ L 、 
定偭 Y 188 . 000 ►特価 ¥149,000 
定® Y 79.800►特価 ¥ 63,000 


1 CZ -2 I 2 BS ( BUSINESS )--' 

' tCZ -220 BS ( DATA ). 

1 CZ -2 l 5 MS ( Sainoing ) …… 

4 CZ -22 IHS ( NEWPrfitShop )- 

5 CZ -227 BS ( TOP 財務会計) • 

6 CZ -226 BS ( CARD ). S «¥ 229 ,800 ►特価 ¥ 23,000 

7 CZ -223 CS ( Communication ). 定 《¥ 19.800►特価¥115,500 

8 CZ -2 I 3 MS ( MUSIC ). 定* ¥ 18.800►特価 ¥ 14.800 

9 CZ -2 llLS ( Ccompiler ). 39,800►特価 ¥ 31,000 

hC-TRACE (キャスト) . 定《¥ 68,000►特価 ¥ 52.000 

" EW (イースト） .$*¥ 38.000►特価¥ 29,000 


.定 68,000 ►特®¥ 53,000 • GZ -6 PU 1 A . •定涵 Y 38.000►特価 ¥ 
trn 58.000 45,000 Jcz -6 BE 1- 
節 17,800 ►特®¥ 13^00 # CZ -6 VT 1 - 
定《¥ 10,800 ►特価¥ 15,500 • CZ -8 NS 1 - 
Sttwoo.ooo ►特価¥158,000 • CZ -6 BC 1 


籲最新 ゲーム ソフト 
その他各種ソフト 
20% 〜 25%OFF . グ 
參周辺機器•プリンター 
割引販売中 // TE じ F さい / 


■卜 O DATA 増設 RAM ボード 

• 1 MB 増設 RAM ボード • 2 MB 増設 RAM ボード 

PIO-6BEI-A PIO-6BE2-2M 

定価 . 定価 

¥25,000 , { V 50.000 


■ 



♦ 4 MB 増設 RAM ポード 

PIO-6BE4-4M 

定価 

V 88.000 fB 


特価 ¥19,500 特価 ¥38,500特価 ¥67,000 


■八ードテイスク■特価品もありますので TEL 下さい。 


•アイテック ITX -640 • •… 
參アイテック ITX -680 …… 
• ロジテックし HD -32 V -... 
鲁ロジテック LHD -34 VE - 
參 Q ジテック LHD -34 V - - 


特価 ¥117,000 
特価 ¥149,000 
特価¥ 85,000 
特価¥ 90,000 
特価 ¥104,000 


籲シヤープ CZ -620 H - 
•シャープ CZ -64 H … 
參アイテム HXD -040 • 
•アイテム HXD -042 - 
• ICM SR -80 . . 


特価¥118,000 

特価¥ 95,000 

特価¥ 88,000 

特価¥ 95,000 
特価 ¥130,000 


中古パソコン （価格/在摩は変動します。予約は5日以内とします >) 


通價販売のこ案内 

全国通販 

■銀行振込で申し込みの方は商品名 
及びお客様の住所•氏名•電話番号 
をお知らせ下さい。 

〔振込先〕第一觔_銀行渋谷支店 
普通 No .1 163457 ㈱ オーエーランド 

■現金書留で送金されるお客様は電話番号と商品名、数置を明記じ T 同封じ T 下さ 
い.■クレジットでご購入を希望される方は申し込み用紙をお送り致しますのでご記 
入の上返送じ C 下さい,20才以上の方は、原則とじ C 保証人不要です。クレジットは 
I 〜60回払で月々5,000円よりご自由に設定できます, 


•下取•買取は電話で見積りじ T おります。資任を持って下取りさせて頂きます。 

• ご注文、お問合せは… 午前10時から午後7時まで 
•商品のお届けは"•入金確認後、即日発送致します、 

_才 1 —•エ—ランド 

〒150東京都渋谷区円山町 20-4 第5日新ビル 1 F 

0 ( 03 ) 770 - 8855 FAX ⑽ 770 ° 80 

問東エリアの送料は、1個につき ¥1.000 です。 

★全商品保 ME 窨付。專鬥のアドバイザーが、お客橡のニーズに対応します> 

★初期不蛊 • W 送トラブル等に迅速に対応し、即交換させていただきます〇 



上 i 上上上上上上 illi 

綱 000 §§§ ,000 |§§||§ 

500880930580 

667971415631 

111112 

¥¥¥¥¥¥¥¥¥¥¥¥ 


■表示価格は、税別表示です。詳しくは、お電話にて、お問い合せ下さい。掲載の価格は、8月下現在です。 




































































































































« 行描込：電信扱いにてお挹込下さい 用のお申し込み用紙をお送り致します 

手数»4はお客«負徂となります のて、必屯•串 ifl をこ己入•捺印のうえ•こ 

说金 HM :住所.氏名，儼牯措号.商品名，使用 WMf 、 返送下さい 

メティア等をお窗さ;呑えのうえ,現金賓留に中未成年:15•の方は.保«考のこ承認を 
て当社 i てお送り下さい 受けてからお申し込み下さい 


*第_勖業 SB 行御徒町支店 
(普）1376679才ーエーブレイン 
暴朝日信用金庫本店 

(普）334833才-ェ-プレイン 


★クレジットは I -60 回払いで月々5,000円よりご自由に設定できます_ 

蠢才■エ■ブレイン台 ： 4 


■流通事情により、広告表示よりお安くなる場合もございます。まずは、お電話下さい。■ビジネス•ゲームセツトもございます。 


通信販売によるご購入方法（お電話でお申し込み下さい。） 


、ード•ディスク 


現金一括払い 




クレジット 




振込先 


■ ARK WOOD 

NECK 正ドライブ 
• AWN40C 





全国通販 


忘:ぁれガお鼋話くださいネ •/ Q 03-56 的- 3621(91 


★全商品保証書付。専門のアドバイザーがお客様のニーズに親切に対応します> 
★初期不良•輪送トラブル等に迅速に対応し、即交換させていただきます> 
★送料は1個につき Y 丨，000で1"。 （ ※一部離島は除きます。お問合せ下さい。） 


• ご注文、お問合せは • •.毎日午前10時から午後8時まで 

•下取•買取は電話で見積りしておりま1■。實任を持って下取りさせて頂き J 

•商品のお届けは…入金確認後、即日発送致します。 


LOAB 特選〜 X 6 B 000 シリーズセツト（ゲームパック•ディスケット付）（税抜き） 


① X68000EXPERTII 


參 CZ -603 〇-巳 K/GY 
參 CZ -605 D - 巳 K/GY 
• MD -2 HD 20 枚 


定価合計 ¥453,000 



(DX68000 EXPERTII-HD (3)X68000 PROII 

• CZ -653 C - BK/GY 

• CZ -605 D - BK/GY 

• MD -2 HD 20 枚 


• SX - WIND 0 W 搭載.ゲ 


®X68000 PRO II-HD 


參〇 Z -6 I 3 C - BK/GY 

• CZ -605 D - BK/GY 

• MD -2 HD 20 枚 


• SX - WIND 0 W 搭載// 


定価合計 ¥563,000 


定価合計 ¥400,000 

クレジット例 


1回 ¥345,00012回 ¥30.200 X 12 


1回 ¥428,00012回 ¥37.500 X 12 


1回 

¥297.000 

12回 

¥26,000 X 12 



參〇 Z -663 C - 巳 K/GY 
• CZ -605 D - BK/GY 
MD -2 HD 20 枚 


扇__ 


定価合計 ¥510,000 


OAB 大特価 


OAB 大特価 


OAB 大特価 OAB 大特価 


X68000SUPER-HD • SX-WINDOW 搭載// ⑤ X68000SUPER-HD 

• SX - WIND 0 W 搭載 


X 68000 EXPERT - HD = 特選限定品 


參 SCSI インターフェース装イ蒲 
參 80 MB ハードディスク搭載 
• 3 MB 大容量メモリ装備 
春高解像度グラフィック 


1回 

¥485,000 

12回 

¥42,000 X 12] 



> OZ -623 C-TN (チタン） 
. CZ -6 I 3 D-TN (チタン） 
> MD -2 HD 20 枚 


定価合計 ¥633,000 

OAB 大特価 


X 68000 EXPERT-HD 

CZ -6 I 2( BK ) 
(定価 ¥ 466,000) 
CZ -605( BK ) 
(定価 ¥ 1 15,000) 

定価合計 ¥58 し 000 


八00 UUU こ 


OAB 特価 ¥368,000 


I 0AB 特選 セット(中古 美 品セット） I 

① CZ -623 C-TN + CZ - 602 D 

2台限り1 . 

•¥460,000 

② CZ -613 C + CZ -605 D 


11台限り1 . 

•¥358,000 

③ CZ -612 C + CZ -600 D 


|3台限り1 . 

•¥348,000 


周辺機器コーナ- 


プリンターセツト コーナー 


11111 


] 


1-0 DATA 増設 RAM ボード 


• CZ -6 PVI (カラービデオプリパー） 

定価 ¥198,000 . ►特価 ¥152,000 

參 CZ *8 PC 3(24 ドット熱転写カラ-プリパー） 

定価¥ 65,800 . ►特価¥ 53,000 

• GZ 』 PKI 0(24 ピン漢字ドットプリンター.136桁） 

定価¥ 97,800 . ►特価¥ 73,000 

• CZ -8 PGI (24 ビンカラー漢字ドットプリン^一 .80 桁） 

定偭¥130,000 . ►特価¥ 98,000 

• GZ *8 PG 2(24 lf >* ラー漢字ドットプリパー136桁） 

定価 ¥160,000 . ►特価 ¥ 119,000 

• IO *735 X ( カラーイメージ エツ ト プリンター) 

定価¥248,000 . ►特価¥185,000 


( Dcz -2 I 2 BS ( BUSINESS )• 

d)CZ-Z20BS(DATA). 

(I)CZ-2l5MS(Samping). 

®CZ-22IHS(NEWPnnt Shop) - 

⑤ GZ-227BS(TOP 財務会計） 

⑥ CZ-226BS(CARD). 

'7)CZ-223CS(Comrrunicab)on) •••■ 

(|)CZ-2I3MS(MUSIC). 

®CZ*2IILS(C compter). 

©OTRACE ( キャスト） . 

@EW ( イースト） . 


••定偭¥ 68,000 ►特 «¥ 534)00 
••定価 ¥ 58,000 ►特価 ¥ 45,000 
•定価 ¥ 17,800 ►特価 ¥ 13t800 
••定価 ¥ 10, M 0 ►特価 ¥ 15,500 
••定価 ¥200,000 ►特価 ¥158,000 
••定価 ¥229,800 ►特価 ¥ 23,000 
••定伍 ¥ 19,800 ►特価 ¥115,500 
••定価 ¥ 18,800 ►特偭 ¥ 14 •咖 
••定価 ¥ 39,800 ►特価 ¥ 31,000 
••定価 ¥ 68,000 ►特価 ¥52, 咖 
••定価 ¥ 38,000 ►特価 ¥ 29,000 


籲 1 MB 増設 PAM ボード 
PI0-6BEI-A 

定価 
¥25,000 



• 2 MB 増設 RAM ボード 
PIO -6 BE 2-2 M 

定価 

¥ 50,000 ■ 


• 4 MB 増設 RAM ボード 
PIO -6 BE 4-4 M 

定価 
¥ 88,000 


特価¥18,800特価 ¥37,800特価 ¥65,800 


■八ードディスク■特価品もありますので TEL 下さい 


■ CZ -8 PC 4( 定価 ¥ 99,800) 

特選品.ヴ 


如:訓阳陧 


參 48 ドット熱転写カラー 
漢字プリン^一 


特価 rnsoi 




• CZ -6 BEIB • 

• CZ -6 BIVM ". 

• CZ -6 EBI •- 

• CZ -6 VTI •- 

• CZ -8 NSI •… 

• CZ -6 BCI …. 


!器 コー•ナー 1 

定価 ¥ 28,000 ►特価 ¥ 22,000 
定価 ¥ 26,800 ►特価 ¥ 21,000 
定価 ¥ 88,000 ►特価¥ 69,800 
定価¥ 69,800 ► TE し下さい 
定価 ¥ 188,000 ►特価 ¥149,000 
定供 ¥ 79,800 ►特価 ¥ 63,000 


♦アイテック ITX -640 •.… 
•アイテック ITX -680 • •… 
參ロジテックし HD -32 V •••• 
參□ジテック LHD -34 VE - 
鲁ロジテックし HD -34 V •••• 


特価 ¥117,000 籲シャープ CZ -620 H 
特価 ¥149,000 • シャープ cz -64 h 
••特価_ 85,000 •アイテム HXD -040••• 
特価 ¥ 90,000 •アイテム HXD 042 
特価 ¥104,000 »icm sr so 


純 ¥118,000 

特価¥ 95,000 

特*¥ 88,000 

特価 ¥ 95,000 
特優 ¥130,000 


中古パソコン_ (価格/在庫は変動します。予約は 5 日以内とします。）] 


今月の特価品(限定)お早目に// 


★CZ-652C(BK)+CZ-602D(BK) 

大特価 ¥258,000 

• SHARP WD - A 300 (ワープロ） 

定価 VM 65,000 . 特価 ¥110,000 


• SHARP WD - A 330( ワープロ） 

定価 ¥185,000 . 特価 ¥125,000 

• SHARP WD + HL 30( ヮーブ a ) 

定価 ¥198,〇〇〇 . 特価 ¥134,000 


• SHARP PW -9 I 0 (ワープ D ) 

• NEC PC - KD 853 (アナログ CRT ) 

• 三菱 XG -1498 C (アナログ CRT ) 

• SHARP CU - I 4 FD (アナログ CRT ) 
春 SHARP PA - 8500 (帘子手帳） 


特価¥ 85,000 
特価¥ 50,000 

特価¥ 54,800 

) 

特価 ¥ 46,000 

特価 ¥ 16,000 


PC -980 IRA 5••• 
PC -980 IRA 2••• 
PC -980 IRX 2••• 
P 〇 -980 IEX 2 … 
PC -980 IVX 2 卜 
PC -980 IUX 2 I - 
PC -980 IVX 2 … 
PC -980 IVM 2 I - 
PC -980 IUVI I • 
PC - 9801い/ 22- 
PC -286 VE …… 
P 〇 -286 US . 


¥338,000 ょリ PC -286 VS ¥165,000 ょり 

¥265,000 ょリ CZ -600 C ¥160,000 ょリ 

¥199,000 ょリ cz - 60ic ¥170,000 ょリ 

¥190,000 ょリ gz -6 i ic ………………… ¥198,000 ょリ 
¥170,000 よリ CZ -652 C …¥ 178,00 〇よリ 
¥165,000 ょり CZ -6 I 2 C . ¥210,000 よリ 

•¥160,000よリ 68000 用モニター . ¥ 

¥150,000 より pc -980 I 用サウンドボード . ¥ 

¥148,000 ょリ pc -88 sr.fr . ¥ 

¥160,000 より PC -88 FH , FA . ¥ 

•¥150,000 より柳ライン crt . ¥ 

¥155,000 より2〇〇ライン crt . ¥ 


3,000 i 
49,000より 
13,000より 
50,000より 
65,000より 
38,000より 
10,000より 


オーエーブレイン今月の特価品//台数限定お早目に// 


アクセル 

•FDC-357 . 特価 ¥36,000 

• FDC-358 ……特価¥49,000 

コンビュータ•リサーチ 

• CRC - FD 3.5 S ••特価 ¥29,000 
• CRC - FD 3.5 W •.特価 ¥42,000 

グローリア 

•QD-35MI ……特価¥23,000 
•GD-35M2 特価 ¥39,000 

縑電子 

• L .( tle-FI . 特《¥26,000 

春し iuio-F2 MiB ¥38,( X )0 

SNE 

•SNE-2 特価 ¥49,000 


NEC 

參 PC-PR20IG + 

PC-PR2010-04 特価 Y 99.800 

• NM-4150 WfflSVI 32,000 

エフソン 

• AP-850PC. 特価 V 64,000 

• vp-?o5opc 料 mv 99.000 

キャノン 

• BJ-I30J 1 今価 V125,000 

サウンド•ボード 

SNE 

I サウントオーケストラ V 特価 Y 23,00 

2 サウントオーケストラ L 特価 VI7,8 ft 

3 リトルオー々 ス t ラ IMSY1 4,50 

— ケストラ L 特価 VI2,00 

特価 Y1§ ， O0 

特価 Y 8,50 


ドフイフ•ユニット ブリン ター 













































































































































































ディスプレイ 

CZ-604D 

CZ-605D 

CZ-613D 

CU-21HD 


周辺機器 

CZ-BNJ1 ¥1，400 
CZ-8NJ2 ¥18,540 
PIO-6BE1A ¥20,000 
PIO-6BE2 ¥39,000 


ソフト 

CZ-213MS ¥15,500 
CZ-259SS ¥ 5,200 
CZ-219SS ¥23,100 
CZ-245LS ¥35,500 


プリンタ 
CZ-8PC4 
CZ-8PG1 
CZ - 8PG2 
10735X 


全品メーカー保証即決クレジット OK 


セツト超特価 

XS 68000 

PERSONAL WORKSTATION 

EXPERTS EXPERTEBB 


CZ-BB3C 

CZ-BQ5D 

セツト ¥ 特価 
¥32,200X12 回 
¥ 17,000 x 24 回 


CZ-BB3C 

CZ-B13D 

セツト¥特価 
¥33,500 X 12 回 
¥17, 700 X 24 回 


CZ-B13C 

CZ-B13D 

セツト¥特価 
¥36,800 XI 2回 
¥19,500 X 24 回 


CZ-B23C 

CZ-B13D 

セット¥特価 
¥39,900 XI 2回 
¥21,200 X 24 回 


セツト超特価 

SS 68000 

PERSONAL WORKSTATION 

PROE^ PROEHa 


CZ-B53C 

CZ-B04D 

セツト ¥ 特価 
¥24,000 XI 2回 
¥12-700 x 24 回 


CZ-B53C 

CZ-B05D 

セツト¥特価 
¥25,300 XI 2回 
¥13,400 X 24 回 


CZ-B03C 

CZ-B04D 

セツト¥特価 
¥27,300 XI 2回 
¥14,500 X 240 


CZ-B03C 

CZ-B05D 

セツト¥特価 
¥28,600 XI 2回 
¥15,100 X 24 回 


24時間テレホンサービス 


D 4 B 2-54-3444 


お申し込み 

TE し 0482 -54-3400 
FAX.048E-54-3443 

埼玉県川口市西川口 4-6-4 


お支払い 

下記取引銀行口座 
までお振込み下さい。 
三菱銀行西川口支店 
㈱ デンキヤ奪)0258081 




， ’ ， ， 1 1 ^ 

デンキヤ 



営業時間 AM 11:00 〜 PM 7:00 水•木曜定休 


觀瀬麵誦 


麵麵麵 i 


(価格は全べて税込みです) 
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Imaxell noooo SONY FUJI FILM Z^aravetie. wi tkm 
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SUPE 闩セツト 


XSBBOOO 

加滩価 
map 特価 
map 特価 
nap^ffl 
map^i 



CZ-623C-TN ( 本体〉 ¥Sofma 滩価 

CZ- 61 3D-TN <15* ドットビッチ 0.31 〉 ¥Sof map 特価 

。乙 -8 户。 4<48 トッ MMi 写プリンタ〉 ¥Sofm£ 

CZ- 8 NJ 2 くアナ a グステやンク〉 ¥Sofm£ 

CZ- 6 BF 1 <«» 用 RS*232C ホード〉 ¥Sofm£ 

CZ-6BM1 <M1DI ホ - ド > ¥Sofmap1$i 

CM-64m* モジ： i- ル〉 ¥Sofmap^i 

AN-S100<7 ガ内蔵スビ - 力 -> ¥Sofmap1$ffl 

MD-24FS5 油馆用モデ A2400BPS) ¥Sofmap1Hi 

GT- 6000< フルカラ - イメ-ジスキャナ-〉 ¥Sofma 谢僅 

二 5220<RS-232C ケ - プル〉 ¥Sofmap1$ffi 

CZ-257CS<C(xnmunication PRO 68 K VefKJ> 

CZ-252MS<Music studio PRO-68KVefll> ¥Sofr 
CZ-211LS<C compiler PR(H8K> 

CZ-219SS<OS-9> 

CZ-251BS<Hypecword> ¥Sofmap^l 

Z'S STAFF <PRO-68K Ver2.0> ¥Sofmap ^ 価 

ゲームソフト 2 本 < 定涵 Y9_800 以下のお抑なゾ n>¥Sofmaprf$ffl 
マとセルプランクディスケット <5*2HDxio 枚 > ¥Sofmap^ffi 

mi 


¥Sofmapwffi 
¥Sofmap^i 
> ¥Sofmap 特 i 
¥Sofmap«tt 
辛 Sofmap 特価 


¥ お電括にて 




ナス ¥ 80.000 XI4 回 


000 

X7 旭 

ポーナス ¥ 80,000XI2 回 

000 

X 

60 回 

ホーナス ¥ 85,000XI 〇回 

100 

X 

48 回 

ポーナス ¥100.000X 8 回 


X 

■ 

36 回 

ホ -.- 1 • マ、 Y1 30.000 x 6 回 


CZ-623C-TN く 本体〉 ¥Sofmaj 

CZ-613D-TN<I5T ットビッ刊 .3 丨 > .¥Sofmai 

マクセルプランクディスケット <5*2HDx 1 〇枚 〉 ¥Sofmai 


ap 特価 
ap 特価 
ap 特価 


標準価格 Y 634,000 


¥お電括にて 



ホーナス ¥40J)00X12 回 


ホーナス ¥35.000X10 回 

ポーナス なし 

ホーナス 
ホーナス 


なし 


なし 


* 本 t ット 

EXPERTD-HD 

■KE 


CZ-6 彳 3C-BK 〈本体〉 ¥Sofmap 特価 

CZ-605D-BK<I5 • ドットビッ刊 .39> ¥Sofmap 特価 

マクセルプランクデイスケット <5’2HDX 10 枚 〉 ¥Sof map 特価 


標準価格 ¥564.000 


¥ お電 B にて 


ホ - ナス 
す—ナス 

■i I <1 i'i"l ，.-ナス 

M | iillil || |i .1 - ，ノ 


ホーナス ¥40.000 XI2 回 

p す : ーナス ¥40,00GX 8 回 

I ホーナス なし 


なし 


なし 


開発セツト 

SUPER-HD 


CZ-623C-TN< 本体 〉… 

CZ-613D-TN <15* K7Mf7f03l> … 
CZ-8PK10<24 ビガリ W-1 痛〉 
CZ-211LS<C compiler PRCH8K> 
CZ-219SS<OS-9> 


マクセルブランクディスケット <5*2HDx 10 枚 > ¥S0fl 


¥Sofmap 特価 
¥Sofmap 獅 
¥Sofmap 特価 
¥Sofmi — 
¥Sofmi 


map 特価 
map 特価 
map 棚 


標準価格 ¥80M00 



X 

84 回 

X 

48 回 

rx 

72 回 


¥ お爾 IS にて 
ぼ，ナス ¥4(^000X14 回 ] 
ホーナス Y 50.000X 8 回 ! 

をし J 
なし | 

<£L ] 



CZ-613C-BK< 本体〉 ¥Sofmai 

CZ- 61 3D-BK <15-K7hf7^.3i> ¥Sofmai 

CZ-8PG4<48 ドット熱転写プリン ^ ¥Sofmai 

GT- 6000 ロルカラ - イメ - ジスキ • け-〉 ¥Sofmai 

5220 く RS-232C ケープル〉 .¥Sofl 

Z’s STAFF PRO-68K Ver2.0 ¥Sofmi 

マクセルプランクディスケット <5*2HDxio 枚 > ¥Sofmap 特価 


ip 特価 
ip 特価 
ip 特価 
map 娜 
map 特価 
map 特価 


樣準®格 ¥927.300 


ホ - 

ホ- 


¥お電牯にて 
L ホーナス Y1B0.000X14 回 

I ¥ 60.000 x 10 ® 


ナス ¥ 80.000 x 6111 

r ホーナス_なし 


なし 


1 本セツト 

EXPERT!! 


料参) 


CZ~603C 〈本体〉 ¥Sofmap 特価 

CZ-605D<i5 - ドットヒ v 刊 J9> ¥Sofmap 特価 

マクセルブランクデイスケット <5*2hdx 1 〇校〉 ¥Sofmap 特価 
¥お電話にて 



MIDI セット 

EXPERTII 


摞準価格 Y 454.000 


CZ-603C< 本体〉 . ： . 

CZ-6l3D<i5*K7her«.3i> ¥Sofmai 

CZ-8NJ2 くアナログスティック〉 ¥Sofm3P 特価 

ゲームソフト 2 本〈定優 v9fioo 以下のお好きなソフト >-¥Sofmap す 
マクセルプランクディスケット <5*2HDx itm> ¥Sofmap1 


CZ-603C 〈本体〉 ¥Sofmap 特価 

lap 特価 


CZ-605D<15 •トッ I •ビッ刊 J9> ¥Sofm{ 

CZ-8PKI0<24 ビガリ ;^-130 桁〉 ¥Sofm{ 

CZ-251 BS<Hyperwofd> ¥Sofm« 

マクセルブランクデイスケット <5*2HD>oo 枚 > ¥Sof map 特価 


nap 特価 
nap 特価 


摞準価格¥517.400 


¥お電括にて 


標準価格¥591,600 


¥お爾括にて 


CZ~603C< 本体〉 ¥Sofmap^i 

CZ~613D<15 • ドットビ rW_31> ¥Sofl 

CZ-6BM1 制 DI ポ —•> ¥Sofm« 

CM-64 く音源モジュール〉 .¥SGfmi 

AN-S100<7W 内 * スピ - 力-〉 

CZ -247 MS<MUSIC PRO -68 K ( MIDI )> 

マクセルブランクディスケット <5’2HDx HMt> 


川 付 *! 

jfmap 糊 S 
>fmap 糊 B 
jfmap 特価 
¥Sofmap^flS 
¥Sofmap^$ffi 
> ¥Sofmap 餅 ! 


¥ 2,200 X 48 回 

V 5*900X84 回 

V 81200 X 54 回 
¥11,300X36 回 
¥16^200X24 回 


ホーナス Y 40.000 X 8回 

ホーナス なし 

ポー ナス 


なし 
—な t 

ITT 


ポー？ス V45.00 d x 8 回 
t - ナス Y 50.000 x 6 0 
11111 _ : 

謹 w SS ホ-ナス 

ホ - 


標準価格¥695,200 


なし 

なし 


•: 泊 Kii*i 

per 


[_ ボ • ニナス - ¥30 .QQP X14 回 

r ボーナス なし 


なし 


なし 


なし 


V 2,500 X 84回 
¥ 4^000X60 回 

¥ 9!200父84回 

¥13,700X48 回 
¥17,600X36 回 


¥お電括にて 

| iL -^ W 0.000 x 

fS - ナ； 


ナス Y 45.000X 


なし 


mi 

10®! 


なし 


なし 


プリンター 

周辺機器 

SOFT WARE 

cz^pIfliL 

CZ^BRKIDlk 

定ィ ^ 

定価 ソフマップ 特価 

• PIO-6BE1-A. ¥ 25,000 •¥ 18^200 

• PIO-6BE2-2M ……¥ 50,000 ^ ¥ 36,800 

籲 PIO-6BE4-4M ……¥ 88,000 ^ ¥ 64,800 

•CZ-6BE4. ¥ 138,000 •¥ お電話にて 

•CZ-6BF1. ¥ 49.800 •¥ お電話にて 

•CZ-6BPI. ¥ 79,800 •¥ お電話にて 

•CZ-6TU. ¥ 33,100 •¥ お電話にて 

•AN-S100. ¥ 36,600 •¥ お電話にて 

• CZ-8NS1. ¥188,000 • ¥ お電話にて 

•CZ-6EB1. ¥ 88,000 •¥ お電話にて 

定® ソフマップ 

•ZsSTAFF PR068K V2.0 • ¥58,000 •¥ お電話にて 
•DATA PRO68K(CZ-220BS) ……¥58,000 • ¥ お電話にて 
•CARD PR068K(CZ-226BS) …¥29,800 •¥ お電話にて 
•C コンパイラ PR068K V2.0(CZ-245LS)- ¥39,800, S お電話にて 
•SOUND PR068K(CZ-2I4MS)-¥15,800^ ¥ お電話にて 
•MUSIC PR068K(CZ.213MS) …¥ 15,800 峰 ¥ お電話にて 
# サンプリング PROWCZ-mMS) -¥17,800^ ¥ お電話にて 
•コミュニケイシヨン V2.0(CZ-257CS) …¥19,800 岭 ¥ お電話にて 

•OS-9(CZ-219SS). ¥29,800 酴 ¥ お電話にて 

♦各種ゲームソフト … •定価より 15 〜 20 %QFF 

| ¥ 33 feSP ^ 

定愐灼 60.0C0— 


N 0.1システム 


No . l クレジツトシステム 


No . l 下取りシステム 

お持ちの機種を下取りに出して、新品に買替えようと思つ 
ている方、ソフマップに御相談下さい0 
買取り価格がどこよりも高く、新品の販売価格がどこより 
も安いから、当然どこよりもお得な条件でお買求めいただ 
けます。 

又、差額を商品券でお支払いもできます。 


No . l 配送システム 

1. 到着日指定、夜間配送システム 

お客様のご都合に合わせて配送させていただきます。 
機種によっては、夜間配送できないものがあります。 

2. 代金弓 I 換システム(要手数料） 

係員が品物をお届けに行きますので、その時にお支払 
い下さい。 


1. 9ヶ月先からのお支払い OK 

スキップクレジットを御利用になれば支払い開始月をIヶ 
月から、最長9ヶ月先までおくらせ5事が出来ます 

2. 月々¥1,000からのお支払い OK 

月々のお支払い金額の投定が Y 丨，000から OK, 

3. 84回払いも OK 

お客様のプランに合わせて、丨回から最長84回まで支払 
い回数をお選びいただけます 

4. ステップアップクレジット 

お客様のプランに合わせて、毎月のお支払い金額を徐々 
に增やしていくシステムです例えば、1年目は Y 3 . 000、 
2年目は Y 6.000というように、御自由に肢定することが 
できます 

5. ボーナス10回払いも OK 

毎月の支払いは〇、ホーナス時のみのお支払 L 、でクレジ 
ットが御利用になれます回数は1、2回の他、4-6-8-10 
回払いまで OK。 

6. カードクレジット 

各種クレジットカードが店頭だけでなく、 e . ^ 
通信販売でも御利用になれます.祥しく ^ ^ 

はお気軽にお問い合わせ下さい, ■ 

7. カレッジクレジット 

保証人なしで、学生の方でもクレジットが御利用できます 
(20 歲以上） 


No . l サポートシステム 


1. 初期不良交換期間3ヶ月 

參万一、お届けした商品が不良の場合、お買い上げ日よ 
り3ヶ月以内なら、同等品と即、交換致します 


2.新品パゾ3ン3年保証 

•メーカー保証が1年の場合、メーカー保年+マップ 
保証 2 年の計 3 年間の保証になります。 


3. 中古パゾ U ン1年保証 


•中古パソコン本体は、 I 年間保証致します。（ディスプレ 
イプリンタ等は6ヶ月保証となります） 


4. 新品パソコン買取り保証 

參1ヶ月以内であれば必ず買取り保証金額で、下取り、 
買取り致します。 


5. 永久買取り保証 


•古くなったパソコン、スクラップ寸前のバソコンでも OK •グ 
どんな/、•ソコンでも、どこよりも高く買い取ります 

















































































































































































































d\/WLU TOMATO senes 


SK6B000 

PROn-PROttHD 



基本セツト 

PROD-HD 




CZ-663C く本体 >. ¥Sofmap 特価 

CZ-605D<I5* ドットピッ刊 .39>. ¥Sof map 特価 

マグ b ルブランクディスケット <5’2HDx10 枚〉 ¥Sof ma 卩特価 

標準価格¥51 1.000 ¥お電 B にて 


iczscsia&asBP 


|ボーナス ¥30,000X12 回 

1 ボーナス ¥20,000X10 回 

|ボーナス 

なし 

ボー •ナス 

なし 

|ポー ナス 

なし 


基本セット PROn 

: map 獅 6 
: map 特価 
: mac 4#® 


CZ-653C< 本体〉 . ¥Sofmi 

CZ-605D<i5*K7hk7^039> .¥Sofi 

マクセルブランクデイスゲット <5*2HDX H) 枚〉 ¥Sofmai 


揉準価格 ¥401,000 


¥お電括にて 



ーナス Y 20.000 XI 〇回 


Qt<— ナス なし 


ナス なし 

p —ナス なし 





データべ ース セット 

PROH_HD 冷減 _ 

CZ ~663 C 〈本体〉 .¥ Sofmap^ii 

CZ -613 D < I 5 •ドッ叱ッ刊 .3 i >. ¥Sofmap 特通 

CZ -8 PG1 < 2 化>*字ドットプリパ-蔭〉 ¥ Sofmap 特価 

CZ -226 BS < cardpro -63 K >.¥ Sofmapt 5 ffi 

CZ -220 BS<DATA PR 068 K > ¥Sofmap 特価 

マクセルプランクディスケット <5*2HDX10 枚〉 ¥Sofmap 特価 
標準価格¥748,800 ¥お•話にて 


プリントセツト PROH 口^) 

CZ-653C 〈本体〉 ¥Sofmap 糊® 

lap 特価 


CZ-605D<I5* ドットピッ刊 .39 〉 ¥S0fm£ 

CZ-8PC4<48 ド 7i#K 写プリ w ¥Sofmap 鲕 

CZ-221 HS<NEW Printshop PRO-68K> ¥Sofmap1 
CZ-235GS < グラフィックラィブラリ vou> ¥Sof maf 

CZ-236GS 〈グラフィックラィブラリ V 0 L. 2 > ¥Sofmar 

マクセルブラディスケット <5*2HDxio 枚〉 ¥Sofmap^iffi 

樺準価格¥538200 ¥お*!括にて 


ap 特価 
ap _ 
ap 特価 



I ポー ナス \ 

ポー ナス >\ 

ポー ナス 
ポー ナス 

ボ-•ナス 


トナス ¥40,000 XI gp 

ポーナス ¥35.000x 8 回 


なし 


なし 


なし 


樣準価格 Y 538200 


國 


店頭に 直接 来られる方は 

〔東京 03-258-31 56 C 大阪 06-647-0562 

通信販売を 
こ 利用の方は 

t 東京 03-253-4230 C 大阪 06-633-7 没4 

FAX.03-253-4290 

礼帽011 -865-7030 檷浜 045-311 -3441 広應 082-222-0604 
仙台 022-268-3405 金沢 0762-21 -7045 福岡 092-752-0044 
新漏 0252-22-6139 名古 ■ 052-332-2117 高松 0878-34-8833 

24時閜 テレフォンサービス 

r 03- 258 -7910 

フリ-タイヤル 商品発送のお 問 合わせ 

两 0120-08-0113 

フリ-ダイヤル 故陳 •修理のお 問 合わせ 

to 0120 -11 0292 


¥ お爾 K にて 


ボーナス ¥45.000X14 回 

ポーナス ¥40.000X10 回 

ボーナス 

なし 

ポーナス 

なし 


支払回数 

0 

E 

ド 


12 15 


20T24 30136142 

阿54「60 1 



0 


他社金利 

S 


0 

团 

910 

固 

13 16 19121 25 

28 31 35 

0 

R 

R 

R 



お支払い方法 


1. 代金引攮システム 

1冬再か品物をお届けに h さ J すのて.その眄にお支払い下さい 

2. クレジツト 

お霉 is て支払い回 w 、 支払い開始日、ホーナスの有傷をおつしゃつて下さい 
こちらからクレンノト用紙をお送り致し i すのて，こ J 己入.こ捺印の上こ返送下さい 
商品利 H 御指定の〇埵かづ目觔引落しとなり J す 

3 0行頫込 

おネはて御, i 文の上，下 I 己据込先へ霣信扱いてお描り込み下さい 
二找ば後、たたちに商品をお！^りします栎 v ■入手教 M はお客《色相となり5す 


振込先 


営赖亂 


東京秋葉原店 

三和銀行秋葉原支店(普）1012131 
口座名義 ㈱ ソフマップ 


平 日 AM11:00, 
日•祭日 AM 10:00- 


-PM 8： 00 
-PM 7： 00 


I 旧名マップシャパン 

〒 101 東京都千代田区外神田 3 丁目丨 5#6 号小暮末広ビル 1F 
亍 556 大阪市浪速区日本撟 5 丁目 7 番 I 7 号ソフマップビル 




imfjL 高額下取 d 差額表 

rlSD ^& s/Juds 9〇この他の商品についてもお m 話でお氕«にお間い合わせ下さい 


減52 



SUPER-HD 

CZ -623 C 

CZ -6 I 3 D 

EXPERT II 
CZ -603 C 
CZ -605 D 

EXPERTIIHD 

CZ -613 C 

CZ -613 D 

PRO II 
CZ -653 C 
CZ -605 D 

PR 0 II-HD 

CZ -603 C 

CZ -605 D 

下取り機種 

交換差額 

交換差額 

交換差額 

.交換差額 

交換差額 

CZ-652C 

CZ-602D 

¥308,000 

¥135,000 

¥238,000 

¥ 95,000 

¥135,000 

C2-602C 

CZ-602D 

¥268,000 

¥ 95,000 

¥198,000 

¥ 55,000 

¥ 95,000 

CZ-611C 

C2-611D 

¥270,000 

¥ 97,000 

¥200,000 

¥ 57,000 

¥ 97,000 

CZ-601C 

CZ-601D 

¥318,000 

¥145,000 

¥248,000 

¥105,000 

¥145,000 

CZ-600C 

CZ-601D 

¥323,000 

¥150,000 

¥253,000 

¥110,000 

¥ 150,000 

CZ-880C 

CZ-880D 

¥440,000 

¥267,000 

¥370,000 

¥227,000 

¥267,000 

PC-9B01VX21 

PC-KD854N 

¥313,000 

¥140,000 

¥243,000 

¥100,000 

¥140,000 

FM-TOWNS-2 

FMT-DP531 

¥393,000 

¥220,000 

¥323,000 

¥180,000 

¥220,000 




大阪日本欏店 


高額買取価格表 


ノ 商品名 | 高額買取 

X 68000 モニターセツト 

X68(CZ-662C + CZ-600D 601 D) 

¥250.000 

X68(CZ-662C + CZ-611D 612D) 

¥260.000 

X68(CZ-652C + CZ-600D601D) 

¥210,000 

X68(CZ-652C + CZ-611D 612D) 

¥220 ,000 

X68(CZ-623C + CZ-602D) 

¥360.000 

X68 (CZ-623C + CZ-605D) 

¥380.000 

X68(CZ-623C + CZ-613D) 

¥390,000 

X68(CZ.623C + CZ-603D) 

¥345.000 

X68(CZ-623C + CZ-604D) 

¥350.000 

X68(CZ-612C + CZ-600D 60I'D) 

¥290,000 

X68(CZ-612C + CZ-61 ID 612D) 

¥300.000 

X68 (CZ-611C + CZ-600D 6 01D) 

¥235.000 

X68(CZ-611C + CZ-611D 612D) 

¥245,000 

X68 (CZ-603C + CZ-602D) 

¥255,000 

X68 (CZ-603C + CZ-605D) 

¥270,000 

X68 (CZ-603C + CZ-613D) 

¥280.000 

X68(CZ-603C + CZ-603D) 

¥215,000 

X68 ( CZ-603C + CZ-604D) 

¥225,000 

• X68(CZ-602C + CZ-600D 601D) 

¥240,000 

X68(CZ-602C + CZ-61 ID 612D) 

¥250,000 

X68(CZ-601C + CZ-600D 601D) 

¥195.000 

X68(CZ-600C + CZ-600D 601D) 

¥190.000 


業界 No.l の低金利 


ビジネスセツト 

PROD-HD 


CZ-663C< 本体〉 ¥ 日 ofmap 獅 fi 

CZ-605DO5 •ドットビッ刊 _39> ¥Sofmap 转一 

CZ-8PG2<24 ビ / 漠字ド分プリ 3-| 撕〉 ¥Sofma 
CZ-212BS〈BUSINESS PRCH8K> ¥Sofma 

マクセルプランクディスケット <5*2HDx iott> ¥Sof map 


標準価格 ¥739.000 


¥ お爾括にて 


ホ— t ス v 50,000 X 1213 

ホ-モス Y 50.000ン: 8回 

pEy 5251ホーナス なし 

ド W ..: I I | i |' iTjg ホ-ナス なし 

■ナス なし 


腫セット PRon 

CZ-653C 〈本体〉 ¥Sofmap 獅 i 

CZ-613D<15 • 卜 ‘ ットヒ •. 斤〇 31> ¥Sofmap 特価 

CZ- 8 PG 1 <24 ビン；！字ドヮトプリ • パ - 的桁〉 ¥Sofmap 特価 
MD-24FS5<atf ; tTA2400BPS> ¥Sofmap 特価 

CZ-257CS<Communication PRCH8K VerM) +¥Sofmap 特価 
マクセルプランクディスケット <5’2HDxio 枚 〉 ¥Sofmap 特価 
標準価格 Y 620.600 ¥お電括にて 


fomRom 


maxell KMSa SONY FUJI FILM £^raveiie.B WnmCH 

xv 日本テレビ、317テロヒ r ~ 


下取 D •買取り大観迎ガ 


テレビ朝日、テレビ東京系列 
で CM 放映中//直営10店舗 


超 


T 取 D 差額のお支払いは、クレジットを御利用下さし\。 


• 掲載の商品以外にも多数取 D 扱いしておりますので、お気鞋にお問い合わせ下さい。又、商品在 1 C は毎日変動しますので、品切れの際は御予約承 D ます。 


あなたが今、お持ちの機種 


回面一回；回|回 

014 8 6 4 

6 8 4 3-2 


8000000 
3585 
25193 

¥¥>¥1 


回回回回回 
4 0 4 4 6 
8 6 8-5 3 
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当社は X 68000 の販売認定店です） 

どんなことでも安心してご相談くださし、。 

X^B8000new pros S 日 000 expert セット 


• CZ -653 C (本体) . 

• CZ -603 D (カラーデ < スブレイ) •■ 

• お好きなゲームソフト彳本… 


•¥285,000 
•¥ 84,800 
‘¥ 7,800 


■定価合計 . 

クリエイト特価 


5 台限定 


. CZ -602 C - GY (本体〉 •• 

• CZ -603 D-GY (カラ-ディスプレイ). • 


¥356,000 
•¥ 84,800 


• ¥ 377.600 ■定価合計 . ¥ 440.800 ► 大特価 ¥ 279,000 

大特価¥279,000 


XXB8000 NE\N EXPERTE 

m CZ -603 C (本体) . ¥ 338.000 

• CZ -613 D (カラーディスプレイテレビ) . ¥135.000 

參 CZ -8 NJ 2.. ..... ¥ 23,800 

•お好きなゲームソフト 1 本 . ¥ 9.800 

■定価合計 . ¥506,600 

クリエイト特価 



均等払い 

¥ 7,680 x 48回 

¥ 9,890 x 36回 

¥14.370 x 24 回 

ポー ナス 

なし 

なし 

なし 


均等払い 

¥12 朋 Ox 24 回 

¥ 8,870 x 36 回 

¥ 6.920 x 48® 

ボーナス 

なし 

なし 

なし 


均等払い 

¥ 9,97 0 M 8 回 

¥12,840 x 36 回 

¥18,660 x 24 回 

ボーナス 

なし 

なし 

なし 


UB 日 000 

• CZ -623 C-TN (本体•キーポード. 


SUPER 咖 


•マウス) . ¥498,000 

• CZ -613 D-TN (カラーデ f スプレイ） . ¥135,000 

• CZ -6 BP 1. ¥ 79,800 

. ¥712,800 


■定価合計 . 

クリエイト特価 


均等払い 

¥ 7,320 x 48回 

¥10,100 x 36 回 

¥13,450 x 24 回 

ボーナス 

¥ 42,000 x 8回 

¥ 50,000 x 6回 

¥80,000 x 4回 


※本広告に揭載の全商品の価格について消#税 
は含まれておりません。 


68000 NEW EXPERT! 

ミュージシャンセツト0これも TM ネツトワークだよ 〜V 

參 CZ -603 C . ¥338,000 

• CZ -605 D . ¥115,000 

• MU 1. B ( MIDI ボード&ソフト） . ¥ 39,800 

• CM 32 L . ¥ 69,000 

參グラナダ . ¥ 8,800 

•JOY カード . ¥ 1,800 

■定価合計 . ¥572,400 ►超特価 ¥458,000 


SXGBOOOnewproe 

ゲーマーズセット。遊んで暮らせる SET / 

•PROD CZ 653 C . ¥285,000 

參 0.31 CRT CZ 603 D . ¥ 84.800 

參 グラナダ . ¥ 8.800 

• Y'S . ¥ 8.700 

•ポビュラス . ¥ 9,800 

•スーパーハングオン . ¥ 8,800 

•エージャックス . ¥ 8,800 

•サーク . ¥ 8,800 

♦アールタイプ. . ¥ 7.800 

•アナログ JOYSTICXE -1 AP . ¥ 13,800 

■定価合計 . ¥445,100 ►超特価 ¥353.000 


X 680 □□シリーズ用周辺機器•ソフトオール超特価// 


★この表以外の組合せ、お支 
払い方法もご自由にできます^ 
★XI シリーズ用、 X 68000 シリ 
ーズ用各社ハードディスク/プ 
リンタ等の周辺機器を大特価 
にて販売じ C おります。 

電話にてお問合せください。 


•渋 谷店' 

A 谷# 6 便簡〇 

安田 ftltO i 

、 電 . t . m / r 

! 

1 m " 

■ o « W * n 01 化金扇 

«〇 

c 明治通り 

富士餱行〇 

- 窗急東椎店 1 

M 渋谷 駅 k ! 

1 ハチ公*? * 

V V 

ノ：〉 

1 至*比》 

IJ 

i 

i 


型番 

品 名 

\ 定価 y 

ソフト名 

品 名 

、定価 y 

CZ-6VT1 

カラーイメージユニット 

\¥ 69.800/ 

MUSIC PRO 

MIDI 版 

\¥ 28.800/ 

CZ-8NS1 

カラーイメージスキャナ 

V 188.00(/ 

MUSIC PRO-68K 

マウスを使った 楽譜 ワープロ 

V 18.80(/ 

CZ-6BE1A 

IM 日增投 RAM ポード 

\ 38.0C 


SOUND PRO-68K 

サウンドエデ r 夕 

k 15.8 〇 6 

CZ-6BE2 

2MB 增設 RAM ポード 

¥\mt 

(〇 

Sampling PRO-68K 

AD PCM サンプリングエデ f 夕 

峰 17 

m 

CZ-6BE4 

4MB 增股 RAM ホード 

¥^8^00 

Musicstudio PRO-68K V.I.l 

MIDI マルチレコーデ < ングソフト 

¥\28 

ioo 

CZ-8NM3 

マウス，トラックボーノレ 

¥ 、 

am 

OS-9/X 68000 

マルチタスクオペレーティングシステム 


/咖 

BF-68PRO 

高性能 CRT フィルター 

¥ 1 

1800 

PRO-68K 

サイバーノート 


.800 

CZ-6BP1 

数値 演算 プロセッサ•ボード 

¥ 7 

SjBOO 

PRO-68K 

ステーシヨナリー 


1800 

CZ-8NT1 

トラックボール 

¥ /I3 加 0 

Ccompiler PRO-68K 

ソフト 開発 セット 

¥ 户 9 

W) 

CZ-6BM1 

MIDI ボード 

¥ l 2 S . B \ 

0 

Human 68K Ver2.0 

開発 ツールセット 

¥/ 9 

.800 

CZ-8NJ2 

アナログスティック 

Y 23.80 


PIO-6BE1-A 

内蔵 1MRAM 

呼 25.0* 

CZ-6TU 

パソコンチューナ 

U 33.10 へ 

PIO-6BE2-2M 

2MRAM 

U 50.004 

SX-68M 

MIDII/F 

/¥ 19.800\ 

PIO-6BE4-4M 

4MRAM 

/¥ 88.000\ 

XE-1AP 

アナログジョイバッド 

/ ¥ 13.800 ' 

MU1-B 

MIDI I/F+ ソフト 

/¥ 39.800 \ 


▲上記以外ビジネスソフト、 最新 ゲームソフト豊富に在庫 

I 


パソコン専門ショップ 


に在庫あります。※送料はご注文の際お問合せください。•超特価販売中/ 

I I r 1 ™ I € ■■ J • I 


3-486-6541 代 ) 




癱渋谷 店 s 03-486-6541( 代) 


渋谷/横浜 


〒150:東京都渋谷区渋谷 1-12-7 三和渋谷ビル 
振込銀行:三井銀行渋谷宮益坂支店 ® Na 5000340 


籲横浜 店 s 045-314-4777( 代) 


〒221:横浜市神奈川区 ft 屋町 2-12-8 第1建設ビル 
振込銀行:三和銀行横浜駅前支店® No 310852 


『渋谷店大改装謝恩セール』開催/ 
9月25日火- M 0 月2日火 


営業時間 ( 定休日 ► 渋谷店 : 日曜 • 祭日 / 横浜店 : 水曜 ) 

AM10 ： 00-PM7：00 


^SBBOOO 


ク UHV 卜特典 

























































































































































主要開発アイテム 


•産業用コンピュータ•リアルタイム制御システム•ネットワークシステム 
•通信用各種システム•マルチメディアオーソリングシステム 
•マルチメディアシステム # CD - ROM 関連システム#86系各種ボード 
#68000系各種ポード # VME バスボード etc . 


募集職種 


① ノ \ー ドウェア技術者(設計•開発） 

② ソフトウェア開発按術者 

(68 K のアツセンブラ、 C 、 コンノ \°イラの経験者歓迎） 

③ コンピュータ設計エンジニア 

④ セールスエンジニア 

| 快適環境の新社屋（自社ビ^)で H 
y 皆さんをぉ待ちしています； s 

liuiiniiiiinniiiriiiMiniiiiiriMiiiriiiMintiiMniiiiinM " 門 …•".. 門 .… ... 


_ 



►スーパー〇 S - 9 マシン 

マイクロボード/システム•コンピュータ ( SYSCOM ) 

68030 MPU 25 MH z OS -9/68030 標準装備 


■会社概要 ■ 

設立/昭和55年5月資本金/4億5800万円従業員数パ66名 

■募集 要項_ 

資格 高卒以上28歳位まで勤務地/本社（千葉県船橋市）待遇昇1、 
賞2、各種社保完、交費全給、海外研修制度給与/経験、実力を考慮の上、 


当社規定により優遇休日休暇’完全週休2日制（土•日)、祝祭日、夏季、年 
末年始、有給、特別勤務時間 ’9:00 〜17:45交通 / JR 京葉線南船橋駅 
下車7分応募履歴害（写真添付）を郵送じ C ください。追って面接日を連絡 
します、※入社日•面接日相談に応じます。応募の秘密厳守。 


©株式会社7ず!3□ポー h ： 


連絡先〒273千葉県船橋市高瀬町 31-8 
TE し0474 — 37 — 9811 ( 代） 

担当総務部人事課金澤（かなざわ） 


いつてもどこても 
ソフトバンク勿〇大雑誌 


SOFT 

BANK 






渗後卿 

"_yPC 




パソコン. 


フカジン 


敵 / 咖 00 八ツカ-大莫顧 


マニアの 精神で、 プロの仕事。 
これがマィクロ ボ ードの 
エンジニアリング •フィー ルドです。 
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c 特膽瓣_， 綱すベて税込です。 


// 

佐*市 

// 

// 

長崎市 

// 

佐世保市 
熊本市 

// 

人吉市 
鹿児島市 

// 

那朗市 

// 


姫路市 


和歌山市 


ナガリ窨店 
金栄堂 

旭屋窨店北九州店 
井筒屋ブックセンター 
カルパーク平野 
白石窨店本城店 
エマックスたがみ 
BOOK U - K 

パルコブックセンター大分店 

本町晃星堂 
明林堂 

中央、田中軎店 
寿屋宮崎店 
金華堂北バイパス店 
憤文館佐*店 
項文館デイトス店 
メト□害店 
好文堂 
金明堂窬店 
紀伊國屋書店熊本店 
長崎窨店 
明屋人吉店 
春苑堂ブックプラザ 
ブックスみすみ 
球陽堂窨房.ビル店 
文教図害 


名古屋市 

// 

// 


福山 

市 

ブックシティ啓文社 

// 


啓文社コア 

山口 

市 

五十部誠文堂 

// 


文栄堂 

下閲 

市 

中野窨店 

宇部 

市 

京屋害,苫 

// 


末広書店 

防府 

市 

城文堂国衙店 

光 

市 

三文字屋 

烏取 

市 

富士軎店 

松江 

市 

園山窨店 

く四1 

1> 


徳岛 

市 

小山助学館本店 

// 


小山助学館東口店 

// 


森住九善 

裹松 

市 

宮脇軎店本店 

九 m 

市 

宮脇窨店丸 ft 店 

松山 

市 

紀伊國屋窨店松山店 

H 


明屋軎店本店 

ガ 


明屋軎店大街道店 

// 


丸三窨店 

新居浜市 

明屋星原店 

宇和島市 

明屋宇和島店 

高知 

市 

金高堂 

く九州 

• 冲繩〉 

福岡 

市 

紀伊國屋窨店福岡店 

// 


り一ぶる天神 

// 


積文館新天町店 

// 


福岡金文堂本店 

// 


福岡金文堂朝日ビル店 

// 


福岡金文堂デイトス店 

// 


福岡金文堂アニマート J 


三洋堂パソコンシヨップ2 

052-251-8334 

三洋堂いりなか本店 

052-832-8202 

ちくさ正文館本店 

052-74 M 137 

白樺窨房西店 

052-774-7223 

丰_文館 

0532-54-2345 

ブックス鎌倉 

0564-54-1822 

三洋堂梅坪店 

0565-35-2334 

三洋堂豊川店 

05338 -3-0334 

5洋堂刈谷店 

0566-24-1 134 

三洋堂勝川店 

0568-32-7806 

三洋堂一宮店 

0586-77-5734 

自由害房 

0582-65-4301 

大洞堂ブックス258 

0584-81-2553 

大洞堂岐大バイパス店 

0584-74-7766 

三洋堂可児店 

0574-63-2334 

三洋堂多治見店 

0572-24-0340 

別所書店丨丨ビル店 

0592-24-1014 

文化センター白揚 

0593-51-071 1 

シエトワ白播スズカ 

0593-82-5221 

K 々堂京宝店 

075-223-1003 

アハ•ンテイ.ブックセンター 

075-682-5031 

オーム社窨店河原町店 

075-22 卜0280 

ジュンク堂京都店 

075-252-0101 

オーム社軎店竹田店 

075-644-261 1 

駸々堂大丸店 

0742-26-6241 

旭屋窨店本店 

06-313-1191 

紀伊國屋害店梅田店 

06-372-5821 

オーム社窨店大阪店 

06-345-0641 

K 々堂京橋店 

06-353-3209 

枝々堂心齑橋店 

06-25 卜0881 

旭屋窨店ナンパ店 

06-644-2551 

ナンパブックセンター 

06-644-5501 

ヒバリヤ窨店ナンパ店 

06-644-5407 

旭屋窨店アベノ店 

06-63 卜6051 

ユーゴー窨店 

06-623-2341 

河村書店 

06-951-2968 

水嶋書房京阪デパート店 

0720 -5 卜3432 

コーべブックス西武高槻店 

0726-83-1766 

ヒパリヤ窨店本社 

06-722-1121 

ジュンク堂センター街店 

078-392-1001 

ジュンク堂サンパル店 

078-252-0777 

海文堂窨店 

078-33 卜6501 

日東館害林 

078-391-8701 

新興書房 

0792-85-3344 

城心堂窨店 

0792-8 卜2055 

宮井平安堂 

0734 -3 卜 1331 

帯伊書店 

0734-22-0441 

紀伊國屋窬店岡山店 

0862-32-3411 

丸蕃岡山支店 

0862-3 卜2261 

津山ブックセンター 

08682 -6-4047 

紀伊國屋窨店広島店 

082-225-3232 

九蕃広島支店 

082-247-2251 

金正堂 

082-248-3715 

積蕃館 

082-248-3151 

啓文社尾道店 

0848-37-5151 

啓文社福山店 

0849-22-3111 


0849-25-0050 
0849-4 卜0909 
0839-24-6630 
0839-22-561 I 
0832-22-6181 
0836-31-2323 
0836-3 卜0086 
0835-25-1988 
0833-7 卜0251 
0857-23-7271 
0852-21-4167 

0886-54-2135 
0886-25-1380 
0886-23-3228 
0878-51-3733 
0877-22-5533 
0899-32-0005 
0899-41-4141 
0899-41-4242 
0899-3 卜8501 
0897-44-4000 
0895-23-1118 
0888-22-0161 

092-72 卜7755 
092-713-1001 
092-78 卜2991 
092-741-2106 
092-431-1094 
092-45 卜6175 
092-844-0088 
093-52 卜 1044 
093-531-3685 
093-63 卜6421 
093-64 卜0131 
093-661 -7988 
093-60 卜2200 
0942-33-1841 
0948-25-7266 
0975-35-0643 
0975-33-0231 
0977-23-2183 
0985-24-3511 
0985-27-4111 
0952-32-1965 
0952-24-4314 
0952-23-7155 
0958-21-5453 
0958-23-7171 
0956-22-4214 
096-322-5531 
096-353-0555 
0966-22-5486 
0992-25-3200 
0992-57-1011 
0988-63-3752 
0988-62-1201 


国立市 

東西害店 

0425-75-5061 

小平市 

文教堂小平店 

0423-43-9229 

東村山市 

文教堂東村山店 

0423-96-1115 

立川市 

オリオン軎房ウイル店 

0425-27-231 1 

八王子市 

くまざわ軎店本店 

0426-25-1201 

町田市 

有隣堂町田店 

0427-23-3018 

// 

久美堂本店 

0427-25-1330 

// 

久美觉小田急店 

0427 -27- 1111 

// 

文教堂！*川店 

0427-35-4117 

// 

文教堂小川店 

0427-96-1781 

多摩市 

くまざわ軎店桜ヶ丘店 

0423 -37-2531 

福生市 

文教堂福生店 

0425-53-7708 

〈甲信越 • 

北陸〉 


甲府市 

文教堂甲府店 

0552-22-4600 

長野市 

平安堂 ft 野店 

0262-26-4545 

〃 

長谷川窬店 

0262-26-2122 

松本市 

ブックス a クサン 

0263-35-5555 

// 

改造社松本駅ビル店 

0263-36-3777 

" 

アクロスブックセンター 

0263-32-5733 

上田市 

平安堂上田店 

0268-22-4545 

飯田市 

平安堂飯田店 

0265-24-4545 

岡谷市 

笠原害店 

0266-23-5070 

1$訪郡 

平安鲎下!*肪店 

0266-28 -1111 

新潟市 

紀伊画屋耆店新泯店 

025-241-5281 

// 

萬松堂 

025-229-2221 

// 

北光社 

025-228-2321 

長岡市 

覚張軎店 

0258-32-1139 

ガ 

ブックセンタ—畏岡 

0258-36-1360 

// 

ft 岡技大長峰文化 

0258-46-6437 

上越市 

パソトピアコスモス 

0255-25-5867 

山；1匕町 

BOOK メディア 

0254-77-3850 

富山市 

瀬川窨店 

0764 -24-4566 

// 

清明童 

0764-24-4166 

// 

BOOKS なかだ豊田店 

0764-32-1353 

// 

文苑堂本鄉店 

0764-22-0552 

// 

文苑堂赤江店 

0764-33-0321 

高网市 

文苑堂 

0766-21-0333 

// 

文苑堂横田店 

0766-2 卜0431 

金沢市 

うつのみや片町店 

0762-21-6136 

// 

軎林香林坊本店 

0762-20-501 1 

野々市町 

王描の本本店 

0762-46-5325 

福并市 

勝木書店 

0776-24-0428 

ガ 

品川窨店新田塚店 

0776-24-11 12 

く東海〉 
S ? ■岡市 

聆岡谷島屋呉服町本店 

0542-54-1301 

// 

江崎窨店 

0542-54-4481 

ガ 

吉見窨店 

0542-52-0157 

ガ 

戸田窨店 S B S 店 

0542-81-5733 

// 

戸田害店曲金店 

0542-81-5899 

沼津市 

吉野屋 

0559-23-5676 

// 

マルサン窬店宝塚店 

0559-63-0350 

富士市 

戸日害店窗士店 

0545-5 卜5121 

清水市 

戸田害店本店 

0543-65-2345 

浜松市 

浜松谷島屋連尺本店 

0534-53-9121 

名古屋市 

三省堂害店名古屋店 

052-562-0077 

// 

星野窨店近鉄ビル店 

052-581-4796 

// 

丸蕃名古屋支店 

052-26 卜2251 

// 

九蕃ブックメイツセントラルパーク 

052-971-1231 

// 

日進堂上前漳店 

052-263-0550 


■ 8086アセンブリ言語 癱 2,890円 

a 8086マクロプログラミング 籲 2,680円 
I 入門 Tirto PASCAL Ver . 5 プログラミング 籲3,300円 
■ GDC テクニカルブック 

1 C 言語の基礎知識 
C 言語の活用理解 
C 言語の応用50例 
上級言語の応用 5 D 例 
Play the C 3 上巻 
Play the CD 下巻 
C プリプロセッサ•パワー 
Turbo C 入門 
C ++ プログラミング 
QuickC プログラミング 
詳説 CSIS 
MS - CVer .5.1 プログラミング • 3, 300円 
Turbo CVer .2.0 プログラミング 籲 2,900円 


ダイナブック•スーパーガイド • 3,200円 
最新八ードディスク入門 癱 2,600円 
最新 EMS •闩 AM ディスク入門 籲 2,500円 
プレイ MS-DOS • 1,960円 

MS - DOS いたれりつくせり本 • 1,860円 


新 MS - DOS 入門ビギナー編 •し900円 

新 MS - D 〇 S 入門シニア編• 2 , 300 円 
新 MS - DOS 入門応用編 wjoo 円 

OS /2 API ブック I a ™ 円 

OS /2 API ブック II 籲 3,000円 

UNIX オペレーティング•ガイド • 3, 090円 

一太郎 Ve 「.3 ガイド 籲 2,580円 

入門一太郎 Ver .4.2 籲 2,500円 

PIEXE ガィド 籲 2,600円 

RPG 幻想賴 • 1,550円 

RPG 幻想事典日本編 籲 1,860円 

魔法王国シムルグント • 1,860円 


1_〇丁11日1-2-3 ガイドヒギナ ー編 • 2,480円 

LOTUS 1-2-3 ガイド II 籲 2,580円 

桐 Ver 2 ガイド 籲 2,580円 

入門桐 Ve 「.2 —括処理 籲3,500円 

Ninja 3ガィド 籲2,300円 

MS - ChartVe 「.3.1 ガイド ♦ 2, 990円 

まいと一くガイド •2,370 R 

d BASE III PLUS ガィド 籲3,800円 

The CARD 3 ガイド • 2, 900円 

アセンブラ CASL 入門 • 2, 060円 

八 ー ドウ エア 徹底 マスター *2,580 円 
FORTRAN 徹底 マスター • 2, 890円 

受験用語八ンドブック • 1,860 円 

情報処理入門 I 基礎知識 • 1,240円 

情報処理入門 II 関連知識 •し 24 〇円 

CASL で学ぶアセンブラ入門 *2,270 円 
そっくり模擬試験 ♦ 2, 200円 



情 

報 

処 

理 

試 
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A 秘 ESS 

XKI 7 エミュレータ 


好評発売中 
定価 ¥9, 日 00 



XI エミュレータは X 68000 上で XI シリーズのアプリケーションを実行す 
るためのソフトエミュレータです。 XI のアプリケーションを完全にソフト 
ウェアのみでエミュレートしているため、 X 〗上での実行速度と比較して、 
平均3〜5倍程度おそくなりますが、 X 68000 のマシン上に実現した仮想 XI 
マシンを楽しめます。また、 XI と X 68(][)0 の相互間でファイルを転送する 
ためのユーテイリテイと専用ケーブルが付属しますので、 XI 上で作り上げ 
たソフトの資産を X 68000 上に移行することも簡単にできます。 


XKU エミュレータの機能 

* XI エミュレータは XI に相当する機能をエミュレート。 

この仮想コンピュータには最大4つのドライブが仮想的に接続。 

• XI エミユレータからみたドライブは Human 68 k のドライブ上にある 
ファイルで仮想的に実現。このファイルは X 〗用の5” 2□ディスクのイ 
メージをファイル転送ユーテイリテイでまるごと転送したもの。 


* XI エミュレータで仮想的に実現した)は仮想ドライブから起動。 
このため仮想ドライブ用ファイルには、 XI を立ち上げるために必要な 
Hu 巳 ASIC や CP / M などのシステムプログラムが必要。 

拳 XI エミュレータでは、 XI の持つ V 闩 AM を含むメモリイメージや 
Z 80 CPU を仮想的にソフトウェアで実現。 


ファィル転送ューティリティ 

[Vィスク驻达I 

XI ディスク ◄■► X 昍000 Human 68 k (5”2 D ディスクイメージファイル） 

♦ XI エミュレータでは Human 68 k 上のディスクイメージファイルを仮 
想ドライブとして使用。 

I ファイル転送 I 

XI BASIC : CP / M ◄- ► X 68000 Human 68 k 

• X 〗で作ったプログラム S データを X 68 t )00 上で使用。 

※付属の専用ケープルを XI と XB 8000 に接続してファイルを転送します。 



エミュレータ a 

Q . ファイル転送のために別途闩 S -232 C ケーブルを買わないといけない 
のですか7 

A . 専用のケーブルが付属しますのでその必要はありません。 

Q . XI BASIC のプログラムを X 68000 上の X - 日 ASIC で使えますか？ 
A . 通常の セーブではコー ドが違ラので使用できませんが、 アスキーセー 
ブしたファイルであれば X - 巳 ASIC 上でそのまま口ード可能です。 

Q . Turb ◦巳 ASIC で作成した住所録などの漢字を含んだデータがある 
のですが X 68000 上にファイル転送で吉ますか7 
A . XlTurbo も X 68000 も漢字はシフト J 旧コードなのでファイルの 
転送は可能です。ただし、漢字 ROM を必要とするものはサボートし 
ていません。 


* この商品価格には消費税は含まれておりません0 
* CP / M はデジタルリサーチ社の商標です。 

文中のソフトウェアは各社の商標で 

* 製品の仕播、名称は予告なく変更する場合もございますのであらかじめご了承ください。 


Q . Turb ◦用のソフトは動きますか7 
A . X 〗用のみで Turb ◦専用のソフトは動吉ません。 

Q . ゲームは 動きますか7 

A . 純粋に BASIC でかかれたものは動きますが、プロテクトがかかったも 
のや直接八ードをアクセスするよ5な市販のゲームは動ぎません。 

* タイミング等八ードウエアに依存するよろなソフトは、原理上実行できない、もしくは 
正常に動作しない場合がありますのでご注意ください。 

* 一部サボートしていない機能があ〇ます。 

1 X 1 エミュレータ通信販売 I 購入希望として住所、氏名、電話番号をお知 
らせくださし'。注文書をお送り致します。 


g 霖アクセス 


〒丨〇丨東京都千代田区神田神保町卜64 
神保町協和ビル 7F 
003(233)0200(ft) FAX. 03 (29 I ) 70 I 9 
















東京都渋谷区道玄坂 2 丁目 28 番 4 号 0(03) 496-4141 
東京都町田市森野1丁目39番16号 0(0427)23-1313 
東京都八王子市旭町1番1号八王子そごう 7 FO (0426) 26-4141 
東京都立川市幸町4 - 39 - 10(0425)36-4 141 
渾太市中町3 - 4 - 3« (0462 )25- 1548 
富山市桜町2 -丨- 100(0764)32-3133 
金沢市入江2 - 630(0762) 91 -11 30 
金沢市寺地2 - 3«(0762)47-2524 

名古屋市中区大須4丁目:? 480(052)262-1141 


7 —タキットのお求めは J SP 各店でど5そ。 


テクノランド大阪市浪速区日本橋5丁目6番7号〇⑴ 6) 634-1211 
メディアラント大阪市浪速区日本橋5丁目8番26号》〇)6) 634-1511 
コスモランド大阪市浪速区難波中2丁目1番17号 tt (06) 634-3111 
U . S.LAND 大阪市浪速区日本橋4丁目9番15号 tt (06) 634-1411 
ビジネスランド大阪市北区梅田い 1-3 大阪駅前第3ヒル B ン 0(06) 348-1881 
梅田店大阪市北区小松原町110«(06) 362-1141 
高槻店高槻市高槻町1丨番16号《0)726)85-〗212 
くずは店枚方市楠葉花園町15番2号 a ⑴ 720)56-8181 
千里中央店豊中市新千里東町卜 3 SENGHUPAL 2 番街 4 Ftt (06) 834-4141 
摂津富田店高槻市大畑町24 - 100(0726)93-7521 
寝屋川店寝屋川市綠町4 一 200(0720)34-1166 


藤井寺店藤井寺市岡2丁目1番33号》(0729)38-211丨 
岸和田店岸和田市土生町2451- 30(0724)37-1021 
さんのみや1はん館神戸市中央区八幡通 3-2-160(078)231 -2111 
西宮店兵庫県西宮市河原町5 _ 110(0798)7 卜丨171 
姬路店姬路市東延末1丁目1番住友生命®路南ビル lFtt (0792)22-122 l 
京者寺町店京都市下京区寺町通仏光寺下ル*芙湏之町5490 (075) 34丨-3571 
京者&鉄店京都市下京区烏丸通七条下ル東塩小路町 7 CZtt (075)341-5769 
和歌山店和歌山市元寺町4 丁目4番地(0734) 28- 1441 
奈良1ばん館奈良市三条町478— (0742)27- 1111 

郡山インタ-店大和郡山市横田693- 10(07435)9-2221 
熊本店熊本市手取本町4 -120⑴ 96) 359- 7800 


ー パソコン/ワープロ通信ネツトワークサービス ー 

J&PCMT 画 









^^SIGOP 菊地旅螽 


(ジャンプコード: CARROT ) 

なると 


^ち 


初 私 0 P ちゃい 



SUBOP NYANKO 

T ? ミ l : 抑力、刺、 

釆耷はネ t 令ん。ぬ•-交 
春艮 it 京拉，/ 

逢く物從娜の啦' 

初 



フオトンチーム 「 CARROTj の戦士だち 


フォトンに青春のすべてを捧げ、彼らは今日も特訓する// 
目指せ/アメリカ// 

左より:さくら/てだ/ TAKA / ひこ沖ちやん/モモンガ/え一みん 



遊び大好吉人間、よつといで 0 触 ! 脱)了 METWof ^』 は 

90年代の新しい遊び方、模索中// 由誌 IE しぃ (?) 彡バ 


ヒかがゲーム、されとゲーム// 

7 s ■—厶に対してのメンバーの思い入れの深さは、他の SIG ではちよつ 
ヒお目にかかれません。 

f テオゲームはもちろんのこと、 ゲームと名のつくちのは、すべて括 
i の 対象です > 特に今、新感覚のゲーム「フォトン j がメンバーの間で 
、気沸騰中//また、 ボードを利用してのオンラインゲームも臑 催し 
:います0 

ごも、単にゲームの攻略法などを伝える日常ではありません。 

/■一厶というものについてみんなで真剣に考え、 「’ g □年代の新しい 
g び方」を作り出していきたいと願っています。 

ヒ手に遊ばなければ意味がない// 

§び上手 (7) なメンバーたちの集う SIG です^ 


- その他楽しいメニューがまだまだしわぱい/- 

★ J & P ならではのノ X ソコン•家電製品 
の会員割引もある ONLINE SHOPPING 。 

★ J & P だから強い//ノ V ノコン情報をはじめとする 
役に立つ DATA BASE 。 

★みんなでおしやべり オンライントーク （ CHAT 機能乂 
★地域別•テーマ別ボードで充実の BBS (電子掲示板)〇 
★ビジュアルデータもばっちり送受信できる X - MODEM 。 


JSP HOT LINE へのご入会はスタータキットで。 

^ お求めは、下記のお店べ。又は現金書留に 

て、¥3,000+¥90(消費税3%) = ¥3,090を 

事務局までお送り下さい。 

すぐに スター タキ ッ トをお送りします。 
+ . p », 〒556大 R 5 市浪速区日本橋西 1-6-5 上新電機株式会社 

JSP HOT LINE 事務局宛 TE し (06)632-2521 



店店店店店店店店店 
谷田：;川1山沢地; i 



















SHARP 41- 


パーソナルコンビュータ + キーボード十マウス CZ-888C-BK 播準価格169,800円（税別） 


14型カラーディスプレイテレビ_ CZ-860D-BK 棵準価格92,200円（税別） 


チルトスタンド 


CZ-6ST1-B 標準価格 5,800円（税別） 


ADVANCED 

先駆の“ Z ” アビリティがパソコンクリエイターを魅了する〇— 

TURBO 




クリエイテイブマインドを刺激する AV 機能-テレビ、ビデオ、ビデオディ 
スクなどの映像を最大4,096色のリアルな画像で瞬時にグラフィック画面に取 
り込めるカラー画像デジタイズ機能を標準装慊。4段階の置子化取り込み、42 
通りのモザイク取り込みなど多彩なトリック取り込み処理もサポート。さらにクロマ 
キー合成、インターレーススーパーインポーズ、4,096色対応デジタルテロッパ機 
有巨、ステレオ FM 音源…先駆の AV 機能がアートワークの領域をさらに拡げます0 


AV 指向の高水準べーシック Z-BASIC 搭載 多色グラフィック、 力 

ラー画像処理、ステレオ FM 音源、バンクメモリ対応など、ターボ Z シリーズが 
本来もつクリエイティブな機能をフルサポート0また豊富な画面モードで多色を 
駆使するときに便利なグラフィック用関数 （ HSV , RGB , HALF , CDOWN , 
CUP ) も装備。さらに FM 音源制御用ステートメントとじ TX 68000と命令コン 
パチの拡張 MML の採用によりスムーズな8音同時演奏を実現じ C います0 


• メインメモリ 128 K バイト標準装備、 Z - BASIC で最大 576 K バイトまでサポート籲 1 M バイトの5インチフロッピーディスクドライブ2基搭載 WIS 第1/第2水準準拠漢字、「システム. 
ユーザー辞害」を棵準装備した高度な日本語処理機能*ニューデザインのマウス標準装備參 XI ターボシリーズの豊萬なソフト資産が活用できるコンパチブル設計籲プリンタ、 
RS -232 C など豊富なインターフェイスを装備籲ドットビッチ0.39咖のハイコントラストブラウン管、 15 kHz /24 kHz のデュアルスキャン方式採用14型カラーディスプレイテレビ（別売）。 



淡株式会《 


•お問い合わせは…シャープ ㈱ 電子機器事業本部システム櫬器営業部〒545大阪市阿倍野区畏池町22番22号 0(06)621-1221 (大代表） 
電子機器事業本部液晶映像システム事業部第2商品企画部〒162東京都新宿区市谷八播町8番地 0(03)260-1 161(大代表） 



T 4910217910565雑誌 02179-10 

















